Menu
▾
▴
Re: NEW: chasing referrals
|
From: Roland S. <rol...@ep...> - 2001-04-23 12:04:34
|
Hi!
Graham Barr wrote:
> Ah, OK. Try this patch to Net::LDAP::Search
OK, let's see...
this code:
-----
@referrals = $mesg->referrals;
foreach $ref (@referrals) {
print "Referral: ",$ref,"\n";
}
@references = $mesg->references;
foreach $ref (@references) {
print "Reference: ",$ref,"\n";
}
-----
produces:
-----
Reference: ldap://deledda/c=us,o=epigenomics
-----
So what's the difference between reference and referral?
(debug:)
-----
Net::LDAP=HASH(0x80f1538) sending:
30 26 02 01 01 60 21 02 01 03 04 16 63 6E 3D 61 0&...`!.....cn=a
64 6D 69 6E 2C 6F 3D 65 70 69 67 65 6E 6F 6D 69 dmin,o=epigenomi
63 73 80 04 6D 79 70 77 __ __ __ __ __ __ __ __ cs..mypw
0000 30 38: SEQUENCE {
0002 02 1: INTEGER = 1
0005 60 33: [APPLICATION 0] {
0007 02 1: INTEGER = 3
000A 04 22: STRING = 'cn=admin,o=epigenomics'
0022 80 4: [CONTEXT 0]
0024 : 6D 79 70 77 __ __ __ __ __ __ __ __ __ __ __ __ mypw
0028 : }
0028 : }
Net::LDAP=HASH(0x80f1538) received:
30 0C 02 01 01 61 07 0A 01 00 04 00 04 00 __ __ 0....a........
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(0x80f1538) sending:
30 29 02 01 02 63 24 04 0D 6F 3D 65 70 69 67 65 0)...c$..o=epige
6E 6F 6D 69 63 73 0A 01 02 0A 01 03 02 01 00 02 nomics..........
01 00 01 01 00 87 02 63 6E 30 00 __ __ __ __ __ .......cn0.
0000 30 41: SEQUENCE {
0002 02 1: INTEGER = 2
0005 63 36: [APPLICATION 3] {
0007 04 13: STRING = 'o=epigenomics'
0016 0A 1: ENUM = 2
0019 0A 1: ENUM = 3
001C 02 1: INTEGER = 0
001F 02 1: INTEGER = 0
0022 01 1: BOOLEAN = FALSE
0025 87 2: [CONTEXT 7]
0027 : 63 6E __ __ __ __ __ __ __ __ __ __ __ __ __ __ cn
0029 30 0: SEQUENCE {
002B : }
002B : }
002B : }
Net::LDAP=HASH(0x80f1538) received:
30 70 02 01 02 64 6B 04 16 63 6E 3D 61 64 6D 69 0p...dk..cn=admi
6E 2C 6F 3D 65 70 69 67 65 6E 6F 6D 69 63 73 30 n,o=epigenomics0
51 30 17 04 0B 6F 62 6A 65 63 74 43 6C 61 73 73 Q0...objectClass
31 08 04 06 70 65 72 73 6F 6E 30 16 04 0C 75 73 1...person0...us
65 72 50 61 73 73 77 6F 72 64 31 06 04 04 6D 79 erPassword1...my
70 77 30 0D 04 02 63 6E 31 07 04 05 61 64 6D 69 pw0...cn1...admi
6E 30 0F 04 02 73 6E 31 09 04 07 4A 61 63 6B 73 n0...sn1...Jacks
6F 6E __ __ __ __ __ __ __ __ __ __ __ __ __ __ on
0000 30 112: SEQUENCE {
0002 02 1: INTEGER = 2
0005 64 107: [APPLICATION 4] {
0007 04 22: STRING = 'cn=admin,o=epigenomics'
001F 30 81: SEQUENCE {
0021 30 23: SEQUENCE {
0023 04 11: STRING = 'objectClass'
0030 31 8: SET {
0032 04 6: STRING = 'person'
003A : }
003A : }
003A 30 22: SEQUENCE {
003C 04 12: STRING = 'userPassword'
004A 31 6: SET {
004C 04 4: STRING = 'mypw'
0052 : }
0052 : }
0052 30 13: SEQUENCE {
0054 04 2: STRING = 'cn'
0058 31 7: SET {
005A 04 5: STRING = 'admin'
0061 : }
0061 : }
0061 30 15: SEQUENCE {
0063 04 2: STRING = 'sn'
0067 31 9: SET {
0069 04 7: STRING = 'Jackson'
0072 : }
0072 : }
0072 : }
0072 : }
0072 : }
Net::LDAP=HASH(0x80f1538) received:
30 74 02 01 02 64 6F 04 18 63 6E 3D 75 70 64 61 0t...do..cn=upda
74 65 64 2C 6F 3D 65 70 69 67 65 6E 6F 6D 69 63 ted,o=epigenomic
73 30 53 30 17 04 0B 6F 62 6A 65 63 74 43 6C 61 s0S0...objectCla
73 73 31 08 04 06 70 65 72 73 6F 6E 30 16 04 0C ss1...person0...
75 73 65 72 50 61 73 73 77 6F 72 64 31 06 04 04 userPassword1...
6D 79 70 77 30 0F 04 02 63 6E 31 09 04 07 75 70 mypw0...cn1...up
64 61 74 65 64 30 0F 04 02 73 6E 31 09 04 07 75 dated0...sn1...u
70 64 61 74 65 64 __ __ __ __ __ __ __ __ __ __ pdated
0000 30 116: SEQUENCE {
0002 02 1: INTEGER = 2
0005 64 111: [APPLICATION 4] {
0007 04 24: STRING = 'cn=updated,o=epigenomics'
0021 30 83: SEQUENCE {
0023 30 23: SEQUENCE {
0025 04 11: STRING = 'objectClass'
0032 31 8: SET {
0034 04 6: STRING = 'person'
003C : }
003C : }
003C 30 22: SEQUENCE {
003E 04 12: STRING = 'userPassword'
004C 31 6: SET {
004E 04 4: STRING = 'mypw'
0054 : }
0054 : }
0054 30 15: SEQUENCE {
0056 04 2: STRING = 'cn'
005A 31 9: SET {
005C 04 7: STRING = 'updated'
0065 : }
0065 : }
0065 30 15: SEQUENCE {
0067 04 2: STRING = 'sn'
006B 31 9: SET {
006D 04 7: STRING = 'updated'
0076 : }
0076 : }
0076 : }
0076 : }
0076 : }
Net::LDAP=HASH(0x80f1538) received:
30 28 02 01 02 73 23 04 21 6C 64 61 70 3A 2F 2F 0(...s#.!ldap://
64 65 6C 65 64 64 61 2F 63 3D 75 73 2C 6F 3D 65 deledda/c=us,o=e
70 69 67 65 6E 6F 6D 69 63 73 __ __ __ __ __ __ pigenomics
0000 30 40: SEQUENCE {
0002 02 1: INTEGER = 2
0005 73 35: [APPLICATION 19] {
0007 04 33: STRING = 'ldap://deledda/c=us,o=epigenomics'
002A : }
002A : }
Net::LDAP=HASH(0x80f1538) received:
30 5C 02 01 02 64 57 04 18 63 6E 3D 6F 6E 65 6D 0\...dW..cn=onem
6F 72 65 2C 6F 3D 65 70 69 67 65 6E 6F 6D 69 63 ore,o=epigenomic
73 30 3B 30 17 04 0B 6F 62 6A 65 63 74 43 6C 61 s0;0...objectCla
73 73 31 08 04 06 70 65 72 73 6F 6E 30 0F 04 02 ss1...person0...
63 6E 31 09 04 07 6F 6E 65 6D 6F 72 65 30 0F 04 cn1...onemore0..
02 73 6E 31 09 04 07 6F 6E 65 6D 6F 72 65 __ __ .sn1...onemore
0000 30 92: SEQUENCE {
0002 02 1: INTEGER = 2
0005 64 87: [APPLICATION 4] {
0007 04 24: STRING = 'cn=onemore,o=epigenomics'
0021 30 59: SEQUENCE {
0023 30 23: SEQUENCE {
0025 04 11: STRING = 'objectClass'
0032 31 8: SET {
0034 04 6: STRING = 'person'
003C : }
003C : }
003C 30 15: SEQUENCE {
003E 04 2: STRING = 'cn'
0042 31 9: SET {
0044 04 7: STRING = 'onemore'
004D : }
004D : }
004D 30 15: SEQUENCE {
004F 04 2: STRING = 'sn'
0053 31 9: SET {
0055 04 7: STRING = 'onemore'
005E : }
005E : }
005E : }
005E : }
005E : }
Net::LDAP=HASH(0x80f1538) received:
30 0C 02 01 02 65 07 0A 01 00 04 00 04 00 __ __ 0....e........
0000 30 12: SEQUENCE {
0002 02 1: INTEGER = 2
0005 65 7: [APPLICATION 5] {
0007 0A 1: ENUM = 0
000A 04 0: STRING = ''
000C 04 0: STRING = ''
000E : }
000E : }
Net::LDAP=HASH(0x80f1538) sending:
30 05 02 01 03 42 00 __ __ __ __ __ __ __ __ __ 0....B.
0000 30 5: SEQUENCE {
0002 02 1: INTEGER = 3
0005 42 0: [APPLICATION 2]
0007 : }
Bind result: 0, Message: Success
LDAP Version: 3
Search:
Reference: ldap://deledda/c=us,o=epigenomics
Return code: 0
Error message: "Success"
Number of Entries: 3
dn: cn=admin,o=epigenomics
dn: cn=updated,o=epigenomics
dn: cn=onemore,o=epigenomics
-----
bye,
--
Roland Stigge
Epigenomics AG Kastanienallee 24
www.epigenomics.com 10435 Berlin
|
