Code

A simple error message is enough here, since error messages during login are schown...
[gosa.git] / gosa-core / include / class_userinfo.inc
1 <?php
2 /*
3  * This code is part of GOsa (http://www.gosa-project.org)
4  * Copyright (C) 2003-2008 GONICUS GmbH
5  *
6  * ID: $$Id$$
7  *
8  * This program is free software; you can redistribute it and/or modify
9  * it under the terms of the GNU General Public License as published by
10  * the Free Software Foundation; either version 2 of the License, or
11  * (at your option) any later version.
12  *
13  * This program is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16  * GNU General Public License for more details.
17  *
18  * You should have received a copy of the GNU General Public License
19  * along with this program; if not, write to the Free Software
20  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
21  */
23 class userinfo
24 {
25   var $dn;
26   var $ip;
27   var $username;
28   var $cn;
29   var $uid;
30   var $restrictions= array();
31   var $gidNumber= -1;
32   var $language= "";
33   var $config;
34   var $gosaUnitTag= "";
35   var $subtreeACL= array();
36   var $ACL= array();
37   var $ocMapping= array();
38   var $groups= array();
39   var $result_cache =array();
40   var $ignoreACL = FALSE;
41   var $ACLperPath = array();
42   var $ACLperPath_usesFilter = array();
44   /* get acl's an put them into the userinfo object
45      attr subtreeACL (userdn:components, userdn:component1#sub1#sub2,component2,...) */
46   function userinfo(&$config, $userdn){
47     $this->config= &$config;
48     $ldap= $this->config->get_ldap_link();
49     $ldap->cat($userdn,array('sn', 'givenName', 'uid', 'gidNumber', 'preferredLanguage', 'gosaUnitTag', 'gosaLoginRestriction'));
50     $attrs= $ldap->fetch();
52     if (isset($attrs['givenName'][0]) && isset($attrs['sn'][0])){
53       $this->cn= $attrs['givenName'][0]." ".$attrs['sn'][0];
54     } else {
55       $this->cn= $attrs['uid'][0];
56     }
57     if (isset($attrs['gidNumber'][0])){
58       $this->gidNumber= $attrs['gidNumber'][0];
59     }
61     /* Restrictions? */
62     if (isset($attrs['gosaLoginRestriction'])){
63       $this->restrictions= $attrs['gosaLoginRestriction'];
64       unset($this->restrictions['count']);
65     }
67     /* Assign user language */
68     if (isset($attrs['preferredLanguage'][0])){
69       $this->language= $attrs['preferredLanguage'][0];
70     }
72     if (isset($attrs['gosaUnitTag'][0])){
73       $this->gosaUnitTag= $attrs['gosaUnitTag'][0];
74     }
76     $this->dn= $userdn;
77     $this->uid= $attrs['uid'][0];
78     $this->ip= $_SERVER['REMOTE_ADDR'];
80     $this->ignoreACL = ($this->config->get_cfg_value("ignoreAcl") == $this->dn);
82     /* Initialize ACL_CACHE */
83     $this->reset_acl_cache();
84   }
87   public function reset_acl_cache()
88   {
89     /* Initialize ACL_CACHE */
90     session::global_set('ACL_CACHE',array());
91   }
93   function loadACL()
94   {
95     $this->ACL= array();    
96     $this->groups= array();    
97     $this->result_cache =array();
98     $this->reset_acl_cache();
99     $ldap= $this->config->get_ldap_link();
100     $ldap->cd($this->config->current['BASE']);
102     /* Get member groups... */
103     $ldap->search("(&(objectClass=posixGroup)(memberUid=".$this->uid."))", array('dn'));
104     while ($attrs= $ldap->fetch()){
105       $this->groups[$attrs['dn']]= $attrs['dn'];
106     }
108     /* Crawl through ACLs and move relevant to the tree */
109     $ldap->search("(objectClass=gosaACL)", array('dn', 'gosaAclEntry'));
110     $aclp= array();
111     $aclc= array();
112     while ($attrs= $ldap->fetch()){
114       /* Insert links in ACL array */
115       $aclp[$attrs['dn']]= substr_count($attrs['dn'], ',');
116       $aclc[$attrs['dn']]= array();
117       $ol= array();
118       for($i= 0; $i<$attrs['gosaAclEntry']['count']; $i++){
119         $ol= array_merge($ol, @acl::explodeAcl($attrs['gosaAclEntry'][$i]));
120       }
121       $aclc[$attrs['dn']]= $ol;
122     }
124     /* Resolve roles here. 
125      */
126     foreach($aclc as $dn => $data){
127       foreach($data as $prio => $aclc_value)  {
128         if($aclc_value['type'] == "role"){
130           unset($aclc[$dn][$prio]);
132           $ldap->cat($aclc_value['acl'],array("gosaAclTemplate"));
133           $attrs = $ldap->fetch();
135           if(isset($attrs['gosaAclTemplate'])){
136             for($i= 0; $i<$attrs['gosaAclTemplate']['count']; $i++){
137               $tmp = @acl::explodeAcl($attrs['gosaAclTemplate'][$i]);  
139               foreach($tmp as $new_acl){
141                 /* Keep non role attributes here! */
142                 $new_acl['filter'] = $aclc_value['filter'];
143                 $new_acl['members'] = $aclc_value['members'];
144                 $aclc[$dn][] =$new_acl;
145               }
146             }      
147           }
148         }
149       }
150     }
152     /* ACL's read, sort for tree depth */
153     asort($aclp);
155     /* Sort in tree order */
156     foreach ($aclp as $dn => $acl){
157       /* Check if we need to keep this ACL */
158       foreach($aclc[$dn] as $idx => $type){
159         $interresting= FALSE;
160         
161         /* No members? This ACL rule is deactivated ... */
162         if (!count($type['members'])){
163           $interresting= FALSE; 
164         } else {
166           /* Inspect members... */
167           foreach ($type['members'] as $grp => $grpdsc){
169             /* Some group inside the members that is relevant for us? */
170             if (in_array_ics(@LDAP::convert(preg_replace('/^G:/', '', $grp)), $this->groups)){
171               $interresting= TRUE;
172             }
174             /* User inside the members? */
175             if (preg_replace('/^U:/', '', $grp) == $this->dn){
176               $interresting= TRUE;
177             }
179             /* Wildcard? */
180             if (preg_match('/^G:\*/',  $grp)){
181               $interresting= TRUE;
182             }
183           }
184         }
186         if ($interresting){
187           if (!isset($this->ACL[$dn])){
188             $this->ACL[$dn]= array();
189           }
190           $this->ACL[$dn][$idx]= $type;
191         }
192       }
193     }
195     /* Create an array which represenet all relevant permissions settings 
196         per dn.
198       The array will look like this:
199       
200       .     ['ou=base']        ['ou=base']          = array(ACLs);
201       .     
202       .     ['ou=dep1,ou=base']['ou=dep1,ou=base']  = array(ACLs);
203       .                        ['ou=base']          = array(ACLs);
206       For object located in 'ou=dep1,ou=base' we have to both ACLs,
207        for objects in 'ou=base' we only have to apply on ACL.
208      */
209     $without_self_acl = $all_acl = array();
210     foreach($this->ACL as $dn => $acl){
211       $sdn =$dn;
212       $first= TRUE; // Run at least once 
213       while(strpos($dn,",") !== FALSE || $first){
214         $first = FALSE;
215         if(isset($this->ACL[$dn])){
216           $all_acl[$sdn][$dn] = $this->ACL[$dn];
217           $without_self_acl[$sdn][$dn] = $this->ACL[$dn]; 
218           foreach($without_self_acl[$sdn][$dn] as $acl_id => $acl_set){
219   
220             /* Remember which ACL set has speicial user filter 
221              */
222             if(isset($acl_set['filter']{1})){
223               $this->ACLperPath_usesFilter[$sdn] = TRUE;
224             }
225           
226             /* Remove all acl entries which are especially for the current user (self acl)
227              */
228             foreach($acl_set['acl'] as $object => $object_acls){
229               if(isset($object_acls[0]) && strpos($object_acls[0],"s")){
230                 unset($without_self_acl[$sdn][$dn][$acl_id]['acl'][$object]);
231               }
232             }
233           }
234         }
235         $dn = preg_replace("/^[^,]*+,/","",$dn);
236       }
237     } 
238     $this->ACLperPath =$without_self_acl;
240     /* Append Self entry */
241     $dn = $this->dn;
242     while(strpos($dn,",") && !isset($all_acl[$dn])){
243       $dn = preg_replace("/^[^,]*+,/","",$dn);
244     }
245     if(isset($all_acl[$dn])){
246       $this->ACLperPath[$this->dn] = $all_acl[$dn];
247     }
248   }
251   /* Returns an array containing all target objects we've permssions on.
252    */
253   function get_acl_target_objects()
254   {
255     return(array_keys($this->ACLperPath));
256   }
257   
259   function get_category_permissions($dn, $category, $any_acl = FALSE)
260   {
261     return($this->get_permissions($dn,$category.'/0',""));
262   }
264   
265   /*! \brief Check if the given object (dn) is copyable
266       @param  String The object dn 
267       @param  String The acl  category (e.g. users) 
268       @param  String The acl  class (e.g. user) 
269       @return Boolean   TRUE if the given object is copyable else FALSE 
270   */
271   function is_copyable($dn, $object, $class)
272   {
273     return(preg_match("/r/",$this->has_complete_category_acls($dn, $object)));
274   }
277   /*! \brief Check if the given object (dn) is cutable
278       @param  String The object dn 
279       @param  String The acl  category (e.g. users) 
280       @param  String The acl  class (e.g. user) 
281       @return Boolean   TRUE if the given object is cutable else FALSE 
282   */
283   function is_cutable($dn, $object, $class)
284   {
285     $remove = preg_match("/d/",$this->get_permissions($dn,$object."/".$class));
286     $read   = preg_match("/r/",$this->has_complete_category_acls($dn, $object));
287     return($remove && $read);
288   }
291   /*! \brief  Checks if we are allowed to paste an object to the given destination ($dn)
292       @param  String The destination dn 
293       @param  String The acl  category (e.g. users) 
294       @param  String The acl  class (e.g. user) 
295       @return Boolean   TRUE if we are allowed to paste an object.
296   */
297   function is_pasteable($dn, $object)
298   {
299     return(preg_match("/w/",$this->has_complete_category_acls($dn, $object)));
300   }
303   /*! \brief  Checks if we are allowed to restore a snapshot for the given dn.
304       @param  String The destination dn 
305       @param  String The acl  category (e.g. users) 
306       @return Boolean   TRUE if we are allowed to restore a snapshot.
307   */
308   function allow_snapshot_restore($dn, $object)
309   {
310     if(!is_array($object)){
311       $object = array($object);
312     }
313     $r = $w = TRUE;
314     foreach($object as $category){
315       $w &= preg_match("/w/",$this->has_complete_category_acls($dn, $category));
316       $r &= preg_match("/r/",$this->has_complete_category_acls($dn, $category));
317     }
318     return($r && $w ); 
319   }  
322   /*! \brief  Checks if we are allowed to create a snapshot of the given dn.
323       @param  String The source dn 
324       @param  String The acl category (e.g. users) 
325       @return Boolean   TRUE if we are allowed to restore a snapshot.
326   */
327   function allow_snapshot_create($dn, $object)
328   {
329     if(!is_array($object)){
330       $object = array($object);
331     }
332     $r = TRUE;
333     foreach($object as $category){
334       $r &= preg_match("/r/",$this->has_complete_category_acls($dn, $category));
335     }
336     return($r) ; 
337   }  
340   function get_permissions($dn, $object, $attribute= "", $skip_write= FALSE)
341   {
342     /* If we are forced to skip ACLs checks for the current user 
343         then return all permissions.
344      */
345     if($this->ignore_acl_for_current_user()){
346       if($skip_write){
347         return("rcdm");
348       }
349       return("rwcdm");
350     }
352     /* Push cache answer? */
353     $ACL_CACHE = &session::global_get('ACL_CACHE');
354     if (isset($ACL_CACHE["$dn+$object+$attribute"])){
355       $ret = $ACL_CACHE["$dn+$object+$attribute"];
356       if($skip_write){
357         $ret = str_replace(array('w','c','d','m'), '',$ret);
358       }
359       return($ret);
360     }
362     /* Check for correct category and class values... */
363     if(strpos($object,'/') !== FALSE){
364       list($aclCategory, $aclClass) = split("/", $object);
365     }else{
366       $aclCategory = $object;
367     }
368     if(!isset($this->ocMapping[$aclCategory])){
369       trigger_error("Invalid ACL category '".$aclCategory."'! ({$object})");
370       return("");
371     }elseif(isset($aclClass) && !in_array($aclClass, $this->ocMapping[$aclCategory])){
372       trigger_error("Invalid ACL class '".$aclClass."'! ({$object})");
373       return("");
374     }
376     /* Detect the set of ACLs we have to check for this object 
377      */
378     $adn = $dn;
379     while(!isset($this->ACLperPath[$adn]) && strpos($adn,",") !== FALSE){
380       $adn = preg_replace("/^[^,]*+,/","",$adn);
381     }
382     if(isset($this->ACLperPath[$adn])){
383       $ACL = $this->ACLperPath[$adn];
384     }else{
385       $ACL_CACHE["$dn+$object+$attribute"] = "";
386       return("");
387     }
388  
389     /* If we do not need to respect any user-filter settings 
390         we can skip the per object ACL checks.
391      */
392     $orig_dn= $dn;
393     if(!isset($this->ACLperPath_usesFilter[$adn])){
394       $dn = $adn;
395       if (isset($ACL_CACHE["$dn+$object+$attribute"])){
396         $ret = $ACL_CACHE["$dn+$object+$attribute"];
397         if(!isset($ACL_CACHE["$orig_dn+$object+$attribute"])){
398           $ACL_CACHE["$orig_dn+$object+$attribute"] = $ACL_CACHE["$dn+$object+$attribute"];
399         }
400         if($skip_write){
401           $ret = str_replace('w','',$ret);
402         }
403         return($ret);
404       }
405     }
406  
407     /* Get ldap object, for later filter checks 
408      */
409     $ldap = $this->config->get_ldap_link();
411     $acl= array("r" => "", "w" => "", "c" => "", "d" => "", "m" => "", "a" => "");
413     /* Build dn array */
414     $path= explode(',', $dn);
415     $path= array_reverse($path);
417     /* Walk along the path to evaluate the acl */
418     $cpath= "";
419     foreach ($path as $element){
421       /* Clean potential ACLs for each level */
422                         if(isset($this->config->idepartments[$cpath])){
423         $acl= $this->cleanACL($acl);
424       }
426       if ($cpath == ""){
427         $cpath= $element;
428       } else {
429         $cpath= $element.','.$cpath;
430       }
432       if (isset($ACL[$cpath])){
434         /* Inspect this ACL, place the result into ACL */
435         foreach ($ACL[$cpath] as $subacl){
437           /* Reset? Just clean the ACL and turn over to the next one... */
438           if ($subacl['type'] == 'reset'){
439             $acl= $this->cleanACL($acl, TRUE);
440             continue;
441           }
443           if($subacl['type'] == "role") {
444             echo "role skipped";
445             continue;
446           }
448           /* With user filter */
449           if (isset($subacl['filter']) && !empty($subacl['filter'])){
450             $id = $dn."-".$subacl['filter'];
451             if(!isset($ACL_CACHE['FILTER'][$id])){
452               $ACL_CACHE['FILTER'][$id] = $ldap->object_match_filter($dn,$subacl['filter']);
453             }
454             if(!$ACL_CACHE['FILTER'][$id]){
455               continue;
456             }
457           }
459           /* Self ACLs? 
460            */
461           if($dn != $this->dn && isset($subacl['acl'][$object][0]) && (strpos($subacl['acl'][$object][0],"s") !== FALSE)){
462             continue;
463           }
465           /* If attribute is "", we want to know, if we've *any* permissions here... 
466               Merge global class ACLs [0] with attributes specific ACLs [attribute].
467            */
468           if ($attribute == "" && isset($subacl['acl'][$object])){
469             foreach($subacl['acl'][$object] as $attr => $dummy){
470               $acl= $this->mergeACL($acl, $subacl['type'], $subacl['acl'][$object][$attr]);
471             }
472             continue;
473           }
475           /* Per attribute ACL? */
476           if (isset($subacl['acl'][$object][$attribute])){
477             $acl= $this->mergeACL($acl, $subacl['type'], $subacl['acl'][$object][$attribute]);
478             continue;
479           }
481           /* Per object ACL? */
482           if (isset($subacl['acl'][$object][0])){
483             $acl= $this->mergeACL($acl, $subacl['type'], $subacl['acl'][$object][0]);
484             continue;
485           }
487           /* Global ACL? */
488           if (isset($subacl['acl']['all'][0])){
489             $acl= $this->mergeACL($acl, $subacl['type'], $subacl['acl']['all'][0]);
490             continue;
491           }
493           /* Category ACLs    (e.g. $object = "user/0")
494            */
495           if(strstr($object,"/0")){
496             $ocs = preg_replace("/\/0$/","",$object);
497             if(isset($this->ocMapping[$ocs])){
499               /* if $attribute is "", then check every single attribute for this object.
500                  if it is 0, then just check the object category ACL.
501                */
502               if($attribute == ""){    
503                 foreach($this->ocMapping[$ocs] as $oc){
504                   if (isset($subacl['acl'][$ocs.'/'.$oc])){
506                     if($dn != $this->dn && strpos($subacl['acl'][$ocs.'/'.$oc][0],"s") !== FALSE) continue;
508                     foreach($subacl['acl'][$ocs.'/'.$oc] as $attr => $dummy){
509                       $acl= $this->mergeACL($acl, $subacl['type'], $subacl['acl'][$ocs.'/'.$oc][$attr]);
510                     }
511                     continue;
512                   }
513                 }
514               }else{
515                 if(isset($subacl['acl'][$ocs.'/'.$oc][0])){
516                   if($dn != $this->dn && strpos($subacl['acl'][$ocs.'/'.$oc][0],"s") !== FALSE) continue;
517                   $acl= $this->mergeACL($acl, $subacl['type'], $subacl['acl'][$ocs.'/'.$oc][0]);
518                 }
519               }
520             }
521             continue;
522           }
523         }
524       }
525     }
527     /* If the requested ACL is for a container object, then alter 
528         ACLs by applying cleanACL a last time.
529      */
530     if(isset($this->config->idepartments[$dn])){
531       $acl = $this->cleanACL($acl);
532     }
534     /* Assemble string */
535     $ret= "";
536     foreach ($acl as $key => $value){
537       if ($value !== ""){
538         $ret.= $key;
539       }
540     }
542     $ACL_CACHE["$dn+$object+$attribute"]= $ret;
543     $ACL_CACHE["$orig_dn+$object+$attribute"]= $ret;
545     /* Remove write if needed */
546     if ($skip_write){
547       $ret = str_replace(array('w','c','d','m'), '',$ret);
548     }
549     return ($ret);
550   }
553   /* Extract all departments that are accessible (direct or 'on the way' to an
554      accessible department) */
555   function get_module_departments($module, $skip_self_acls = FALSE )
556   {
557     /* If we are forced to skip ACLs checks for the current user 
558         then return all departments as valid.
559      */
560     if($this->ignore_acl_for_current_user()){
561       return(array_keys($this->config->idepartments));
562     }
564     /* Use cached results if possilbe */
565     $ACL_CACHE = &session::global_get('ACL_CACHE');
567     if(!is_array($module)){
568       $module = array($module);
569     }
571     global $plist;
572     $res = array();
573     foreach($module as $mod){
574       if(isset($ACL_CACHE['MODULE_DEPARTMENTS'][$mod])){
575         $res = array_merge($res,$ACL_CACHE['MODULE_DEPARTMENTS'][$mod]);
576         continue;
577       }
579       $deps = array();
581       /* Search for per object ACLs */
582       foreach($this->ACL as $dn => $infos){
583         foreach($infos as $info){
584           $found = FALSE;
585           foreach($info['acl'] as $cat => $data){
587             /* Skip self acls? */
588             if($skip_self_acls && isset($data['0']) && (strpos($data['0'], "s") !== FALSE)) continue;
589             if(preg_match("/^".preg_quote($mod, '/')."/",$cat)){
590               $found =TRUE;
591               break;
592             }
593           } 
595           if($found && !isset($this->config->idepartments[$dn])){
596             while(!isset($this->config->idepartments[$dn]) && strpos($dn, ",")){
597               $dn = preg_replace("/^[^,]+,/","",$dn);
598             }
599             if(isset($this->config->idepartments[$dn])){
600               $deps[$dn] = $dn;
601             }
602           }
603         }
604       }
606       /* For all gosaDepartments */
607       foreach ($this->config->departments as $dn){
608         if(isset($deps[$dn])) continue;
609         $acl = "";
610         if(strpos($mod, '/')){
611           $acl.=  $this->get_permissions($dn,$mod);
612         }else{
613           $acl.=  $this->get_category_permissions($dn,$mod,TRUE);
614         }
615         if(!empty($acl)) {
616           $deps[$dn] = $dn;
617         }
618       }
620       $ACL_CACHE['MODULE_DEPARTMENTS'][$mod] = $deps;
621       $res = array_merge($res,$deps);
622     }
624     return (array_values($res));
625   }
628   function mergeACL($acl, $type, $newACL)
629   {
630                 $at= array("psub" => "p", "sub" => "s", "one" => "1");
632     if (strpos($newACL, 'w') !== FALSE && strpos($newACL, 'r') === FALSE){
633       $newACL .= "r";
634     }
636                 /* Ignore invalid characters */
637                 $newACL= preg_replace('/[^rwcdm]/', '', $newACL);
639     foreach(str_split($newACL) as $char){
641       /* Skip "self" ACLs without combination of rwcdm, they have no effect.
642          -self flag without read/write/create/...
643        */
644       if(empty($char)) continue;
646       /* Skip permanent and subtree entries */
647       if (preg_match('/[sp]/', $acl[$char])){
648         continue;
649       }
651                         if ($type == "base" && $acl[$char] != 1) {
652                                 $acl[$char]= 0;
653                         } else {
654         $acl[$char]= $at[$type];
655                         }
656     }
658     return ($acl);
659   }
662   function cleanACL($acl, $reset= FALSE)
663   {
664     foreach ($acl as $key => $value){
666       /* Continue, if value is empty or permanent */
667       if ($value == "" || $value == "p") {
668             continue;
669       }
671       /* Reset removes everything but 'p' */
672       if ($reset && $value != 'p'){
673         $acl[$key]= "";
674         continue;
675       }
677       /* Decrease tree level */
678       if (is_int($value)){
679         if ($value){
680           $acl[$key]--;
681         } else {
682           $acl[$key]= "";
683         }
684       }
685     }
687     return ($acl);
688   }
691   /* #FIXME This could be logical wrong or could be optimized in the future
692      Return combined acls for a given category. 
693      All acls will be combined like boolean AND 
694       As example ('rwcdm' + 'rcd' + 'wrm'= 'r') 
695     
696      Results will be cached in $this->result_cache.
697       $this->result_cache will be resetted if load_acls is called.
698   */
699   function has_complete_category_acls($dn,$category)
700   {
701     $acl    = "rwcdm";
702     $types  = "rwcdm";
704     if(!is_string($category)){
705       trigger_error("category must be string");   
706       $acl = "";
707     }else{
708       if(!isset($this->result_cache['has_complete_category_acls'][$dn][$category]))   {
709         if (isset($this->ocMapping[$category])){
710           foreach($this->ocMapping[$category] as $oc){
712             /* Skip objectClass '0' (e.g. users/0) get_permissions will ever return '' ??  */
713             if($oc == "0") continue;
714             $tmp =  $this->get_permissions($dn, $category."/".$oc);
715             for($i = 0, $l= strlen($types); $i < $l; $i++) {
716               if(!preg_match("/".$types[$i]."/",$tmp)){ 
717                 $acl = preg_replace("/".$types[$i]."/","",$acl);
718               }
719             }
720           }
721         }else{
722           trigger_error("Invalid type of category ".$category);
723           $acl = "";
724         }
725         $this->result_cache['has_complete_category_acls'][$dn][$category] = $acl;
726       }else{
727         $acl = $this->result_cache['has_complete_category_acls'][$dn][$category];
728       }
729     }
730     return($acl);
731   }
733  
734   /*! \brief  Returns TRUE if the current user is configured in IGNORE_ACL=".." in your gosa.conf 
735       @param  Return Boolean TRUE if we have to skip ACL checks else FALSE.
736    */ 
737   function ignore_acl_for_current_user()
738   {
739     return($this->ignoreACL);
740   }
743   function loginAllowed()
744   {
745     // Need to check restrictions?
746     if (count($this->restrictions)){
748       // We have restrictions but cannot check them
749       if (!isset($_SERVER['REMOTE_ADDR'])){
750         return false;
751       }
753       // Move to binary...
754       $source= $_SERVER['REMOTE_ADDR'];
755       foreach ($this->restrictions as $restriction) {
757         // Single IP
758         if (preg_match('/^[0-9]+\.[0-9]+\.[0-9]+\.[0-9]+$/', $restriction)) {
759            if ($source == $restriction){
760              return true;
761            }
762         }
764         // Match with short netmask
765         if (preg_match('/^([0-9]+\.[0-9]+\.[0-9]+\.[0-9]+)\/([0-9]+)$/', $restriction, $matches)) {
766           if (isIpInNet($source, $matches[1], long2ip(~(pow(2, (32-$matches[2]))-1)))) {
767             return true;
768           }
769         }
771         // Match with long netmask
772         if (preg_match('/^([0-9]+\.[0-9]+\.[0-9]+\.[0-9]+)\/([0-9]+\.[0-9]+\.[0-9]+\.[0-9]+)$/', $restriction, $matches)) {
773           if (isIpInNet($source, $matches[1], $matches[2])) {
774             return true;
775           }
776         }
778       }
780       return false;
781     }
783     return true;
784   }
789 // vim:tabstop=2:expandtab:shiftwidth=2:filetype=php:syntax:ruler:
790 ?>