1 <?php
4 /* All available record types
5 */
6 $RecordTypes['aRecord'] = "aRecord";
7 $RecordTypes['mDRecord'] = "mDRecord";
8 $RecordTypes['mXRecord'] = "mXRecord";
9 $RecordTypes['nSRecord'] = "nSRecord";
10 $RecordTypes['pTRRecord'] = "relativeDomainName";
11 $RecordTypes['hInfoRecord'] = "hInfoRecord";
12 $RecordTypes['mInfoRecord'] = "mInfoRecord";
13 $RecordTypes['cNAMERecord'] = "relativeDomainName";
14 $RecordTypes['tXTRecord'] = "tXTRecord";
15 $RecordTypes['aFSDBRecord'] = "aFSDBRecord";
16 $RecordTypes['SigRecord'] = "SigRecord";
17 $RecordTypes['KeyRecord'] = "KeyRecord";
18 $RecordTypes['aAAARecord'] = "aAAARecord";
19 $RecordTypes['LocRecord'] = "LocRecord";
20 $RecordTypes['nXTRecord'] = "nXTRecord";
21 $RecordTypes['sRVRecord'] = "sRVRecord";
22 $RecordTypes['nAPTRRecord'] = "nAPTRRecord";
23 $RecordTypes['kXRecord'] = "kXRecord";
24 $RecordTypes['certRecord'] = "certRecord";
25 $RecordTypes['a6Record'] = "a6Record";
26 $RecordTypes['dSRecord'] = "dSRecord";
27 $RecordTypes['sSHFPRecord'] = "sSHFPRecord";
28 $RecordTypes['rRSIGRecord'] = "rRSIGRecord";
29 $RecordTypes['nSECRecord'] = "nSECRecord";
32 /* Return all record types
33 */
34 function getDnsRecordTypes($ForZones = false)
35 {
36 global $RecordTypes;
37 if($ForZones){
38 $tmp = $RecordTypes;
39 unset($tmp['cNAMERecord']);
40 unset($tmp['pTRRecord']);
41 unset($tmp['tXTRecord']);
42 return($tmp);
43 }else{
44 return($RecordTypes);
45 }
46 }
49 /* This fucntion is used to flip the ip address, for example
50 12.3.45 -> 45.3.12
51 Because some entries (like zones) are store like that 45.3.12.in-addr.arpa
52 but we want to display 12.3.45.
53 */
54 function FlipIp($ip)
55 {
56 $tmp = array_reverse(split("\.",$ip));
57 $new = "";
58 foreach($tmp as $section){
59 $new .= $section.".";
60 }
61 return(preg_replace("/.$/","",$new));
62 }
65 /* This function returns the zones specified for given host
66 */
67 function getDNSZoneEntries($config,$HostDn,$silent = false)
68 {
69 global $RecordTypes;
71 $ldap = $config->get_ldap_link();
72 $ldap->cd($config->current['BASE']);
74 /* Not all records are allowed within a zone entry
75 */
76 $SkipRecords = array("tXTRecord","cNAMERecord","pTRRecord");
78 /* Special sOArecords
79 */
80 $sOAREcords = array("0"=>"sOAprimary","1"=>"sOAmail","2"=>"sOAserial","3"=>"sOArefresh","4"=>"sOAretry","5"=>"sOAexpire","6"=>"sOAttl");
82 /* Get host entry */
83 $ldap->cat($HostDn);
84 $host_attr = $ldap->fetch();
86 /* Create tempalte for all fetched zone Data
87 */
88 $ZoneBase = array();
89 $ZoneBase['exists'] = false;
90 $ZoneBase['RECORDS'] = array();
91 $ZoneBase['zoneName'] = array();
92 $ZoneBase['dNSClass'] = array();
94 foreach($sOAREcords as $attr){
95 $ZoneBase[$attr] = "";
96 }
98 $Zones = array();
100 /* Get & Parse all zone entries
101 */
102 $ldap->ls("(&(objectClass=dNSZone)(zoneName=*)(relativeDomainName=@))",$HostDn,array("*"));
103 $tmp_res = array();
104 while($attrs = $ldap->fetch()) {
105 $tmp_res[] = $attrs;
106 }
108 /* Parse fetched zones
109 */
110 foreach($tmp_res as $attrs){
112 $zoneName = strtoupper($host_attr['cn'][0])."/".$attrs['zoneName'][0];
113 $Zones[$zoneName] = $ZoneBase;
114 $Zones[$zoneName]['exists'] = true;
116 /* Set basic attributes
117 */
118 if(isset($attrs["dNSClass"][0])){
119 $Zones[$zoneName]["dNSClass"] = $attrs["dNSClass"][0];
120 }
122 /* Set initial zone name, to be able to detect if this entry was renamed
123 */
124 $Zones[$zoneName]['InitialzoneName'] = $zoneName;
125 $Zones[$zoneName]['zoneName'] = $zoneName;
127 /* Generate SOA entry
128 */
129 if(isset($attrs['sOARecord'][0])){
130 $tmp = split("\ ",$attrs['sOARecord'][0]) ;
131 $tmp2 = array();
133 /* Assign soa vars */
134 foreach($sOAREcords as $key => $name){
135 if(isset($tmp[$key])){
136 $Zones[$zoneName][$name] = $tmp[$key];
137 }else{
138 $Zones[$zoneName][$name] = "";
139 }
140 }
141 } // ENDE SOA Record
143 /* Get record attributes
144 */
145 foreach($RecordTypes as $name => $value){
147 /* Skip some attributes
148 */
149 if(in_array($name,$SkipRecords)) continue;
151 /* If there is a record attribute
152 */
153 if(isset($attrs[$name])){
155 /* get all entries
156 */
157 for($i = 0 ; $i < $attrs[$value]['count']; $i ++){
158 $Zones[$zoneName]['RECORDS'][] = array("type"=>$name,"value"=>$attrs[$value][$i]);
159 }
160 }
161 }
163 /* Get reverse record ..
164 */
165 $ldap->ls("(&(objectClass=dNSZone)(relativeDomainName=@)(zoneName=*))",$attrs['dn'],array("zoneName"));
167 if($ldap->count() == 0){
168 if(!$silent){
169 print_red(sprintf(_("Can't find reverse zone for dns zone '%s'. Aborting parsing this zone."),$zoneName));
170 }
171 unset($Zones[$zoneName]);
172 }elseif($ldap->count()>1){
173 if(!$silent){
174 print_red(sprintf(_("Found more than one reverse zone for dns zone '%s'. Aborting parsing this zone."),$zoneName));
175 }
176 unset($Zones[$zoneName]);
177 }else{
178 $tmp = $ldap->fetch();
179 $Zones[$zoneName]['ReverseZone'] = strtoupper($host_attr['cn'][0])."/".FlipIp(str_replace(".in-addr.arpa","",$tmp['zoneName'][0]));
180 $Zones[$zoneName]['InitialReverseZone'] = strtoupper($host_attr['cn'][0])."/".FlipIp(str_replace(".in-addr.arpa","",$tmp['zoneName'][0]));
181 }
182 }
183 return($Zones);
184 }
187 /* This function compares two dns zone objects and returns an
188 * array with following indexes
189 * - delete, for dns which must be deleted (only if dns zone is removed)
190 * - rename, if a dn must be renamed, for example, the zoneName has changed
191 * - add, if there is a new dns account created
192 */
193 function getDNSZoneEntriesDiff($config,$newZones,$HostDn)
194 {
195 $oldZones = getDNSZoneEntries($config,$HostDn,true);
197 $sOAattributes = array("sOAprimary","sOAmail","sOAserial","sOArefresh","sOAretry","sOAexpire","sOAttl");
199 $move = array();
200 $add = array();
201 $del = array();
203 /* Generate a template for zones with default values
204 */
205 $zoneBase = array();
206 $zoneBase['objectClass'] = array("top","dNSZone");
207 $zoneBase['zoneName'] = "";
208 $zoneBase['relativeDomainName'] = "@";
209 $zoneBase['dNSClass'] = "IN";
210 $zoneBase['sOARecord'] = "";
212 /* Contains all renamed zoneNames
213 * For zone entry udpdates
214 */
215 $PrePareZoneEntries = array();
217 /* Walk through all zones and detect renamed/added/deleted zones ...
218 */
219 foreach($newZones as $name => $zone){
221 /* This zone was renamed
222 */
223 if((!empty($zone['InitialzoneName'])) && ($zone['InitialzoneName'] != $zone['zoneName'])){
225 /* Move old zone to new position
226 */
227 $oldDn = "zoneName=".getNameFromMix($zone['InitialzoneName']).",".$HostDn;
228 $newDn = "zoneName=".getNameFromMix($zone['zoneName']).",".$HostDn;
229 $PrePareZoneEntries[$zone['InitialzoneName']] = getNameFromMix($zone['zoneName']);
230 $move [$oldDn] = $newDn;
231 }
233 /* Get old zone if available
234 */
235 $oldZone=array();
236 if(!empty($oldZones[$zone['InitialzoneName']])){
237 $oldZone = $oldZones[$zone['InitialzoneName']];
238 }
240 /* Create forward zone entry and put it in our add queue
241 */
242 $newDn = "zoneName=".getNameFromMix($zone['zoneName']).",".$HostDn;
243 $obj = $zoneBase;
244 $obj['zoneName'] = getNameFromMix($zone['zoneName']);
246 /* Create sOARecord & add it to the obj
247 */
248 $soa = "";
249 foreach($sOAattributes as $attr){
250 $soa.=" ".$zone[$attr];
251 }
252 $obj['sOARecord'] = trim($soa);
253 $obj['nSRecord'] = $zone['sOAprimary'];
255 /* If reverse zone was renamed, move entry
256 */
257 if(!empty($zone['InitialReverseZone'])){
258 if($zone['InitialReverseZone'] != $zone['ReverseZone']){
259 $base = "zoneName=".getNameFromMix($zone['zoneName']).",".$HostDn;
260 $oldRDn = "zoneName=". FlipIp(getNameFromMix($zone['InitialReverseZone'])).".in-addr.arpa,".$base;
261 $newRDn = "zoneName=". FlipIp(getNameFromMix($zone['ReverseZone'])).".in-addr.arpa,".$base;
262 $PrePareZoneEntries[FlipIp($zone['InitialReverseZone']).".in-addr.arpa"] = FlipIp($zone['ReverseZone']).".in-addr.arpa";
263 $move [$oldRDn] = $newRDn;
264 }
265 }
267 /* Append record entries
268 * Set old value to array, to ensure that
269 * they will be deleted if necessary
270 */
271 if(isset($oldZone['RECORDS'])){
272 foreach($oldZone['RECORDS'] as $rec){
273 $obj[$rec['type']] = array();
274 }
275 }
277 /* Add new Records
278 */
279 foreach($zone['RECORDS'] as $rec){
280 if(!isset($obj[$rec['type']])||!is_array($obj[$rec['type']])){
281 $obj[$rec['type']] = array();
282 }
283 $obj[$rec['type']][] = $rec['value'];
284 }
286 /* Append udpated Zone Forward Entry to our add queue
287 */
288 $add[$newDn] = $obj;
290 /* Create Reverse Entry
291 * And append it to our add queue
292 */
293 $zone['ReverseZone'] = FlipIp(getNameFromMix($zone['ReverseZone'])).".in-addr.arpa";
294 $base = "zoneName=".getNameFromMix($zone['zoneName']).",".$HostDn;
295 $newRDn = "zoneName=".$zone['ReverseZone'].",".$base;
296 $rObj = $obj;
297 $rObj['zoneName']= $zone['ReverseZone'];
298 $add[$newRDn] = $rObj;
300 /* Remove currently managed zone from oldZones.
301 * this gives us the ability to detect removed zones
302 */
303 if(isset($oldZones[$zone['InitialzoneName']])){
304 unset($oldZones[$zone['InitialzoneName']]);
305 }
306 }
308 /* The rest of our oldZones must be deleted
309 * because they are no longer available in newZones anymore.
310 */
311 foreach($oldZones as $zone) {
312 $oldDn = "zoneName=".getNameFromMix($zone['InitialzoneName']).",".$HostDn;
313 $del[$oldDn] = $zone;
314 }
316 /* Check for entries which must be updated
317 */
318 $zoneUpdates = array();
319 $udpate = array();
320 if(count($PrePareZoneEntries)){
321 $ldap = $config->get_ldap_link();
322 foreach($PrePareZoneEntries as $FromZoneName => $ToZoneName){
323 $ldap->cd($HostDn);
324 $ldap->search("(&(objectClass=dNSZone)(zoneName=".getNameFromMix($FromZoneName).")(!(relativeDomainName=@)))",array("zoneName"));
325 while($attrs = $ldap->fetch()){
326 $zoneUpdates[$attrs['dn']] = array("zoneName"=>$ToZoneName);
327 }
328 }
329 }
331 $ret = array("del" => $del , "move" => $move , "add" => $add,"zoneUpdates"=>$zoneUpdates);
332 return($ret);
333 }
336 /* This function returns the dns-host eintries for given
337 * name.
338 */
339 function getDNSHostEntries($config,$name,$silent = false)
340 {
341 global $RecordTypes;
343 $types = array();
344 $ret = array();
345 $ret['RECORDS'] = array();
346 $ret['dNSClass'] = "IN";
347 $ret['zoneName'] = "";
348 $ret['dNSTTL'] = "7440";
349 $ret['exists'] = false;
351 $ldap = $config->get_ldap_link();
352 $ldap->cd($config->current['BASE']);
354 /* First check all zones for an entry with the given name.
355 * If the name occurs in more than one entry alert the user ...
356 */
357 $foundIn = array();
358 $zones = getAvailableZones($config);
360 $zonesArr = array();
361 foreach($zones as $zoneMix){
362 $zoneIndex = split("/",$zoneMix);
363 if(!array_key_exists($zoneIndex[0],$zonesArr)) {
364 $zonesArr[$zoneIndex[0]] = array();
365 }
366 array_push($zonesArr[$zoneIndex[0]],$zoneIndex[1]);
367 }
369 foreach($zonesArr as $nameServer => $nameServerArr){
370 $foundInTmp = array();
371 foreach($nameServerArr as $zoneArr => $zone){
372 $zoneMix = $nameServer."/".$zone;
373 $zoneDn = getDNSZoneDN($config,$zoneMix);
374 $ldap->ls("(&(objectClass=dNSZone)(zoneName=*)(relativeDomainName=".$name.")(!(relativeDomainName=@)))", $zoneDn,$attrs = array("*"));
375 while($attrs = $ldap->fetch()){
376 $foundInTmp [$zoneMix] = $attrs['dn'];
377 $foundIn [$zoneMix] = $attrs['dn'];
378 }
379 }
380 }
382 /* No zone found which contains an entry for us
383 */
384 if(count($foundIn) == 0){
385 return($ret);
386 }
388 /* Get host informations from zone
389 */
390 $id_tmp = key($foundIn);
391 $ldap->cd($foundIn[$id_tmp]);
392 $ldap->search("(&(objectClass=dNSZone)(zoneName=*)(!(relativeDomainName=@)))",array("*"));
393 while($attrs = $ldap->fetch()){
395 /* If relative domainname == cn
396 * Try to read dnsclass / TTl / zone
397 */
398 if($attrs['relativeDomainName'][0] == $name){
399 $ret['exists'] = true;
400 $ret['zoneName'] = $id_tmp;
401 foreach(array("dNSClass","dNSTTL") as $atr){
402 if(isset($attrs[$atr][0])){
403 $ret[$atr] = $attrs[$atr][0];
404 }
405 }
406 }
408 /* Create list with all used records */
409 foreach($RecordTypes as $name => $value){
411 /* If there is a record attribute */
412 if(isset($attrs[$name])){
414 /* get all entries */
415 for($i = 0 ; $i < $attrs[$value]['count']; $i ++){
416 $types[] = array( "type" => $name,
417 "value" => $attrs[$value][$i]);
418 }
419 }
420 }
421 $ret['RECORDS'] = $types;
422 }
423 return($ret);
424 }
428 /* This function compares two dns settings and returns an
429 * array with following indexes
430 * - delete, for dns which must be deleted (only if dns account is removed)
431 * - rename, if a dn must be renamed, for example, the relativeDomainName has changed
432 * - add, if there is a new dns account created
433 */
434 function getDNSHostEntriesDiff($config,$oldName,$newEntry,$newName)
435 {
436 global $RecordTypes;
438 $oldEntry = getDNSHostEntries($config,$oldName);
440 $add = array();
441 $del = array();
442 $move = array();
444 $zones = getAvailableZones($config);
445 $specialAttributes = array("cNAMERecord","pTRRecord");
446 $newRecords = array(); // Used to remember which records are removed
447 $zoneNameMix = $newEntry['zoneName'];
448 $zoneDn = getDNSZoneDN($config,$zoneNameMix);
449 $tmp = array_flip($zones);
450 $zoneName = getNameFromMix($zoneNameMix);
452 /* If reverseZone can't be resolved ... this
453 * can't be a valid entry, so remove this account
454 */
455 if(isset($tmp[$zoneNameMix])){
456 $reverseNameMix = $tmp[$zoneNameMix];
457 $reverseDn = getDNSZoneDN($config,$reverseNameMix);
458 if(empty($reverseDn)){
459 $newEntry['exists'] = false;
460 }
461 }else{
462 $newEntry['exists'] = false;
463 }
465 /* Don't go further if there is nothing to do
466 * Is no account / was no account
467 */
468 if(($newEntry['exists'] == false )&& ($oldEntry['exists'] == false)){
469 return(array("move"=>$move,"add"=>$add,"del"=>$del));
470 }
472 /* If account was edited prepare some
473 * attributes & arrays ... if required add some
474 * dns to $move
475 */
476 if($oldEntry['exists']){
478 /* Check if the account was removed
479 */
480 if($newEntry['exists'] == false){
481 $dn = "relativeDomainName=".$oldName.",".getDNSZoneDN($config,$oldEntry['zoneName']);
482 $del[$dn] ="";
483 return(array("move"=>$move,"add"=>$add,"del"=>$del));
484 }
486 /* Check if zoneName has changed
487 */
488 if(count($newEntry['RECORDS'])){
489 if($oldEntry['zoneName'] != $newEntry['zoneName']){
490 $oldzoneDn = getDNSZoneDN($config,$oldEntry['zoneName']);
491 $dn = "relativeDomainName=".$oldName.",".$oldzoneDn;
492 $dn2= "relativeDomainName=".$oldName.",".$zoneDn;
493 $move[$dn]=$dn2;
494 }
496 /* Check if host name has changed
497 */
498 if($oldName != $newName){
499 $dn = "relativeDomainName=".$oldName.",".$zoneDn;
500 $dn2= "relativeDomainName=".$newName.",".$zoneDn;
501 $move[$dn]=$dn2;
502 $dn = "relativeDomainName=".$oldName.",".$dn2;
503 $dn2= "relativeDomainName=".$newName.",".$dn2;
504 $move[$dn]=$dn2;
505 }
506 }
508 /* Prepare record entries
509 * Fill old records with array();
510 * To ensure that they will be deleted if they stay unused
511 */
512 foreach($oldEntry['RECORDS'] as $id => $rec){
513 $newRecords[$rec['type']] = array();
514 }
515 }
517 /* There must be at least one record in our entry
518 */
519 if((!count($newEntry['RECORDS'])) || (!$newEntry['exists'])){
520 $dn = "relativeDomainName=".$newName.",".getDNSZoneDN($config,$oldEntry['zoneName']);
521 $del[$dn] ="";
522 $ret = array("move"=>$move,"add"=>$add,"del"=>$del);
523 return($ret);
524 }
526 /* Prepare temp obj
527 */
528 $baseObj = array();
529 $baseObj['objectClass'] = array("top","dNSZone");
530 $baseObj['dNSTTL'] = $newEntry['dNSTTL'];
531 $baseObj['dNSClass'] = $newEntry['dNSClass'];
532 $baseObj['zoneName'] = $zoneName;
533 $baseObj['relativeDomainName']= $newName;
535 /* Add Container Object to zone
536 * (this possibly already exists, check this before writing to ldap)
537 */
538 $baseDn = "relativeDomainName=".$newName.",".$zoneDn;
539 $add[$baseDn] = $baseObj;
541 /* Add base obejct which contains all std records
542 */
543 $stdDn = "relativeDomainName=".$newName.",".$baseDn;
544 $add[$stdDn] = $baseObj;
546 /* Set defaults. Normaly only contains old record names.
547 * The old names will be set to array, to ensure that they will be deleted.
548 * Or overwritten and filled with new values.
549 */
550 foreach($newRecords as $name => $def){
551 if(!in_array($name,$specialAttributes)){
552 $add[$stdDn][$name] = $def;
553 }
554 }
556 /* Delete all OLD special attributes.
557 */
558 foreach($oldEntry['RECORDS'] as $id => $rec){
559 if(in_array($rec['type'],$specialAttributes)){
560 $deldn= "relativeDomainName=".$rec['value'].",".$baseDn;
561 $del[$deldn] = "";
562 }
563 }
566 /* Create new record entries
567 */
568 foreach($newEntry['RECORDS'] as $id => $rec){
569 /* Create object which contains special records
570 * like pTRRecord or CNAMERecord
571 */
572 if($rec['type'] == "pTRRecord"){
573 $PTRdn= "relativeDomainName=".FlipIP($rec['value']).",".$baseDn;
574 $ptrObj = $baseObj;
575 $reverseName = getNameFromMix($reverseNameMix);
576 $ptrObj['zoneName'] = $reverseName;
577 if(!preg_match("/\.$/",$newName)){
578 $ptrObj['pTRRecord'] = preg_replace("/\.\.$/",".",$newName.".".$zoneName.".");
579 }else{
580 $ptrObj['pTRRecord'] = preg_replace("/\.\.$/",".",$newName.".");
581 }
582 $ptrObj['relativeDomainName'] = FlipIP($rec['value']);
584 $add[$PTRdn] = $ptrObj;
585 }else
586 if($rec['type'] == "cNAMERecord"){
587 $PTRdn= "relativeDomainName=".$rec['value'].",".$baseDn;
588 $ptrObj = $baseObj;
589 $ptrObj['zoneName'] = $zoneName;
590 $ptrObj['cNAMERecord'] = $newName;
591 $ptrObj['relativeDomainName'] = $rec['value'];
593 $add[$PTRdn] = $ptrObj;
594 }else{
595 /* Append basic attributes
596 */
597 $add[$stdDn][$rec['type']][] = $rec['value'];
598 }
599 } // foreach record
601 $ret = array("move"=>$move,"add"=>$add,"del"=>$del);
602 return($ret);
603 }
605 function getNameFromMix($zoneMix){
606 $ret = "";
607 if(!strstr($zoneMix, '/')) return($ret);
608 $zoneIndex = split("/",$zoneMix);
609 return($zoneIndex[1]);
610 }
612 /* returns the dn for a specified zone
613 */
614 function getDNSZoneDN($config,$zoneNameMix)
615 {
616 $ret = "";
617 if(!strstr($zoneNameMix, '/')) {
618 print_red(sprintf(_("Undefined zone name '%s'. Zone name must look like this 'server/zone.com'."),$zoneNameMix));
619 return($ret);
620 }
622 $zoneNameIndex = split("/",$zoneNameMix);
623 $zoneName = $zoneNameIndex[1];
624 $nameServer = strtolower($zoneNameIndex[0]);
625 $ldap = $config->get_ldap_link();
627 /* search for the nameserver */
628 $ldap-> cd($config->current['BASE']);
629 $ldap->search("(&(objectClass=goServer)(cn=".$nameServer."))",array("cn"));
630 if($ldap->count()){
631 $attr = $ldap->fetch();
632 } else {
633 return($ret);
634 }
636 $ldap-> cd($attr['dn']);
637 $ldap->search("(&(objectClass=dNSZone)(sOARecord=*)(zoneName=".$zoneName."))",array("zoneName"));
638 if($ldap->count()){
639 $attr = $ldap->fetch();
640 return($attr['dn']);
641 }
643 return($ret);
644 }
647 /* returns all available zones
648 * array[reverseName] = zoneName;
649 */
650 function getAvailableZones($config)
651 {
652 $ret = array();
653 $ldap = $config->get_ldap_link();
654 $ldap->cd ($config->current['BASE']);
656 /* Search for zones ...
657 */
658 $ldap->search("(&(objectClass=dNSZone)(sOARecord=*))",array("zoneName"));
660 $ForwardZones = array();
661 $ReverseZones = array();
662 $zones = array();
664 while($at = $ldap->fetch()){
665 if(preg_match("/\.in\-addr\.arpa/",$at['zoneName'][0])){
666 $ReverseZones[$at['dn']] = $at;
667 }else{
668 $ForwardZones[$at['dn']] = $at;
669 }
670 }
672 foreach($ForwardZones as $dn => $obj){
674 /* try to find reverse
675 */
676 foreach($ReverseZones as $Rdn => $Robj ){
677 if(preg_match("/".$dn."/",$Rdn)){
678 $zones[strtoupper($ldap->getCn($dn))."/".$Robj['zoneName'][0]] =
679 strtoupper($ldap->getCn($dn))."/".$obj['zoneName'][0];
680 }
681 }
682 }
683 return($zones);
684 }
686 // vim:tabstop=2:expandtab:shiftwidth=2:filetype=php:syntax:ruler:
687 ?>