3 require_once('inc/init.php');
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';
12 $entrytpl = 'list_entry.tpl';
15 // check which fields are needed
16 $fields = get_fields_from_template($entrytpl);
20 $ldapfilter = _makeldapfilter();
23 $result = ldap_queryabooks($ldapfilter,$fields);
26 if(count($result)==1 && $_REQUEST['search']){
27 //only one result on a search -> display page
28 header("Location: entry.php?dn=".rawurlencode($result[0]['dn']));
30 }elseif(count($result)){
31 $keys = array_keys($result);
32 uksort($keys,"_namesort");
33 foreach($keys as $key){
34 tpl_entry($result[$key]);
35 $list .= $smarty->fetch($entrytpl);
41 if (empty($_REQUEST['filter'])) $_REQUEST['filter']='';
42 if (empty($_REQUEST['marker'])) $_REQUEST['marker']='';
43 if (empty($_REQUEST['search'])) $_REQUEST['search']='';
44 $smarty->assign('list',$list);
45 $smarty->assign('filter',$_REQUEST['filter']);
46 $smarty->assign('marker',$_REQUEST['marker']);
47 $smarty->assign('search',$_REQUEST['search']);
48 $smarty->assign('org',$_REQUEST['org']);
50 if(!empty($_REQUEST['export'])){
51 if ($conf['userlogreq'] && $user == ''){
52 header("HTTP/1.1 401 Access Denied");
53 echo '<h1>Access Denied</h1>';
57 if($_REQUEST['export'] == 'csv'){
58 header("Content-Type: text/csv");
59 header('Content-Disposition: Attachement; filename="contagged_export.csv"');
60 $smarty->display('list_csv.tpl');
62 }elseif($_REQUEST['export'] == 'map'){
63 header('Content-Type: text/html; charset=utf-8');
64 $smarty->display('list_map.tpl');
68 //save location in session
69 $_SESSION['ldapab']['lastlocation']=$_SERVER["REQUEST_URI"];
71 header('Content-Type: text/html; charset=utf-8');
72 $smarty->display('list.tpl');
75 //------- functions -----------//
78 * callback function to sort entries by name
81 function _namesort($a,$b){
84 if (empty($result[$a][$FIELDS['givenname']])) { $result[$a][$FIELDS['givenname']]=''; }
85 if (empty($result[$b][$FIELDS['givenname']])) { $result[$b][$FIELDS['givenname']]=''; }
86 $x = $result[$a][$FIELDS['name']][0].$result[$a][$FIELDS['givenname']][0];
87 $y = $result[$b][$FIELDS['name']][0].$result[$b][$FIELDS['givenname']][0];
88 return(strcasecmp($x,$y));
93 * Creates an LDAP filter from given request variables search or filter
95 function _makeldapfilter(){
101 if (empty($_REQUEST['filter'])) { $_REQUEST['filter']=''; }
102 if (empty($_REQUEST['search'])) { $_REQUEST['search']=''; }
103 if (empty($_REQUEST['org'])) { $_REQUEST['org']=''; }
104 if (empty($_REQUEST['marker'])) { $_REQUEST['marker']=''; }
105 if(is_numeric($_REQUEST['search'])) $number = $_REQUEST['search'];
106 $filter = ldap_filterescape($_REQUEST['filter']);
107 $search = ldap_filterescape($_REQUEST['search']);
108 $org = ldap_filterescape($_REQUEST['org']);
109 $marker = ldap_filterescape($_REQUEST['marker']);
110 $_SESSION['ldapab']['filter'] = $_REQUEST['filter'];
111 if(empty($filter)) $filter='a';
115 $ldapfilter = '(&(objectClass=contactPerson)';
116 $marker = explode(',',$marker);
117 foreach($marker as $m){
119 $ldapfilter .= '('.$FIELDS['_marker'].'='.$m.')';
123 // Search by telephone number
125 // add wildcards between digits to compensate for any formatting
126 $length = strlen($number);
127 for($i=0; $i <$length; $i++){
128 $filter .= '*'.$number{$i};
132 '(objectClass=inetOrgPerson)'.
135 '('.$FIELDS['phone'].'='.$filter.')'.
136 '('.$FIELDS['homephone'].'='.$filter.')'.
138 '('.$FIELDS['mobile'].'='.$filter.')'.
141 }elseif(!empty($search)){
142 // Search name and organization
143 $search = trim($search);
144 $words=preg_split('/\s+/',$search);
146 foreach($words as $word){
148 foreach($conf['searchfields'] as $field) {
149 $wordfilter .= '('.$field.'=*'.$word.'*)';
151 for($i=0; $i <count($conf['searchfields']); $i++){
152 $wordfilter = '(|'.$wordfilter.')';
154 $filter .= '(&'.$wordfilter.')';
156 $ldapfilter = "(&(objectClass=inetOrgPerson)$filter)";
157 }elseif(!empty($org)){
158 // List organization members
159 $ldapfilter = '(&(objectClass=inetOrgPerson)('.$FIELDS['organization']."=$org))";
160 }elseif($filter=='other'){
161 // Alphabetic listing of last names
163 for ($i=ord('a');$i<=ord('z');$i++){
164 $other .= '(!('.$FIELDS['name'].'='.chr($i).'*))';
166 $ldapfilter = "(&(objectClass=inetOrgPerson)$other)";
167 }elseif($filter=='\2a'){ //escaped asterisk
169 $ldapfilter = "(objectClass=inetOrgPerson)";
171 // Search by last name start
172 $ldapfilter = '(&(objectClass=inetOrgPerson)('.$FIELDS['name']."=$filter*))";