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';
17 // check which fields are needed
18 $fields = get_fields_from_template($entrytpl);
22 $ldapfilter = _makeldapfilter();
25 $result = ldap_queryabooks($ldapfilter,$fields);
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']));
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);
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']);
51 if(!empty($_REQUEST['export'])){
52 if ($conf['userlogreq'] && $user == ''){
53 header("HTTP/1.1 401 Access Denied");
54 echo '<h1>Access Denied</h1>';
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');
63 }elseif($_REQUEST['export'] == 'map'){
64 header('Content-Type: text/html; charset=utf-8');
65 $smarty->display('list_map.tpl');
69 //save location in session
70 $_SESSION['ldapab']['lastlocation']=$_SERVER["REQUEST_URI"];
72 header('Content-Type: text/html; charset=utf-8');
73 $smarty->display('list.tpl');
76 //------- functions -----------//
79 * callback function to sort entries by name
82 function _namesort($a,$b){
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));
94 * Creates an LDAP filter from given request variables search or filter
96 function _makeldapfilter(){
100 //handle given filter
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';
116 $ldapfilter = '(&(objectClass=evolutionPerson)';
117 $marker = explode(',',$marker);
118 foreach($marker as $m){
120 $ldapfilter .= '('.$FIELDS['_marker'].'='.$m.')';
124 // Search by telephone number
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};
133 '(objectClass=inetOrgPerson)'.
136 '('.$FIELDS['phone'].'='.$filter.')'.
137 '('.$FIELDS['homephone'].'='.$filter.')'.
139 '('.$FIELDS['mobile'].'='.$filter.')'.
142 }elseif(!empty($search)){
143 // Search name and organization
144 $search = trim($search);
145 $words=preg_split('/\s+/',$search);
147 foreach($words as $word){
149 foreach($conf['searchfields'] as $field) {
150 $wordfilter .= '('.$field.'=*'.$word.'*)';
152 for($i=0; $i <count($conf['searchfields']); $i++){
153 $wordfilter = '(|'.$wordfilter.')';
155 $filter .= '(&'.$wordfilter.')';
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
164 for ($i=ord('a');$i<=ord('z');$i++){
165 $other .= '(!('.$FIELDS['name'].'='.chr($i).'*))';
167 $ldapfilter = "(&(objectClass=inetOrgPerson)$other)";
168 }elseif($filter=='\2a'){ //escaped asterisk
170 $ldapfilter = "(objectClass=inetOrgPerson)";
172 // Search by last name start
173 $ldapfilter = '(&(objectClass=inetOrgPerson)('.$FIELDS['name']."=$filter*))";