Menu
▾
▴
perl-ldap-dev
You can subscribe to this list here.
| 2000 |
Jan
|
Feb
|
Mar
|
Apr
|
May
(200) |
Jun
(129) |
Jul
(184) |
Aug
(204) |
Sep
(106) |
Oct
(79) |
Nov
(72) |
Dec
(54) |
|---|---|---|---|---|---|---|---|---|---|---|---|---|
| 2001 |
Jan
(83) |
Feb
(123) |
Mar
(84) |
Apr
(184) |
May
(106) |
Jun
(111) |
Jul
(104) |
Aug
(91) |
Sep
(59) |
Oct
(99) |
Nov
(100) |
Dec
(37) |
| 2002 |
Jan
(148) |
Feb
(88) |
Mar
(85) |
Apr
(151) |
May
(80) |
Jun
(110) |
Jul
(85) |
Aug
(43) |
Sep
(64) |
Oct
(89) |
Nov
(59) |
Dec
(42) |
| 2003 |
Jan
(129) |
Feb
(104) |
Mar
(162) |
Apr
|
May
|
Jun
|
Jul
|
Aug
|
Sep
|
Oct
|
Nov
|
Dec
|
|
From: Graham B. <gb...@po...> - 2003-03-26 08:47:26
|
----- Forwarded message from Matt Sisk <si...@mo...> ----- Date: Tue, 25 Mar 2003 21:23:33 -0500 To: gb...@po... From: Matt Sisk <si...@mo...> Subject: greetings, LDAPiranah, and LDAP server question Hi Graham, It's been a while -- in case you've forgotten my name, I'm Matt Sisk -- the guy who wrote that bifurcating LDAP spider a few years ago based on Net::LDAP. I called it Net::LDAPiranah at the time. (eventually called it Net::LDAPspray, but perhaps Net::LDAPspider would be better). Well that code evolved since those days, but then it was mothballed. I just dusted it off and wanted to get it working with the latest Net::LDAP implementation. However, I no longer have a convenient LDAP server on which to test. Do you know of any test servers out there (particularly ones with query limits) that I might use? I can set up and populate my own, but I'd rather not have to. Anyway, good to see your still chugging along on the project. (the new list archive does not appear to be searchable...) Thanks, Matt ----- End forwarded message ----- |
|
From: Chris R. <chr...@ma...> - 2003-03-26 06:57:04
|
On 25/3/03 8:57 pm, Daniel Davidson <da...@li...> wrote: > Thanks to the help of Chris, I am at least now getting an error message. > > Can't call method "asn" on unblessed reference at > /usr/lib/perl5/site_perl/5.8.0/Net/LDAP.pm line 354, <STDIN> line 5. That's because you used [ $dn ]. > My code is nearly the same as it was in my last post: > > $ldap=Net::LDAP->new($server) or die "$@"; > $ldap->bind(dn => $rootdn, password => $dnpassword) or die "bind"; The bind method returns a result object (like add, etc). You need to check the result code in the result object to determine if the bind succeeded. > $result=$ldap->add( > dn => [$dn], That should probably be just dn => $dn; the arrayrefs I suggested before are only needed for attribute values. Sorry I should have mentioned that too :-) The add method checks if the dn argument is a Net::LDAP::Entry object by calling ref() on it, and if not constructs such an object. When you passed [ $dn ] this caused ref() to return true and the code assumed wrongly that it was a Net::LDAP::Entry. The error you quoted is because it then tries to call the asn method on that "object", which in your case isn't one. Cheers, Chris |
|
From: Chris R. <chr...@ma...> - 2003-03-26 06:42:37
|
On 26/3/03 6:25 am, Dave Horsfall <da...@ci...> wrote: > [ French spam ] > > I've only just joined this list; is spam the normal thing here? You could check the list archives, but it is pretty rare. Cheers, Chris |
|
From: Alexandre F. <ale...@az...> - 2003-03-26 06:00:26
|
Si ce message ne s'affiche pas correctement cliquez ici : http://www.scanreflex.com/mail.htm Numérisez vos photos papiers et partagez les avec vos proches ! Faites revivre vos vieux albums souvenirs... Les avantages de notre services : Scanreflex numérise vos photos à partir de leur support papier (Nous n'avons pas besoin de vos négatifs) Scanreflex transfert vos photos sur un Cdrom doté de toutes les fonctionnalités pour envoyer vos photos et réaliser le diaporama de vos vacances, de votre mariage ou de votre anniversaire. Scanreflex vous propose des tarifs défiant toute concurrence sur le marché ! Scanreflex vous garantit une qualité de traitement exemplaire et des délais de livraison très rapide. Pour en savoir plus sur notre service, nous vous invitons à Consulter notre site : http://www.scanreflex.com Contactez-nous au : 01-42-77-21-02 Alexandre Fabre Responsable développement Vous disposez d'un droit d'accès, de modification, de rectification et de suppression des données qui vous concernent (article 34 de la loi "Informatique et Libertés" du 6 janvier 1978). Si vous ne souhaitez plus recevoir ces messages, cliquez ici. |
|
From: Brad D. <Bra...@Su...> - 2003-03-26 03:12:43
|
Based on the previous note and the following excerpt from the LDAP.pm
perl module, I presume that after the bind, the LDAP socket or
associated file handler must be getting dropped before I send a
request to it.
652 sub _recvresp {
653 my $ldap = shift;
654 my $what = shift;
655 my $sock = $ldap->socket;
656 my $sel = IO::Select->new($sock);
657 my $ready;
658
659 for( $ready = 1 ; $ready ; $ready = $sel->can_read(0)) {
660 my $pdu;
661 asn_read($sock, $pdu)
662 or return LDAP_OPERATIONS_ERROR;
My guess is that the open() function and the asn_read() functions are
colliding on the file handler for the LDAP connection socket. Thats
just by guess though.
What do you think? I sure would like to see the answer because I can't
get my data loaded into the directory.
Brad
On Tue, 2003-03-25 at 15:11, Brad Diggs wrote:
> Running with Net::LDAP debug of 12 didn't yield much different than
> with 4. However, I ran with perl debugger on and got the following
> when I did a Ctrl-c on the hang...
>
> Convert::ASN1::asn_read(/usr/lib/perl5/site_perl/5.8.0/Convert/ASN1/IO.pm:198):
> 198: READ_ERR:
> 199: $@ = "I/O Error $! " . CORE::unpack("H*",$_[1]);
>
> Should I be led to believe by this that the problem may be in the ASN
> code?
>
> Brad
--
---------------------------------------------------------------------
_/_/_/ _/ _/ _/ _/ Brad Diggs
_/ _/ _/ _/_/ _/ Directory and Identity Architect
_/_/_/ _/ _/ _/ _/ _/ Office: 972-992-0002
_/ _/ _/ _/ _/_/
_/_/_/ _/_/_/ _/ _/ Bra...@Su...
M I C R O S Y S T E M S
---------------------------------------------------------------------
|
|
From: <Fra...@ba...> - 2003-03-26 00:12:41
|
Ich werde ab 24.03.2003 nicht im B=FCro sein. Ich kehre zur=FCck am 28.03.2003. Hallo, ich habe diese Woche schulung. Ich werde aber trotzdem jeden Vormittag von 6:30 Uhr bis 8:00 Uhr im B=FCro sein. Ich habe ihre eMail erhalten und werde sie schnellstm=F6glichst beantwo= rten. Dies kann sich eventuell verz=F6gern. --------- Diese E-Mail k=F6nnte vertrauliche und/oder rechtlich gesch=FCtzte Informationen enthalten. Wenn Sie nicht der richtige Adressat sind oder= diese E-Mail irrt=FCmlich erhalten haben, informieren Sie bitte sofort = den Absender und vernichten Sie diese Mail. Das unerlaubte Kopieren sowie d= ie unbefugte Weitergabe dieser Mail sind nicht gestattet. This e-mail may contain confidential and/or privileged information. If = you are not the intended recipient (or have received this e-mail in error) please notify the sender immediately and destroy this e-mail. Any unauthorised copying, disclosure or distribution of the material in thi= s e-mail is strictly forbidden. ---------- = |
|
From: Brad D. <br...@Di...> - 2003-03-25 21:12:53
|
Running with Net::LDAP debug of 12 didn't yield much different than
with 4. However, I ran with perl debugger on and got the following
when I did a Ctrl-c on the hang...
Convert::ASN1::asn_read(/usr/lib/perl5/site_perl/5.8.0/Convert/ASN1/IO.pm:198):
198: READ_ERR:
199: $@ = "I/O Error $! " . CORE::unpack("H*",$_[1]);
Should I be led to believe by this that the problem may be in the ASN
code?
Brad
|
|
From: Daniel D. <da...@li...> - 2003-03-25 20:53:23
|
Thanks to the help of Chris, I am at least now getting an error message. = =20 Can't call method "asn" on unblessed reference at=20 /usr/lib/perl5/site_perl/5.8.0/Net/LDAP.pm line 354, <STDIN> line 5. My code is nearly the same as it was in my last post: $ldap=3DNet::LDAP->new($server) or die "$@"; $ldap->bind(dn =3D> $rootdn, password =3D> $dnpassword) or die "bind"; $result=3D$ldap->search ( =09base=09=3D> "dc=3Dlife,dc=3Duiuc,dc=3Dedu", =09scope=09=3D> "sub", =09filter=09=3D> "uid=3D*", =09attrs=09=3D> "*" =09); @values =3D $result->entries; ldap code after this to find an unused uid# and gid# from above search th= is works ...other stuff not using ldap, crypting password, figuring days sin= ce=20 epoch, etc print "$dn\n"; $result=3D$ldap->add( dn =3D> [$dn], attr =3D> [ =09'uid' =3D> [$uid], =09'cn' =3D> [$geckos], =09'objectClass' =3D> ['account','posixAccount','top','shadowAccount'], =09'shadowMax' =3D> [$shadowMax], =09'shadowWarning' =3D> [$shadowWarning], =09'loginShell' =3D> [$shell], =09'uidNumber' =3D> [$id], =09'gidNumber' =3D> [$id], =09'homeDirectory' =3D> [$homedirectory], =09'geckos' =3D> [$geckos], =09'userPassword' =3D> [$password], =09'shadowLastChange' =3D> [$days] =09] =09); print "after add\n"; die "unable to add, errorcode #".$result->code() if $result->code(); It looks like it is breaking differently on the add (prints the dn but no= t=20 after add), any ideas? thanks, Dan Dan |
|
From: Chris R. <chr...@ma...> - 2003-03-25 19:14:10
|
On 25/3/03 6:21 pm, Daniel Davidson <da...@li...> wrote:
> I am trying to add a record, and my script keeps hanging when I actually go to
> do the add. First the code snipet, I am only including the lines pertaining
> to ldap.
>
> #get a uid and gid that isnt used
> $ldap=Net::LDAP->new($server) or die "$@";
> $ldap->bind(dn => $rootdn, password => $dnpassword) or die "bind";
>
> $result=$ldap->search (
> base => "dc=life,dc=uiuc,dc=edu",
> scope => "sub",
> filter => "uid=*",
> attrs => "*"
> );
> ldap code after this to find an unused uid# and gid# from above search this
> works
>
> ...other stuff not using ldap, crypting password, figuring days since epoch,
> etc
>
> $dn="uid=$uid,$dnsuffix";
> $homedirectory="$homeprefix$uid";
> print "$dn\n";
>
> $res=$ldap->add(
> dn => $dn,
> attr => [
> 'uid' => $uid,
> 'cn' => $geckos,
> 'objectClass' => ['account','posixAccount','top','shadowAccount'],
> 'shadowMax' => $shadowMax,
> 'shadowWarning' => $shadowWarning,
> 'loginShell' => $shell,
> 'uidNumber' => $id,
> 'gidNumber' => $id,
> 'homeDirectory' => $homedirectory,
> 'geckos' => $geckos,
> 'userPassword' => $password,
> 'shadowLastChange' => $days
> ]
> );
Try putting each value inside an arrayref, eg:
'homeDirectory' => [ $homedirectory ],
Cheers,
Chris
|
|
From: Chris R. <chr...@ma...> - 2003-03-25 19:12:14
|
On 25/3/03 6:02 pm, Jim Harle <ha...@us...> wrote:
> Tom, I don't know how to directly do what you want, other than reading the
> schema, but here is a way to avoid attemping to print binary values:
>
> foreach my $attr ($entry->attributes) {
> print $attr;
> foreach my $val ($entry->get_value($attr)) {
> $val = 'Not ASCII' unless ($val =~ /^[\x00-\x7f]+$/ );
> print " $val\n";
> }
> }
I'm not sure if Tom meant binary in the sense of "not text" (eg JPEG
photos), or binary in the sense of the attribute description including
";binary" (eg certificates). They are different, and you can concoct valid
";binary" values that are ASCII text if you try hard :-}
If it was the latter, then he could pass nooptions => 1 to the attributes
method to skip any attribute containing ";binary".
foreach my $attr ($entry->attributes(nooptions => 1)) {
print $attr;
foreach my $val .... {
}
}
The Net::LDAP::Entry manpage has more details.
Cheers,
Chris
|
|
From: Daniel D. <da...@li...> - 2003-03-25 18:17:31
|
I am trying to add a record, and my script keeps hanging when I actually =
go to=20
do the add. First the code snipet, I am only including the lines pertain=
ing=20
to ldap.
#get a uid and gid that isnt used
$ldap=3DNet::LDAP->new($server) or die "$@";
$ldap->bind(dn =3D> $rootdn, password =3D> $dnpassword) or die "bind";
$result=3D$ldap->search (
base =3D> "dc=3Dlife,dc=3Duiuc,dc=3Dedu",
scope =3D> "sub",
filter =3D> "uid=3D*",
attrs =3D> "*"
);
ldap code after this to find an unused uid# and gid# from above search th=
is=20
works
=2E..other stuff not using ldap, crypting password, figuring days since e=
poch,=20
etc
$dn=3D"uid=3D$uid,$dnsuffix";
$homedirectory=3D"$homeprefix$uid";
print "$dn\n";
$res=3D$ldap->add(
dn =3D> $dn,
attr =3D> [
'uid' =3D> $uid,
'cn' =3D> $geckos,
'objectClass' =3D> ['account','posixAccount','top','shadowAccount=
'],
'shadowMax' =3D> $shadowMax,
'shadowWarning' =3D> $shadowWarning,
'loginShell' =3D> $shell,
'uidNumber' =3D> $id,
'gidNumber' =3D> $id,
'homeDirectory' =3D> $homedirectory,
'geckos' =3D> $geckos,
'userPassword' =3D> $password,
'shadowLastChange' =3D> $days
]
);
die "unable to add, errorcode #".$res->code() if $res->code();
It will print the dn as it should, then afterward, the script hangs on tr=
ying=20
to do the add and will not do anything, so it cannot even get to my error=
=20
checking line, the only way out is to control c. If need be, I can attac=
h a=20
full copy of my code if it would be helpful for someone to see it.
Dan
|
|
From: Jim H. <ha...@us...> - 2003-03-25 18:03:12
|
Tom, I don't know how to directly do what you want, other than reading the
schema, but here is a way to avoid attemping to print binary values:
foreach my $attr ($entry->attributes) {
print $attr;
foreach my $val ($entry->get_value($attr)) {
$val = 'Not ASCII' unless ($val =~ /^[\x00-\x7f]+$/ );
print " $val\n";
}
}
--Jim Harle
On Tue, 25 Mar 2003, Thomas Stripling wrote:
> Hi,
>
> I'm trying to return a list of attribute values without including binary
> ones. (I want to print them out.) What is the best way to do
> this? Net::LDAPapi had a function to return only non-binary attributes;
> does Net::LDAP have anything like this? With Net::LDAP, the only way I
> know of is to check the attribute name for 'binary;'. Will this work? Is
> it the best solution?
>
> Thanks,
> Tom
>
> I accidentally posted a previous question to the end of another
> thread. I'm pasting it below just in case no one saw it.
>
>
> Hi list,
>
> I've been migrating some perl scripts from Net::LDAPapi to
> Net::LDAP. Unfortunately, some of the scripts generate ldap filters that
> are not technically correct. Net::LDAPapi (because it was based on a c-sdk
> that corrected bad filters -- I think) worked fine. Net::LDAP, however,
> fails with a bad filter error. I know the best solution would be to ensure
> the filters are generated correctly, but unfortunately that's not an
> option. As a result, I'm trying to establish exactly what cases of bad
> filters were fixed in the (Mozilla) sdk that are not in Net::LDAP so that I
> can write a hack. ;-)
>
> Any help would be very much appreciated.
>
> Thanks,
> Tom
>
>
>
> -------------------------------------------------------
> This SF.net email is sponsored by:
> The Definitive IT and Networking Event. Be There!
> NetWorld+Interop Las Vegas 2003 -- Register today!
> http://ads.sourceforge.net/cgi-bin/redirect.pl?keyn0001en
>
|
|
From: Thomas S. <tst...@ho...> - 2003-03-25 17:17:37
|
Hi, I'm trying to return a list of attribute values without including binary ones. (I want to print them out.) What is the best way to do this? Net::LDAPapi had a function to return only non-binary attributes; does Net::LDAP have anything like this? With Net::LDAP, the only way I know of is to check the attribute name for 'binary;'. Will this work? Is it the best solution? Thanks, Tom I accidentally posted a previous question to the end of another thread. I'm pasting it below just in case no one saw it. Hi list, I've been migrating some perl scripts from Net::LDAPapi to Net::LDAP. Unfortunately, some of the scripts generate ldap filters that are not technically correct. Net::LDAPapi (because it was based on a c-sdk that corrected bad filters -- I think) worked fine. Net::LDAP, however, fails with a bad filter error. I know the best solution would be to ensure the filters are generated correctly, but unfortunately that's not an option. As a result, I'm trying to establish exactly what cases of bad filters were fixed in the (Mozilla) sdk that are not in Net::LDAP so that I can write a hack. ;-) Any help would be very much appreciated. Thanks, Tom |
|
From: Brad D. <br...@Di...> - 2003-03-24 21:59:31
|
Yes, the hang does occur on updating the first entry. I have set $| to 1 and I have tried chopping the $_ value before parsing with split. Unfortunately, these things didn't fix the problem. Printing the $dn before and after the update looks the same. Brad On Mon, 2003-03-24 at 14:18, Jim Harle wrote: > Does it fail on the first thing from the file or further along? Do you need a > chomp after your while to get rid of EOLs? Try setting $| to 1 and print > messages with $dn before and after the $entry->update. > --Jim Harle |
|
From: Jim H. <ha...@us...> - 2003-03-24 20:19:15
|
Does it fail on the first thing from the file or further along? Do you need a
chomp after your while to get rid of EOLs? Try setting $| to 1 and print
messages with $dn before and after the $entry->update.
--Jim Harle
On 24 Mar 2003, Brad Diggs wrote:
> This appears to be an issue when trying to perform an LDAP operation
> in the context of an open,while,close loop of reading through an input
> file. When I comment out the open,while,close loop, the entry gets
> added
> just fine. However, when I put it back in the context of a input file
> loop,
> the LDAP update function hangs.
>
> Here is sample code to illustrate what I am doing...
>
> if (-f "$opt_f") {
>
> #
> # Establish LDAP connection to directory service
> #
> $ldap = Net::LDAP->new($opt_h, port=> $opt_p)
> or die "Can't connect to LDAP server $opt_h:$opt_p\n";
>
> $ldap->bind($opt_D, password => $opt_w)
> or print "Can't bind to LDAP server as $opt_D";
>
> open(INPUTFILE, "< $opt_f");
> while (<INPUTFILE>) {
> #
> # Parse the comma delimited file
> #
> ($last_name,$first_name) = split(/\,/, $_);
>
> #
> # Add each entry to the directory
> #
> $mycn = "$first_name $last_name";
> $dn = "cn=$mycn, $opt_b";
>
> print "Adding $first_name, $last_name, $email1 to $opt_h:$opt_p
> via $opt_D:$opt_w\n";
>
> $entry = Net::LDAP::Entry->new();
>
> $entry->dn("$dn");
> $entry->changetype('add');
> $entry->add('cn' => "$mycn");
> $entry->add('objectclass' => ['top', 'person',
> 'organizationalPerson', 'inetOrgPerson']);
> $entry->add('sn' => "$last_name");
> $entry->add('givenName' => "$first_name") if defined
> $first_name;
>
> #
> # Apply the update
> #
> $result = $entry->update($ldap);
> die "Error: Add failed -> " . $result->error() . "\n" if
> $result->code();
>
> print "Finished Adding " . $entry->dn() . " with result
> $result->code\n";
> }
> close(INPUTFILE);
> $ldap->unbind();
> }
>
> Anybody know whats wrong or if there are any workarounds. Ideally,
> I would prefer not creating large arrays that I would use to replay the
> updates through.
>
> Thanks in advance,
> Brad
>
>
> On Mon, 2003-03-24 at 10:04, Brad Diggs wrote:
> > I have performed numerous tests using various methods of adding
> > entries from an input file using open. The hang always occurs
> > when the entry update is applied. The problem is that the update
> > is never applied.
> >
> > Has anyone experienced this problem before?
> >
> > Thanks again!
> >
> > Brad
>
>
>
> -------------------------------------------------------
> This sf.net email is sponsored by:ThinkGeek
> Welcome to geek heaven.
> http://thinkgeek.com/sf
>
|
|
From: Brad D. <br...@Di...> - 2003-03-24 18:28:22
|
I forgot to mention that the error message that I get from applying the update. Here is the code that tells how the update handles the error: $result = $entry->update($ldap); die "Error: Add failed -> " . $result->error() . "\n" if $result->code(); Here is the error message: Error: Add failed -> I/O Error This sounds to me like a connection timeout because it took several minutes before I got the message. Could it be that the open and LDAP update request are attempting to use the same file handler? Brad |
|
From: Brad D. <br...@Di...> - 2003-03-24 17:20:21
|
This appears to be an issue when trying to perform an LDAP operation
in the context of an open,while,close loop of reading through an input
file. When I comment out the open,while,close loop, the entry gets
added
just fine. However, when I put it back in the context of a input file
loop,
the LDAP update function hangs.
Here is sample code to illustrate what I am doing...
if (-f "$opt_f") {
#
# Establish LDAP connection to directory service
#
$ldap = Net::LDAP->new($opt_h, port=> $opt_p)
or die "Can't connect to LDAP server $opt_h:$opt_p\n";
$ldap->bind($opt_D, password => $opt_w)
or print "Can't bind to LDAP server as $opt_D";
open(INPUTFILE, "< $opt_f");
while (<INPUTFILE>) {
#
# Parse the comma delimited file
#
($last_name,$first_name) = split(/\,/, $_);
#
# Add each entry to the directory
#
$mycn = "$first_name $last_name";
$dn = "cn=$mycn, $opt_b";
print "Adding $first_name, $last_name, $email1 to $opt_h:$opt_p
via $opt_D:$opt_w\n";
$entry = Net::LDAP::Entry->new();
$entry->dn("$dn");
$entry->changetype('add');
$entry->add('cn' => "$mycn");
$entry->add('objectclass' => ['top', 'person',
'organizationalPerson', 'inetOrgPerson']);
$entry->add('sn' => "$last_name");
$entry->add('givenName' => "$first_name") if defined
$first_name;
#
# Apply the update
#
$result = $entry->update($ldap);
die "Error: Add failed -> " . $result->error() . "\n" if
$result->code();
print "Finished Adding " . $entry->dn() . " with result
$result->code\n";
}
close(INPUTFILE);
$ldap->unbind();
}
Anybody know whats wrong or if there are any workarounds. Ideally,
I would prefer not creating large arrays that I would use to replay the
updates through.
Thanks in advance,
Brad
On Mon, 2003-03-24 at 10:04, Brad Diggs wrote:
> I have performed numerous tests using various methods of adding
> entries from an input file using open. The hang always occurs
> when the entry update is applied. The problem is that the update
> is never applied.
>
> Has anyone experienced this problem before?
>
> Thanks again!
>
> Brad
|
|
From: Peter M. <pe...@ad...> - 2003-03-24 16:33:40
|
Hi, On Monday 24 March 2003 17:04, Brad Diggs wrote: > I have performed numerous tests using various methods of adding > entries from an input file using open. The hang always occurs > when the entry update is applied. The problem is that the update > is never applied. Please give more details (a code snippet and an expract of the data) Otherwise it is really hard to guess what your problem might be. Peter --=20 Peter Marschall eMail: pe...@ad... |
|
From: Thomas S. <tst...@ho...> - 2003-03-24 16:33:21
|
Hi list, I've been migrating some perl scripts from Net::LDAPapi to Net::LDAP. Unfortunately, some of the scripts generate ldap filters that are not technically correct. Net::LDAPapi (because it was based on a c-sdk that corrected bad filters -- I think) worked fine. Net::LDAP, however, fails with a bad filter error. I know the best solution would be to ensure the filters are generated correctly, but unfortunately that's not an option. As a result, I'm trying to establish exactly what cases of bad filters were fixed in the (Mozilla) sdk that are not in Net::LDAP so that I can write a hack. ;-) Any help would be very much appreciated. Thanks, Tom |
|
From: Brad D. <br...@Di...> - 2003-03-24 16:27:43
|
This appears to be an issue when trying to perform an LDAP operation
in the context of an open,while,close loop of reading through an input
file. When I comment out the open,while,close loop, the entry gets
added
just fine. However, when I put it back in the context of a input file
loop,
the LDAP update function hangs.
Here is sample code to illustrate what I am doing...
if (-f "$opt_f") {
#
# Establish LDAP connection to directory service
#
$ldap = Net::LDAP->new($opt_h, port=> $opt_p)
or die "Can't connect to LDAP server $opt_h:$opt_p\n";
$ldap->bind($opt_D, password => $opt_w)
or print "Can't bind to LDAP server as $opt_D";
open(INPUTFILE, "< $opt_f");
while (<INPUTFILE>) {
#
# Parse the comma delimited file
#
($last_name,$first_name) = split(/\,/, $_);
#
# Add each entry to the directory
#
$mycn = "$first_name $last_name";
$dn = "cn=$mycn, $opt_b";
print "Adding $first_name, $last_name, $email1 to $opt_h:$opt_p
via $opt_D:$opt_w\n";
$entry = Net::LDAP::Entry->new();
$entry->dn("$dn");
$entry->changetype('add');
$entry->add('cn' => "$mycn");
$entry->add('objectclass' => ['top', 'person',
'organizationalPerson', 'inetOrgPerson']);
$entry->add('sn' => "$last_name");
$entry->add('givenName' => "$first_name") if defined
$first_name;
#
# Apply the update
#
$result = $entry->update($ldap);
die "Error: Add failed -> " . $result->error() . "\n" if
$result->code();
print "Finished Adding " . $entry->dn() . " with result
$result->code\n";
}
close(INPUTFILE);
$ldap->unbind();
}
Anybody know whats wrong or if there are any workarounds. Ideally,
I would prefer not creating large arrays that I would use to replay the
updates through.
Thanks in advance,
Brad
On Mon, 2003-03-24 at 10:04, Brad Diggs wrote:
> I have performed numerous tests using various methods of adding
> entries from an input file using open. The hang always occurs
> when the entry update is applied. The problem is that the update
> is never applied.
>
> Has anyone experienced this problem before?
>
> Thanks again!
>
> Brad
|
|
From: Brad D. <br...@Di...> - 2003-03-24 16:06:14
|
I have performed numerous tests using various methods of adding entries from an input file using open. The hang always occurs when the entry update is applied. The problem is that the update is never applied. Has anyone experienced this problem before? Thanks again! Brad |
|
From: Chris R. <chr...@ma...> - 2003-03-24 15:52:44
|
On 24/3/03 1:42 pm, Susan Aurand <sa...@ha...> wrote: > I have a master and a slave setup. I am having one small problem. I start > ldap.conf and slurpd.conf > when I start the ldap service. I check the processes running, I see everything > there. If I am on the > client and I update the master - which my client resides on the master - > everything updates fine. > When I am on the client and click my slave server - and perform an update, the > slave will only > update if I start and second incidence of slurpd from the command line, and > let it run in the > foreground. Is this happening because I am trying to update the slave from my > client that resides on > the master? Do I have to physically be on the slave with a client running > there, for this to work > correctly? Any input would be helpful. > Thank you very much! > P.S - I think openldap is great! This list isn't about the OpenLDAP software - please resend your question to an OpenLDAP list :-) Cheers, Chris |
|
From: Susan A. <sa...@ha...> - 2003-03-24 13:35:42
|
I have a master and a slave setup. I am having one small problem. I start ldap.conf and slurpd.conf when I start the ldap service. I check the processes running, I see everything there. If I am on the client and I update the master - which my client resides on the master - everything updates fine. When I am on the client and click my slave server - and perform an update, the slave will only update if I start and second incidence of slurpd from the command line, and let it run in the foreground. Is this happening because I am trying to update the slave from my client that resides on the master? Do I have to physically be on the slave with a client running there, for this to work correctly? Any input would be helpful. Thank you very much! P.S - I think openldap is great! |
|
From: Graham B. <gb...@po...> - 2003-03-24 08:00:27
|
----- Forwarded message from "Hanlen, Chris" <Chr...@ca...> ----- Date: Mon, 24 Mar 2003 13:18:51 +1100 To: <gb...@po...> From: "Hanlen, Chris" <Chr...@ca...> Subject: Writing LDIF entry query. Hi Graham, Sorry to email you directly, but I need to determine the nature of a problem that I am experiencing at a client. When reading in an LDIF entry (see below for entry) and writing out the entry to another file, the written entry (see below for entry) has all of the "replace" lines as a group at the top with all of the modified values in another group at the bottom. Is there a switch or something that I can use in order to write the LDIF entry as it was read in ? EG: Each replace with it's corresponding value. A directory utility that I am using for bulk loading the data is complaining about the grouping's in the written LDIF entry. If there is anything that can get me over this minor hump, I would greatly appreciate it ? Thanks in advance. Regards, Christopher Hanlen, CUE Sr. Consultant Computer Associates Melbourne, Australia tel: +61 3 9821 3000 fax: +61 3 9821 3010 mobile: +61 (0) 413 025 913 <mailto:Chr...@ca...> Chr...@ca... Read Entry from File #1: dn: uid=xxx,ou=xxx,ou=xxx,o=xxx changetype: modify replace: birthdate birthdate: 19000101000000 - replace: contractenddate contractenddate: 20030219000000 - replace: startdate startdate: 19710215000000 - replace: organizationalstatus organizationalstatus: Full Time - replace: organizationalunitname organizationalunitname: xxx - LDIF Written Entry to File #2: dn: uid=xxx,ou= xxx,ou= xxx,o=xxx changetype: modify replace: birthdate replace: contractenddate replace: startdate replace: organizationalstatus replace: organizationalunitname birthdate: 19000101000000 contractenddate: 20030219000000 startdate: 19710215000000 organizationalstatus: Full Time organizationalunitname: xxx ----- End forwarded message ----- |
|
From: <ja...@ya...> - 2003-03-23 03:37:48
|
<html>
<head>
<meta http-equiv="Content-Language" content="zh-tw">
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=big5">
<title>±z¬O¤U±¨º¤@¨º¤@ºØ¨¥÷</title>
<bgsound src="http://140.114.79.84:7000/midi/foreign/latin/reloj.mid" loop="1">
</head>
<body>
<div style="border-style: outset; border-width: 4; background-color: #FFCC00; background-image: url('http://scort.org..tw~tp40/pic/m-flower.gif'); background-repeat: repeat-x">
<div style="width: 728; height: 78; background-color: #FFCC00; background-image: url('http://www.scout.org.tw/~tp40/pic/m-flower.gif'); background-repeat: repeat-x; background-position-x: medium">
<p align="center">¡@</p>
</div>
<p>¡@</p>
<p><span style="background-color: #FFCC00"><font face="µØ±dÄײʶê" size="6">±z</font><font face="µØ±dÄײʶê" size="4">¬O¤U±¨º¤@¨º¤@ºØ¨¥÷¡G</font></span></p>
<p><span style="background-color: #FFCC00"><font face="µØ±dÄײʶê" size="4">¡@</font><font size="4" face="¼Ð·¢Åé">¡@<b>¢°.¬O¤@¦ì</b></font><font face="¼Ð·¢Åé"><b><a href="http://home.kimo.com.tw/leaderdimona2/joinus.asp.htm"><font color="#800000" style="font-size: 15pt">·QÁÈ¿úªº¾Ç¥Í</font></a></b></font><font size="4" face="¼Ð·¢Åé">¡A<b>«o¥u¯àÁȨì¨C¤p®É70¡ã100ªº®ÉÁ~¡A²Ö¿n¤£¤F°]´I¡C</b></font></span></p>
<p><span style="background-color: #FFCC00"><font face="¼Ð·¢Åé" size="4">¡@¡@<b>¢±.¬O¤@¦ì</b></font><font face="¼Ð·¢Åé"><b><a href="http://home.kimo.com.tw/leaderdimona2/joinus.asp.htm"><font color="#800000" style="font-size: 15pt">¤W¯Z±Ú</font></a></b></font><font face="¼Ð·¢Åé" size="4">¡A<b>¨C¤Ñ¥´¥d¡¨¤W¡¨¡¨¤U¡¨¯Z¡Aè¦n¥d¦b¨º¸Ì¡A¤S¾á¤ß³Qµôû¡C</b></font></span></p>
<p><span style="background-color: #FFCC00"><font face="¼Ð·¢Åé" size="4">¡@¡@<b>¢².¬O¤@¦ì·QÀ°®a®x¦hÁȨǿú¡A¨Ó¬°®a®xºÉ¤ßºÉ¤Oªº</b></font><font face="¼Ð·¢Åé"><b><a href="http://home.kimo.com.tw/leaderdimona2/joinus.asp.htm"><font color="#800000" style="font-size: 15pt">®a®x¥D°ü</font></a></b></font><b><font face="¼Ð·¢Åé" size="4">¡C</font></b></span></p>
<p align="left"><span style="background-color: #FFCC00">
<font size="4" face="µØ±d·¢®ÑÅéW5"><b>¡@¡@¡@ ¦pªG§A¯uªº·Q¼W¥[¦¬¤J¡A¤S¨ã³Æ¤F¤@¨Ç¹q¸£ªº°ò¦</b>¡I</font></span></p>
<p align="left"><span style="background-color: #FFCC00"><font face="¼Ð·¢Åé"><b>
<font color="#FF0000" size="5"> ¨º»ò®¥³ß±z¡I</font></b></font><b><font face="¼Ð·¢Åé" size="4" color="#FF0000">³o±N·|¬O±z³Ì¦nªº¾÷·|¡I</font></b></span></p>
<p><span style="background-color: #FFCC00"><font face="µØ±dÄײʶê" size="6">±z</font><font face="µØ±dÄײʶê" size="4">ª¾¹D¶Ü¡H</font></span></p>
<p><span style="background-color: #FFCC00">
<font face="µØ±dÄײʶê" size="4" color="#FFFFFF">¡@¡@ì¨Ó¶R¤ú»I¡A¥Î½Ã¥Í¯È¡A¤]¯à²Ö¿n°]´I¡I¦A°t¤W±M·~ªººô¸ô¦æ¾P¤è¦¡¡I</font></span><font size="4" face="µØ±dÄײʶê" color="#FFFFFF">µ´¹ï¤ÞÃz¥«³õ¡I</font></p>
<p>¡@</p>
<p align="center"><span style="background-color: #FFCC00">
<font face="µØ±dÄײʶê" size="5">
<a href="http://home.kimo.com.tw/leaderdimona2/joinus.asp.htm">§Ú·Q¬Ý¶R¤ú»I¤Î¥Î½Ã¥Í¯ÈÁÈ¿úªº¼v¤ù</a></font></span></p>
<p align="center"><span style="background-color: #FFCC00">
<font color="#FFFF00"> </font><b><font color="#CC0099" face="µØ±dÄ׶®§º" size="5"><a href="http://home.kimo.com.tw/leaderdimona2"><font color="#CC0099">§Ún¶i¤@¨B¤F¸Ñ</font></a></font></b></span></p>
<p align="center">
<img border="0" src="http://ruzunet.myrice.com/0328.gif" width="45" height="52"><span style="background-color: #FFCC00"><b><font color="#800000" face="µØ±dÄ׶®§º" size="5"><a href="http://home.kimo.com.tw/leaderdimona2/joinus.asp.htm">§ÚnÁÈ¿ú¡A½Ð±zÁpµ¸§Ú¡I</a></font></b></span></p>
<p align="center">¡@</div>
<p align="center"><b><img border="0" src="http://www.scout.org.tw/~tp40/pic/m-java.gif" width="64" height="64"><font size="4"><a href="http://home.kimo.com.tw/leaderdimona2">¤F¸Ñ¬O¤£¥Îªá¿úªº!!</a></font></b>¾÷·|¬O´x´¤¦b¥ýª¾¥ýıªº¤H¤â¤W,´x´¤¥ý¾÷¡A´N¬OĹ®a¡I<br>
<br>
<font class="unnamed1" color="#ff0000" size="2">
·í¾÷·|¥X²{¡@±z¬O¬Ý¨ì¥¦½§²Lªº§Î»ª¡@ÁÙ¬O¤w¬Ý¨ì¨ä¤º²[ªº²`«× ¥¿©Ò¿×¼z²´ÃÑ^¶¯<br>
¡@¡@¡@¡@³o¤Ç¤d¨½°¨ <b>¥u¦³¿W¨ã¼z²´ªº§B¼Ö</b> ¥i¥H¬Ý¨ì¥Lªº¼ç¤O»P»ùÈ</font></p>
<p align="center"><b><font face="·s²Ó©úÅé">Y¦]¤H¼Æ¤Ó¦h,¼v¤ùµLªk¥¿±`Æ[¬Ý,<a href="http://home.kimo.com.tw/leaderdimona2/joinus.asp.htm">½Ð±zª½±µ¯d¤U±zªº¸ê®Æ</a>,§Ú±N·|ºÉ³t»P±z³sµ¸!</font></b></p>
</body>
</html>
|
7902 messages has been excluded from this view by a project administrator.
;){kind=link}
![http://ruzunet.myrice.com/0328.gif"](http://ruzunet.myrice.com/0328.gif"){kind=link}
![http://www.scout.org.tw/~tp40/pic/m-java.gif"](http://www.scout.org.tw/~tp40/pic/m-java.gif"){kind=link}