git.sur5r.net Git - contagged/blob - index.php

   1 <?php
   2
   3   require_once('inc/init.php');
   4   ldap_login();
   5
   6   // select entry template
   7   if(!empty($_REQUEST['export']) && $_REQUEST['export'] == 'csv'){
   8     $entrytpl = 'list_csv_entry.tpl';
   9   }elseif(!empty($_REQUEST['export']) && $_REQUEST['export'] == 'map'){
  10     $entrytpl = 'list_map_entry.tpl';
  11   }else{
  12     $entrytpl = 'list_entry.tpl';
  13   }
  14
  15   tpl_std();
  16
  17   // check which fields are needed
  18   $fields = get_fields_from_template($entrytpl);
  19
  20
  21   //prepare filter
  22   $ldapfilter = _makeldapfilter();
  23
  24   // fetch results
  25   $result = ldap_queryabooks($ldapfilter,$fields);
  26
  27   $list = '';
  28   if(count($result)==1 && $_REQUEST['search']){
  29     //only one result on a search -> display page
  30     header("Location: entry.php?dn=".rawurlencode($result[0]['dn']));
  31     exit;
  32   }elseif(count($result)){
  33     $keys = array_keys($result);
  34     uksort($keys,"_namesort");
  35     foreach($keys as $key){
  36       tpl_entry($result[$key]);
  37       $list .= $smarty->fetch($entrytpl);
  38     }
  39   }
  40
  41   //prepare templates
  42   if (empty($_REQUEST['filter'])) $_REQUEST['filter']='';
  43   if (empty($_REQUEST['marker'])) $_REQUEST['marker']='';
  44   if (empty($_REQUEST['search'])) $_REQUEST['search']='';
  45   $smarty->assign('list',$list);
  46   $smarty->assign('filter',$_REQUEST['filter']);
  47   $smarty->assign('marker',$_REQUEST['marker']);
  48   $smarty->assign('search',$_REQUEST['search']);
  49   $smarty->assign('org',$_REQUEST['org']);
  50   //display templates
  51   if(!empty($_REQUEST['export'])){
  52     if ($conf['userlogreq'] && $user == ''){
  53       header("HTTP/1.1 401 Access Denied");
  54       echo '<h1>Access Denied</h1>';
  55       exit();
  56     }
  57
  58     if($_REQUEST['export'] == 'csv'){
  59       header("Content-Type: text/csv");
  60       header('Content-Disposition: Attachement; filename="contagged_export.csv"');
  61       $smarty->display('list_csv.tpl');
  62       exit;
  63     }elseif($_REQUEST['export'] == 'map'){
  64       header('Content-Type: text/html; charset=utf-8');
  65       $smarty->display('list_map.tpl');
  66       exit;
  67     }
  68   }else{
  69     //save location in session
  70     $_SESSION['ldapab']['lastlocation']=$_SERVER["REQUEST_URI"];
  71
  72     header('Content-Type: text/html; charset=utf-8');
  73     $smarty->display('list.tpl');
  74   }
  75
  76   //------- functions -----------//
  77
  78   /**
  79    * callback function to sort entries by name
  80    * uses global $result
  81    */
  82   function _namesort($a,$b){
  83     global $result;
  84     global $FIELDS;
  85     if (empty($result[$a][$FIELDS['givenname']])) { $result[$a][$FIELDS['givenname']]=''; }
  86     if (empty($result[$b][$FIELDS['givenname']])) { $result[$b][$FIELDS['givenname']]=''; }
  87     $x = $result[$a][$FIELDS['name']][0].$result[$a][$FIELDS['givenname']][0];
  88     $y = $result[$b][$FIELDS['name']][0].$result[$b][$FIELDS['givenname']][0];
  89     return(strcasecmp($x,$y));
  90   }
  91
  92
  93   /**
  94    * Creates an LDAP filter from given request variables search or filter
  95    */
  96   function _makeldapfilter(){
  97     global $FIELDS;
  98     global $conf;
  99
 100     //handle given filter
 101
 102     if (empty($_REQUEST['filter'])) { $_REQUEST['filter']=''; }
 103     if (empty($_REQUEST['search'])) { $_REQUEST['search']=''; }
 104     if (empty($_REQUEST['org'])) { $_REQUEST['org']=''; }
 105     if (empty($_REQUEST['marker'])) { $_REQUEST['marker']=''; }
 106     if(is_numeric($_REQUEST['search'])) $number = $_REQUEST['search'];
 107     $filter = ldap_filterescape($_REQUEST['filter']);
 108     $search = ldap_filterescape($_REQUEST['search']);
 109     $org    = ldap_filterescape($_REQUEST['org']);
 110     $marker = ldap_filterescape($_REQUEST['marker']);
 111     $_SESSION['ldapab']['filter'] = $_REQUEST['filter'];
 112     if(empty($filter)) $filter='a';
 113
 114     if(!empty($marker)){
 115       // Search by tag
 116       $ldapfilter = '(&( |(objectClass=evolutionPerson)(objectClass=contactPerson) )';
 117       $marker = explode(',',$marker);
 118       foreach($marker as $m){
 119         $m = trim($m);
 120         $ldapfilter .= '('.$FIELDS['_marker'].'='.$m.')';
 121       }
 122       $ldapfilter .= ')';
 123     }elseif($number){
 124       // Search by telephone number
 125       $filter = '';
 126       // add wildcards between digits to compensate for any formatting
 127       $length = strlen($number);
 128       for($i=0; $i <$length; $i++){
 129         $filter .= '*'.$number{$i};
 130       }
 131       $filter .= '*';
 132       $ldapfilter = '(&'.
 133                         '(objectClass=inetOrgPerson)'.
 134                         '(|'.
 135                             '(|'.
 136                                 '('.$FIELDS['phone'].'='.$filter.')'.
 137                                 '('.$FIELDS['homephone'].'='.$filter.')'.
 138                             ')'.
 139                             '('.$FIELDS['mobile'].'='.$filter.')'.
 140                         ')'.
 141                     ')';
 142     }elseif(!empty($search)){
 143       // Search name and organization
 144       $search = trim($search);
 145       $words=preg_split('/\s+/',$search);
 146       $filter='';
 147       foreach($words as $word){
 148         $wordfilter='';
 149         foreach($conf['searchfields'] as $field) {
 150           $wordfilter .= '('.$field.'=*'.$word.'*)';
 151         }
 152         for($i=0; $i <count($conf['searchfields']); $i++){
 153           $wordfilter = '(|'.$wordfilter.')';
 154         }
 155         $filter .= '(&'.$wordfilter.')';
 156       }
 157       $ldapfilter = "(&(objectClass=inetOrgPerson)$filter)";
 158     }elseif(!empty($org)){
 159       // List organization members
 160       $ldapfilter = '(&(objectClass=inetOrgPerson)('.$FIELDS['organization']."=$org))";
 161     }elseif($filter=='other'){
 162       // Alphabetic listing of last names
 163       $other='';
 164       for ($i=ord('a');$i<=ord('z');$i++){
 165         $other .= '(!('.$FIELDS['name'].'='.chr($i).'*))';
 166       }
 167       $ldapfilter = "(&(objectClass=inetOrgPerson)$other)";
 168     }elseif($filter=='\2a'){ //escaped asterisk
 169       // List all
 170       $ldapfilter = "(objectClass=inetOrgPerson)";
 171     }else{
 172       // Search by last name start
 173       $ldapfilter = '(&(objectClass=inetOrgPerson)('.$FIELDS['name']."=$filter*))";
 174     }
 175     return $ldapfilter;
 176   }
 177 ?>