From: Mark W. <mew...@un...> - 2000-07-14 14:10:07
|
There's a set of patches Graham has that you need. I thought they were on CVS on sourceforge, but someone has told me that they couldn't find them & I haven't had a chance too look. Mark On Fri, 14 Jul 2000, Per [iso-8859-1] Møgelhøj wrote: > I have tried to use the Net::LDAP::Paged module to do paged searches > towards an LDAP v3 with this ext. control enabled. > > I have tried the following code: > > use Net::LDAP; > use Net::LDAP::Control; > use Net::LDAP::Control::Paged; > > $ldap = Net::LDAP->new('myhost') or die "$@"; > > $ldap->bind( version => 3); > > $ctrl = Net::LDAP::Control::Paged->new( > size => 2, > cookie => "", > critical =>1 > ); > > > $mesg = $ldap->search ( > base => "c=DK", > filter => "(o=*)", > control => $ctrl > ); > > $mesg->code && die $mesg->error; > print $mesg->count,"\n"; > > The debug output shows, that I receive the first page, but is not able > to decode the pagedResultsControl. > Perhaps it is a problem in Convert::ASN ? > > Net::LDAP=HASH(0x80cd61c) sending: > Net::LDAP=HASH(0x80cd61c) received: > 0000 30 12: SEQUENCE { > 0002 02 1: INTEGER = 1 > 0005 61 7: [APPLICATION 1] { > 0007 0A 1: ENUM = 0 > 000A 04 0: STRING = '' > 000C 04 0: STRING = '' > 000E : } > 000E : } > Net::LDAP=HASH(0x80cd61c) sending: > Net::LDAP=HASH(0x80cd61c) received: > 0000 30 362: SEQUENCE { > 0004 02 1: INTEGER = 2 > 0007 64 355: [APPLICATION 4] { > 000B 04 32: STRING = 'o=Deutsche Schule Feldstedt,c=dk' > 002D 30 317: SEQUENCE { > 0031 30 52: SEQUENCE { > 0033 04 11: STRING = 'objectClass' > 0040 31 37: SET { > 0042 04 3: STRING = 'top' > 0047 04 12: STRING = 'organization' > 0055 04 16: STRING = 'snetOrganization' > 0067 : } > 0067 : } > 0067 30 40: SEQUENCE { > 0069 04 6: STRING = 'street' > 0071 31 30: SET { > 0073 04 28: STRING > 0075 : 53 C3 B8 6E 64 65 72 62 6F 72 67 76 65 6A 20 > 31 S..nderborgvej 1 > 0085 : 32 31 20 2D 20 46 65 6C 73 74 65 64 __ __ __ > __ 21 - Felsted > 0091 : } > 0091 : } > 0091 30 32: SEQUENCE { > 0093 04 1: STRING = 'o' > 0096 31 27: SET { > 0098 04 25: STRING = 'Deutsche Schule Feldstedt' > 00B3 : } > 00B3 : } > 00B3 30 27: SEQUENCE { > 00B5 04 13: STRING = 'postalAddress' > 00C4 31 10: SET { > 00C6 04 8: STRING > 00C8 : C3 85 62 65 6E 72 C3 A5 __ __ __ __ __ __ __ > __ ..benr.. > 00D0 : } > 00D0 : } > 00D0 30 20: SEQUENCE { > 00D2 04 10: STRING = 'postalCode' > 00DE 31 6: SET { > 00E0 04 4: STRING = '6200' > 00E6 : } > 00E6 : } > 00E6 30 29: SEQUENCE { > 00E8 04 15: STRING = 'telephoneNumber' > 00F9 31 10: SET { > 00FB 04 8: STRING = '74685407' > 0105 : } > 0105 : } > 0105 30 38: SEQUENCE { > 0107 04 24: STRING = 'facsimileTelephoneNumber' > 0121 31 10: SET { > 0123 04 8: STRING = '74685407' > 012D : } > 012D : } > 012D 30 33: SEQUENCE { > 012F 04 21: STRING = 'snetInstitutionNumber' > 0146 31 8: SET { > 0148 04 6: STRING = '519006' > 0150 : } > 0150 : } > 0150 30 28: SEQUENCE { > 0152 04 19: STRING = 'snetInstitutionType' > 0167 31 5: SET { > 0169 04 3: STRING = '121' > 016E : } > 016E : } > 016E : } > 016E : } > 016E : } > Net::LDAP=HASH(0x80cd61c) received: > 0000 30 410: SEQUENCE { > 0004 02 1: INTEGER = 2 > 0007 64 403: [APPLICATION 4] { > 000B 04 20: STRING > 000D : 6F 3D 56 65 64 62 C3 A6 6B 20 53 6B 6F 6C 65 2C > o=Vedb..k Skole, > 001D : 63 3D 64 6B __ __ __ __ __ __ __ __ __ __ __ __ c=dk > > 0021 30 377: SEQUENCE { > 0025 30 33: SEQUENCE { > 0027 04 4: STRING = 'mail' > 002D 31 25: SET { > 002F 04 23: STRING = 'ved...@po...' > 0048 : } > 0048 : } > 0048 30 52: SEQUENCE { > 004A 04 11: STRING = 'objectClass' > 0057 31 37: SET { > 0059 04 3: STRING = 'top' > 005E 04 12: STRING = 'organization' > 006C 04 16: STRING = 'snetOrganization' > 007E : } > 007E : } > 007E 30 31: SEQUENCE { > 0080 04 6: STRING = 'street' > 0088 31 21: SET { > 008A 04 19: STRING = 'Henriksholms Alle 2' > 009F : } > 009F : } > 009F 30 20: SEQUENCE { > 00A1 04 1: STRING = 'o' > 00A4 31 15: SET { > 00A6 04 13: STRING > 00A8 : 56 65 64 62 C3 A6 6B 20 53 6B 6F 6C 65 __ __ > __ Vedb..k Skole > 00B5 : } > 00B5 : } > 00B5 30 26: SEQUENCE { > 00B7 04 13: STRING = 'postalAddress' > 00C6 31 9: SET { > 00C8 04 7: STRING > 00CA : 56 65 64 62 C3 A6 6B __ __ __ __ __ __ __ __ > __ Vedb..k > 00D1 : } > 00D1 : } > 00D1 30 20: SEQUENCE { > 00D3 04 10: STRING = 'postalCode' > 00DF 31 6: SET { > 00E1 04 4: STRING = '2950' > 00E7 : } > 00E7 : } > 00E7 30 29: SEQUENCE { > 00E9 04 15: STRING = 'telephoneNumber' > 00FA 31 10: SET { > 00FC 04 8: STRING = '45893355' > 0106 : } > 0106 : } > 0106 30 38: SEQUENCE { > 0108 04 24: STRING = 'facsimileTelephoneNumber' > 0122 31 10: SET { > 0124 04 8: STRING = '45893350' > 012E : } > 012E : } > 012E 30 33: SEQUENCE { > 0130 04 21: STRING = 'snetInstitutionNumber' > 0147 31 8: SET { > 0149 04 6: STRING = '181007' > 0151 : } > 0151 : } > 0151 30 28: SEQUENCE { > 0153 04 19: STRING = 'snetInstitutionType' > 0168 31 5: SET { > 016A 04 3: STRING = '121' > 016F : } > 016F : } > 016F 30 45: SEQUENCE { > 0171 04 12: STRING = 'snetHomePage' > 017F 31 29: SET { > 0181 04 27: STRING = 'http://www.vedbaekskole.dk/' > 019E : } > 019E : } > 019E : } > 019E : } > 019E : } > Net::LDAP=HASH(0x80cd61c) received: > 0000 30 51: SEQUENCE { > 0002 02 1: INTEGER = 2 > 0005 65 7: [APPLICATION 5] { > 0007 0A 1: ENUM = 11 > 000A 04 0: STRING = '' > 000C 04 0: STRING = '' > 000E : } > 000E A0 37: [CONTEXT 0] { > 0010 30 35: SEQUENCE { > 0012 04 22: STRING = '1.2.840.113556.1.4.319' > 002A 04 9: STRING > 002C : 30 07 02 01 00 04 02 33 30 __ __ __ __ __ __ __ > 0......30 > 0035 : } > 0035 : } > 0035 : } > decode error at /usr/lib/perl5/site_perl/5.005/Convert/ASN1/_decode.pm > line 63 > -- > > Per Møgelhøj > > UNI-C > Vermundsgade 5 > DK 2100 Kbn Ø > > Phone: +45 35 87 88 63 > Fax: +45 35 87 88 90 > Email: Per...@un... > > > > |