src/search.php

   1 <?php
   2
   3 /**
   4  * search.php
   5  *
   6  * Copyright (c) 1999-2004 The SquirrelMail Project Team
   7  * Licensed under the GNU GPL. For full terms see the file COPYING.
   8  *
   9  * IMAP search page
  10  *
  11  * Subfolder search idea from Patch #806075 by Thomas Pohl xraven at users.sourceforge.net. Thanks Thomas!
  12  *
  13  * @version $Id$
  14  * @package squirrelmail
  15  * @link http://www.ietf.org/rfc/rfc3501.txt
  16  * @author Alex Lemaresquier - Brainstorm - alex at brainstorm.fr
  17  */
  18
  19 /**
  20  * Path for SquirrelMail required files.
  21  * @ignore
  22  */
  23 define('SM_PATH','../');
  24
  25 /** SquirrelMail required files.
  26  */
  27 require_once(SM_PATH . 'include/validate.php');
  28 require_once(SM_PATH . 'functions/strings.php');
  29 require_once(SM_PATH . 'functions/imap_asearch.php');
  30 require_once(SM_PATH . 'functions/imap_mailbox.php');
  31 require_once(SM_PATH . 'functions/imap_messages.php');
  32 require_once(SM_PATH . 'functions/mime.php');
  33 require_once(SM_PATH . 'functions/mailbox_display.php');        //getButton()...
  34
  35 /** Prefs array ordinals. Must match $recent_prefkeys and $saved_prefkeys
  36  */
  37 define('ASEARCH_WHERE', 0);
  38 define('ASEARCH_MAILBOX', 1);
  39 define('ASEARCH_WHAT', 2);
  40 define('ASEARCH_UNOP', 3);
  41 define('ASEARCH_BIOP', 4);
  42 define('ASEARCH_EXCLUDE', 5);
  43 define('ASEARCH_SUB', 6);
  44 define('ASEARCH_MAX', 7);
  45
  46 /** Name of session var
  47  */
  48 define('ASEARCH_CRITERIA', 'criteria');
  49
  50 /** Builds a href with params
  51  * @param string $params optional parameters to GET
  52  */
  53 function asearch_get_href($params = '')
  54 {
  55         $href = 'search.php';
  56         if ($params != '')
  57                 $href .= '?' . $params;
  58         return $href;
  59 }
  60
  61 /** Builds a [link]
  62  * @param string $href (reference)
  63  * @param string $text
  64  * @param string $title
  65  */
  66 function asearch_get_link(&$href, $text, $title = '')
  67 {
  68         if ($title != '')
  69                 $title = ' title="' . $title . '"';
  70         return '<a href="' . $href . '"' . $title . '>' . $text . '</a>';
  71 }
  72
  73 /** Builds a toggle [link]
  74  * @param integer $value
  75  * @param string $action
  76  * @param array $text_array
  77  * @param array $title_array
  78  */
  79 function asearch_get_toggle_link($value, $action, $text_array, $title_array = array())
  80 {
  81         return asearch_get_link(asearch_get_href($action . '=' . (int)$value), $text_array[$value], asearch_nz($title_array[$value]));
  82 }
  83
  84 /**
  85  * @param string $a
  86  * @param string $b
  87  * @return bool strcoll()-like result
  88  */
  89 function asearch_unhtml_strcoll($a, $b)
  90 {
  91         return strcoll(asearch_unhtmlentities($a), asearch_unhtmlentities($b));
  92 }
  93
  94 /**
  95  * @param string $mailbox mailbox name utf7 encoded inc. special case INBOX
  96  * @return string mailbox name ready to display (utf7 decoded or localized INBOX)
  97  */
  98 function imap_get_mailbox_display($mailbox)
  99 {
 100         if (strtoupper($mailbox) == 'INBOX')
 101                 return _("INBOX");
 102         return imap_utf7_decode_local($mailbox);
 103 }
 104
 105 /**
 106  * @param string $mailbox mailbox name or special case 'All Folders'
 107  * @return string mailbox name ready to display (utf7 decoded or localized 'All Folders')
 108  */
 109 function asearch_get_mailbox_display($mailbox)
 110 {
 111         if ($mailbox == 'All Folders')
 112                 return _("All Folders");
 113         return imap_get_mailbox_display($mailbox);
 114 }
 115
 116 /**
 117  * @param array $color color array
 118  * @param string $txt text to display
 119  * @return string title ready to display
 120  */
 121 function asearch_get_title_display(&$color, $txt)
 122 {
 123         return '<b><big>' . $txt . '</big></b>';
 124 }
 125
 126 /**
 127  * @param array $color color array
 128  * @param string $txt text to display
 129  * @return string error text ready to display
 130  */
 131 function asearch_get_error_display(&$color, $txt)
 132 {
 133         return '<font color="' . $color[2] . '">' . '<b><big>' . $txt . '</big></b></font>';
 134 }
 135
 136 /**
 137  * @param array $input_array array to serialize
 138  * @return string a string containing a byte-stream representation of value that can be stored anywhere
 139  */
 140 function asearch_serialize(&$input_array)
 141 {
 142         global $search_advanced;
 143         if ($search_advanced)
 144                 return serialize($input_array);
 145         return $input_array[0];
 146 }
 147
 148 /**
 149  * @param string $input_string string to unserialize
 150  * @return array
 151  */
 152 function asearch_unserialize($input_string)
 153 {
 154         global $search_advanced;
 155         if ($search_advanced)
 156                 return unserialize($input_string);
 157         return array($input_string);
 158 }
 159
 160 /**
 161  * @param string $key the pref key
 162  * @param integer $index the pref key index
 163  * @param string $default default value
 164  * @return string pref value
 165  */
 166 function asearch_getPref(&$key, $index, $default = '')
 167 {
 168         global $data_dir, $username, $search_advanced;
 169         return getPref($data_dir, $username, $key . ($index + !$search_advanced), $default);
 170 }
 171
 172 /**
 173  * @param string $key the pref key
 174  * @param integer $index the pref key index
 175  * @param string $value pref value to set
 176  * @return bool status
 177  */
 178 function asearch_setPref(&$key, $index, $value)
 179 {
 180         global $data_dir, $username, $search_advanced;
 181         return setPref($data_dir, $username, $key . ($index + !$search_advanced), $value);
 182 }
 183
 184 /**
 185  * @param string $key the pref key
 186  * @param integer $index the pref key index
 187  * @return bool status
 188  */
 189 function asearch_removePref(&$key, $index)
 190 {
 191         global $data_dir, $username, $search_advanced;
 192         return removePref($data_dir, $username, $key . ($index + !$search_advanced));
 193 }
 194
 195 /** Sanity checks, done before running the imap command and before calling push_recent
 196  */
 197 function asearch_check_query(&$where_array, &$what_array, &$exclude_array)
 198 {
 199         global $imap_asearch_opcodes;
 200
 201         if (empty($where_array))
 202                 return _("Please enter something to search for");
 203         if (count($exclude_array) == count($where_array))
 204                 return _("There must be at least one criteria to search for");
 205         for ($crit_num = 0; $crit_num < count($where_array); $crit_num++) {
 206                 $where = $where_array[$crit_num];
 207                 $what = $what_array[$crit_num];
 208                 if (!(($what == '') ^ ($imap_asearch_opcodes[$where] != '')))
 209                         return _("Error in criteria argument");
 210         }
 211         return '';
 212 }
 213
 214 /** Read the recent searches from the prefs
 215  */
 216 function asearch_read_recent()
 217 {
 218         global $recent_prefkeys, $search_memory;
 219
 220         $recent_array = array();
 221         $recent_num = 0;
 222         for ($pref_num = 0; $pref_num < $search_memory; $pref_num++) {
 223                 foreach ($recent_prefkeys as $prefkey) {
 224                         $pref = asearch_getPref($prefkey, $pref_num);
 225 /*                      if (!empty($pref))*/
 226                                 $recent_array[$prefkey][$recent_num] = $pref;
 227                 }
 228                 if (empty($recent_array[$recent_prefkeys[0]][$recent_num])) {
 229                         foreach ($recent_prefkeys as $key) {
 230                                 array_pop($recent_array[$key]);
 231                         }
 232 //                      break;  //Disabled to support old search code broken prefs
 233                 }
 234                 else
 235                         $recent_num++;
 236         }
 237         return $recent_array;
 238 }
 239
 240 /** Read the saved searches from the prefs
 241  */
 242 function asearch_read_saved()
 243 {
 244         global $saved_prefkeys;
 245
 246         $saved_array = array();
 247         $saved_key = $saved_prefkeys[0];
 248         for ($saved_count = 0; ; $saved_count++) {
 249                 $pref = asearch_getPref($saved_key, $saved_count);
 250                 if (empty($pref))
 251                         break;
 252         }
 253         for ($saved_num = 0; $saved_num < $saved_count; $saved_num++) {
 254                 foreach ($saved_prefkeys as $key) {
 255                         $saved_array[$key][$saved_num] = asearch_getPref($key, $saved_num);
 256                 }
 257         }
 258         return $saved_array;
 259 }
 260
 261 /** Save a recent search to the prefs
 262  */
 263 function asearch_save_recent($recent_index)
 264 {
 265         global $recent_prefkeys, $saved_prefkeys;
 266
 267         $saved_array = asearch_read_saved();
 268         $saved_index = count($saved_array[$saved_prefkeys[0]]);
 269         $recent_array = asearch_read_recent();
 270         $n = 0;
 271         foreach ($recent_prefkeys as $key) {
 272                 $recent_slice = array_slice($recent_array[$key], $recent_index, 1);
 273                 if (!empty($recent_slice[0]))
 274                         asearch_setPref($saved_prefkeys[$n], $saved_index, $recent_slice[0]);
 275                 else
 276                         asearch_removePref($saved_prefkeys[$n], $saved_index);
 277                 $n++;
 278         }
 279 }
 280
 281 /** Write a recent search to prefs
 282  */
 283 function asearch_write_recent(&$recent_array)
 284 {
 285         global $recent_prefkeys, $search_memory;
 286
 287         $recent_count = min($search_memory, count($recent_array[$recent_prefkeys[0]]));
 288         for ($recent_num = 0; $recent_num < $recent_count; $recent_num++) {
 289                 foreach ($recent_prefkeys as $key) {
 290                         asearch_setPref($key, $recent_num, $recent_array[$key][$recent_num]);
 291                 }
 292         }
 293         for (; $recent_num < $search_memory; $recent_num++) {
 294                 foreach ($recent_prefkeys as $key) {
 295                         asearch_removePref($key, $recent_num);
 296                 }
 297         }
 298 }
 299
 300 /** Remove a recent search from prefs
 301  */
 302 function asearch_forget_recent($forget_index)
 303 {
 304         global $recent_prefkeys;
 305
 306         $recent_array = asearch_read_recent();
 307         foreach ($recent_prefkeys as $key) {
 308                 array_splice($recent_array[$key], $forget_index, 1);
 309         }
 310         asearch_write_recent($recent_array);
 311 }
 312
 313 /** Find a recent search in the prefs (used to avoid saving duplicates)
 314  */
 315 function asearch_find_recent(&$recent_array, &$mailbox_array, &$biop_array, &$unop_array, &$where_array, &$what_array, &$exclude_array, &$sub_array)
 316 {
 317         global $recent_prefkeys, $search_advanced;
 318
 319         $where_string = asearch_serialize($where_array);
 320         $mailbox_string = asearch_serialize($mailbox_array);
 321         $what_string = asearch_serialize($what_array);
 322         $unop_string = asearch_serialize($unop_array);
 323         if ($search_advanced) {
 324                 $biop_string = asearch_serialize($biop_array);
 325                 $exclude_string = asearch_serialize($exclude_array);
 326                 $sub_string = asearch_serialize($sub_array);
 327         }
 328         $recent_count = count($recent_array[$recent_prefkeys[ASEARCH_WHERE]]);
 329         for ($recent_num = 0; $recent_num < $recent_count; $recent_num++) {
 330                 if (isset($recent_array[$recent_prefkeys[ASEARCH_WHERE]][$recent_num])) {
 331                         if (
 332                                         $where_string == $recent_array[$recent_prefkeys[ASEARCH_WHERE]][$recent_num] &&
 333                                         $mailbox_string == $recent_array[$recent_prefkeys[ASEARCH_MAILBOX]][$recent_num] &&
 334                                         $what_string == $recent_array[$recent_prefkeys[ASEARCH_WHAT]][$recent_num] &&
 335                                         $unop_string == $recent_array[$recent_prefkeys[ASEARCH_UNOP]][$recent_num] &&
 336                                         ((!$search_advanced) ||
 337                                                 ($biop_string == $recent_array[$recent_prefkeys[ASEARCH_BIOP]][$recent_num] &&
 338                                                 $exclude_string == $recent_array[$recent_prefkeys[ASEARCH_EXCLUDE]][$recent_num] &&
 339                                                 $sub_string == $recent_array[$recent_prefkeys[ASEARCH_SUB]][$recent_num]))
 340                                         )
 341                                 return $recent_num;
 342                 }
 343         }
 344         return -1;
 345 }
 346
 347 /** Push a recent search into the prefs
 348  */
 349 function asearch_push_recent(&$mailbox_array, &$biop_array, &$unop_array, &$where_array, &$what_array, &$exclude_array, &$sub_array)
 350 {
 351         global $recent_prefkeys, $search_memory;
 352
 353         $criteria = array($mailbox_array, $biop_array, $unop_array, $where_array, $what_array, $exclude_array, $sub_array);
 354         sqsession_register($criteria, ASEARCH_CRITERIA);
 355         if ($search_memory > 0) {
 356                 $recent_array = asearch_read_recent();
 357                 $recent_found = asearch_find_recent($recent_array, $mailbox_array, $biop_array, $unop_array, $where_array, $what_array, $exclude_array, $sub_array);
 358                 if ($recent_found >= 0) {       // Remove identical recent
 359                         foreach ($recent_prefkeys as $key) {
 360                                 array_splice($recent_array[$key], $recent_found, 1);
 361                         }
 362                 }
 363                 $input = array($where_array, $mailbox_array, $what_array, $unop_array, $biop_array, $exclude_array, $sub_array);
 364                 $i = 0;
 365                 foreach ($recent_prefkeys as $key) {
 366                         array_unshift($recent_array[$key], asearch_serialize($input[$i]));
 367                         $i++;
 368                 }
 369                 asearch_write_recent($recent_array);
 370         }
 371 }
 372
 373 /** Edit a recent search
 374  * @global array mailbox_array searched mailboxes
 375  */
 376 function asearch_edit_recent($index)
 377 {
 378         global $recent_prefkeys, $search_advanced;
 379         global $where_array, $mailbox_array, $what_array, $unop_array;
 380         global $biop_array, $exclude_array, $sub_array;
 381
 382         $where_array = asearch_unserialize(asearch_getPref($recent_prefkeys[ASEARCH_WHERE], $index));
 383         $mailbox_array = asearch_unserialize(asearch_getPref($recent_prefkeys[ASEARCH_MAILBOX], $index));
 384         $what_array = asearch_unserialize(asearch_getPref($recent_prefkeys[ASEARCH_WHAT], $index));
 385         $unop_array = asearch_unserialize(asearch_getPref($recent_prefkeys[ASEARCH_UNOP], $index));
 386         if ($search_advanced) {
 387                 $biop_array = asearch_unserialize(asearch_getPref($recent_prefkeys[ASEARCH_BIOP], $index));
 388                 $exclude_array = asearch_unserialize(asearch_getPref($recent_prefkeys[ASEARCH_EXCLUDE], $index));
 389                 $sub_array = asearch_unserialize(asearch_getPref($recent_prefkeys[ASEARCH_SUB], $index));
 390         }
 391 }
 392
 393 /** Get last search criteria from session or prefs
 394  */
 395 function asearch_edit_last()
 396 {
 397         if (sqGetGlobalVar(ASEARCH_CRITERIA, $criteria, SQ_SESSION)) {
 398                 global $where_array, $mailbox_array, $what_array, $unop_array;
 399                 global $biop_array, $exclude_array, $sub_array;
 400                 $mailbox_array = $criteria[0];
 401                 $biop_array = $criteria[1];
 402                 $unop_array = $criteria[2];
 403                 $where_array = $criteria[3];
 404                 $what_array = $criteria[4];
 405                 $exclude_array = $criteria[5];
 406                 $sub_array = $criteria[6];
 407                 sqsession_unregister(ASEARCH_CRITERIA);
 408         }
 409         else {
 410                 global $search_memory;
 411                 if ($search_memory > 0)
 412                         asearch_edit_recent(0);
 413         }
 414 }
 415
 416 /** Edit a saved search
 417  */
 418 function asearch_edit_saved($index)
 419 {
 420         global $saved_prefkeys, $search_advanced;
 421         global $where_array, $mailbox_array, $what_array, $unop_array;
 422         global $biop_array, $exclude_array, $sub_array;
 423
 424         $where_array = asearch_unserialize(asearch_getPref($saved_prefkeys[ASEARCH_WHERE], $index));
 425         $mailbox_array = asearch_unserialize(asearch_getPref($saved_prefkeys[ASEARCH_MAILBOX], $index));
 426         $what_array = asearch_unserialize(asearch_getPref($saved_prefkeys[ASEARCH_WHAT], $index));
 427         $unop_array = asearch_unserialize(asearch_getPref($saved_prefkeys[ASEARCH_UNOP], $index));
 428         if ($search_advanced) {
 429                 $biop_array = asearch_unserialize(asearch_getPref($saved_prefkeys[ASEARCH_BIOP], $index));
 430                 $exclude_array = asearch_unserialize(asearch_getPref($saved_prefkeys[ASEARCH_EXCLUDE], $index));
 431                 $sub_array = asearch_unserialize(asearch_getPref($saved_prefkeys[ASEARCH_SUB], $index));
 432         }
 433 }
 434
 435 /** Write a saved search to the prefs
 436  */
 437 function asearch_write_saved(&$saved_array)
 438 {
 439         global $saved_prefkeys;
 440
 441         $saved_count = count($saved_array[$saved_prefkeys[0]]);
 442         for ($saved_num=0; $saved_num < $saved_count; $saved_num++) {
 443                 foreach ($saved_prefkeys as $key) {
 444                         asearch_setPref($key, $saved_num, $saved_array[$key][$saved_num]);
 445                 }
 446         }
 447         foreach ($saved_prefkeys as $key) {
 448                 asearch_removePref($key, $saved_count);
 449         }
 450 }
 451
 452 /** Delete a saved search from the prefs
 453  */
 454 function asearch_delete_saved($saved_index)
 455 {
 456         global $saved_prefkeys;
 457
 458         $saved_array = asearch_read_saved();
 459         $asearch_keys = $saved_prefkeys;
 460         foreach ($asearch_keys as $key) {
 461                 array_splice($saved_array[$key], $saved_index, 1);
 462         }
 463         asearch_write_saved($saved_array);
 464 }
 465
 466 /** Translate the input date to imap date to local date display,
 467  * so the user can know if the date is wrong or illegal
 468  * @return string locally formatted date or error text
 469  */
 470 function asearch_get_date_display(&$what)
 471 {
 472         $what_parts = sqimap_asearch_parse_date($what);
 473         if (count($what_parts) == 4) {
 474                 if (checkdate($what_parts[2], $what_parts[1], $what_parts[3]))
 475                         return date_intl(_("M j, Y"), mktime(0,0,0,$what_parts[2],$what_parts[1],$what_parts[3]));
 476                         //return $what_parts[1] . ' ' . getMonthName($what_parts[2]) . ' ' . $what_parts[3];
 477                 return _("(Illegal date)");
 478         }
 479         return _("(Wrong date)");
 480 }
 481
 482 /** Translate the query to rough natural display
 483  * @return string rough natural query ready to display
 484  */
 485 function asearch_get_query_display(&$color, &$mailbox_array, &$biop_array, &$unop_array, &$where_array, &$what_array, &$exclude_array, &$sub_array)
 486 {
 487         global $imap_asearch_biops_in, $imap_asearch_biops, $imap_asearch_unops, $imap_asearch_options;
 488         global $imap_asearch_opcodes;
 489
 490         $last_mailbox = $mailbox_array[0];
 491         if (empty($last_mailbox))
 492                 $last_mailbox = 'INBOX';
 493         $query_display = '';
 494         for ($crit_num=0; $crit_num < count($where_array); $crit_num++) {
 495                 if ((!isset($exclude_array[$crit_num])) || (!$exclude_array[$crit_num])) {
 496                         $cur_mailbox = $mailbox_array[$crit_num];
 497                         if (empty($cur_mailbox))
 498                                 $cur_mailbox = 'INBOX';
 499                         $biop = asearch_nz($biop_array[$crit_num]);
 500                         if (($query_display == '') || ($cur_mailbox != $last_mailbox)) {
 501                                 $mailbox_display = ' <b>' . asearch_get_mailbox_display($cur_mailbox) . '</b>';
 502                                 if ($query_display == '')
 503                                         $biop_display = _("In");
 504                                 else
 505                                         $biop_display = $imap_asearch_biops_in[$biop];
 506                                 $last_mailbox = $cur_mailbox;
 507                         }
 508                         else {
 509                                 $mailbox_display = '';
 510                                 $biop_display = $imap_asearch_biops[$biop];
 511                         }
 512                         $unop = $unop_array[$crit_num];
 513                         $unop_display = $imap_asearch_unops[$unop];
 514                         if ($unop_display != '')
 515                                 $unop_display .= ' ';
 516                         $where = $where_array[$crit_num];
 517                         $where_display = $unop_display . asearch_nz($imap_asearch_options[$where], $where);
 518                         $what_type = $imap_asearch_opcodes[$where];
 519                         $what = $what_array[$crit_num];
 520                         if ($what_type) {       /* Check opcode parameter */
 521                                 if ($what == '')
 522                                         $what_display = ' ' . asearch_get_error_display($color, _("(Missing argument)"));
 523                                 else {
 524                                         if ($what_type == 'adate')
 525                                                 $what_display = asearch_get_date_display($what);
 526                                         else
 527                                                 $what_display = htmlspecialchars($what);
 528                                         $what_display = ' <b>' . $what_display . '</b>';
 529                                 }
 530                         }
 531                         else {
 532                                 if ($what)
 533                                         $what_display = ' ' . asearch_get_error_display($color, _("(Spurious argument)"));
 534                                 else
 535                                         $what_display = '';
 536                         }
 537                         if ($mailbox_display != '')
 538                                 $query_display .= ' <u><i>' . $biop_display . '</i></u>' . $mailbox_display . ' <u><i>' . $where_display . '</i></u>' . $what_display;
 539                         else
 540                                 $query_display .= ' <u><i>' . $biop_display . ' ' . $where_display . '</i></u>' . $what_display;
 541                 }
 542         }
 543         return $query_display;
 544 }
 545
 546 /** Handle the alternate row colors
 547  * @return string color value
 548  */
 549 function asearch_get_row_color(&$color, $row_num)
 550 {
 551 /*$color_string = ($row_num%2 ? $color[0] : $color[4]);*/
 552         $color_string = $color[4];
 553         if ($GLOBALS['alt_index_colors']) {
 554                 if (($row_num % 2) == 0) {
 555                         if (!isset($color[12]))
 556                                 $color[12] = '#EAEAEA';
 557                         $color_string = $color[12];
 558                 }
 559         }
 560         return $color_string;
 561 }
 562
 563 /** Print a whole query array, recent or saved
 564  */
 565 function asearch_print_query_array(&$boxes, &$query_array, &$query_keys, &$action_array, $title, $show_pref)
 566 {
 567         global $color;
 568         global $data_dir, $username;
 569         global $use_icons, $icon_theme;
 570
 571         $show_flag = getPref($data_dir, $username, $show_pref, 0) & 1;
 572         $use_icons_flag = ($use_icons) && ($icon_theme != 'none');
 573         if ($use_icons_flag)
 574                 $text_array = array('<img src="' . SM_PATH . 'images/minus.png" border="0" height="7" width="7" />',
 575                         '<img src="' . SM_PATH . 'images/plus.png" border="0" height="7" width="7" />');
 576         else
 577                 $text_array = array('-', '+');
 578         $toggle_link = asearch_get_toggle_link(!$show_flag, $show_pref, $text_array, array(_("Fold"), _("Unfold")));
 579         if (!$use_icons_flag)
 580                 $toggle_link = '<small>[' . $toggle_link . ']</small>';
 581
 582         echo "<br />\n";
 583         echo html_tag('table', '', 'center', $color[9], 'width="95%" cellpadding="1" cellspacing="1" border="0"');
 584         echo html_tag('tr',
 585                 html_tag('td', $toggle_link, 'center', $color[5], 'width="5%"')
 586                 . html_tag('td', asearch_get_title_display($color, $title), 'center', $color[5], 'colspan=4'));
 587         if ($show_flag) {
 588                 $main_key = $query_keys[ASEARCH_WHERE];
 589                 $query_count = count($query_array[$main_key]);
 590                 for ($query_num = 0, $row_num = 0; $query_num < $query_count; $query_num++) {
 591                         if (!empty($query_array[$main_key][$query_num])) {
 592                                 echo html_tag('tr', '', '', asearch_get_row_color($color, $row_num));
 593
 594                                 unset($search_array);
 595                                 foreach ($query_keys as $query_key) {
 596                                         $search_array[] = asearch_unserialize($query_array[$query_key][$query_num]);
 597                                 }
 598                                 $where_array = $search_array[ASEARCH_WHERE];
 599                                 $mailbox_array = $search_array[ASEARCH_MAILBOX];
 600                                 $what_array = $search_array[ASEARCH_WHAT];
 601                                 $unop_array = $search_array[ASEARCH_UNOP];
 602                                 $biop_array = asearch_nz($search_array[ASEARCH_BIOP], array());
 603                                 $exclude_array = asearch_nz($search_array[ASEARCH_EXCLUDE], array());
 604                                 $sub_array = asearch_nz($search_array[ASEARCH_SUB], array());
 605                                 $query_display = asearch_get_query_display($color, $mailbox_array, $biop_array, $unop_array, $where_array, $what_array, $exclude_array, $sub_array);
 606
 607                                 echo html_tag('td', $query_num + 1, 'right');
 608                                 echo html_tag('td', $query_display, 'center', '', 'width="80%"');
 609                                 foreach ($action_array as $action => $action_display) {
 610                                         echo html_tag('td', '<a href="' . asearch_get_href('submit=' . $action . '&amp;rownum=' . $query_num) . '">' . $action_display . '</a>', 'center');
 611                                 }
 612
 613                                 echo '</tr>' . "\n";
 614                                 $row_num++;
 615                         }
 616                 }
 617         }
 618         echo '</table>' . "\n";
 619 }
 620
 621 /** Print the saved array
 622  */
 623 function asearch_print_saved(&$boxes)
 624 {
 625         global $saved_prefkeys;
 626
 627         $saved_array = asearch_read_saved();
 628         if (isset($saved_array[$saved_prefkeys[0]])) {
 629                 $saved_count = count($saved_array[$saved_prefkeys[0]]);
 630                 if ($saved_count > 0) {
 631                         $saved_actions = array('edit_saved' => _("edit"), 'search_saved' => _("search"), 'delete_saved' => _("delete"));
 632                         asearch_print_query_array($boxes, $saved_array, $saved_prefkeys, $saved_actions, _("Saved Searches"), 'search_show_saved');
 633                 }
 634         }
 635 }
 636
 637 /**
 638  * Print the recent array
 639  */
 640 function asearch_print_recent(&$boxes)
 641 {
 642         global $recent_prefkeys, $search_memory;
 643
 644         $recent_array = asearch_read_recent();
 645         if (isset($recent_array[$recent_prefkeys[0]])) {
 646                 $recent_count = count($recent_array[$recent_prefkeys[0]]);
 647                 if (min($recent_count, $search_memory) > 0) {
 648                         $recent_actions = array('save_recent' => _("save"), 'search_recent' => _("search"), 'forget_recent' => _("forget"));
 649                         asearch_print_query_array($boxes, $recent_array, $recent_prefkeys, $recent_actions, _("Recent Searches"), 'search_show_recent');
 650                 }
 651         }
 652 }
 653
 654 /** Build an <option> statement
 655  */
 656 function asearch_opt($val, $sel, $tit)
 657 {
 658         return '<option value="' . $val . '"' . ($sel == $val ? ' selected' : '') . '>' . $tit . '</option>' . "\n";
 659 }
 660
 661 /** Build a <select> statement from an array
 662  */
 663 function asearch_opt_array($var_name, $opt_array, $cur_val)
 664 {
 665         $output = '<select name="' . $var_name . '">' . "\n";
 666         foreach($opt_array as $val => $display)
 667                 $output .= asearch_opt($val, $cur_val, asearch_nz($display, $val));
 668         $output .= '</select>' . "\n";
 669         return $output;
 670 }
 671
 672 /** Verify that a mailbox exists
 673  * @return bool mailbox exists
 674  */
 675 function asearch_mailbox_exists($mailbox, &$boxes)
 676 {
 677         foreach ($boxes as $box) {
 678                 if ($box['unformatted'] == $mailbox)
 679                         return TRUE;
 680         }
 681         return FALSE;
 682 }
 683
 684 /** Build the mailbox select
 685  */
 686 function asearch_get_form_mailbox($imapConnection, &$boxes, $mailbox, $row_num = 0)
 687 {
 688         if (($mailbox != 'All Folders') && (!asearch_mailbox_exists($mailbox, $boxes)))
 689                 $missing = asearch_opt($mailbox, $mailbox, '[' . _("Missing") . '] ' . asearch_get_mailbox_display($mailbox));
 690         else
 691                 $missing = '';
 692         return '<select name="mailbox[' . $row_num . ']">'
 693                 . $missing
 694                 . asearch_opt('All Folders', $mailbox, '[' . asearch_get_mailbox_display('All Folders') . ']')
 695                 . sqimap_mailbox_option_list($imapConnection, array(strtolower($mailbox)), 0, $boxes, NULL)
 696                 . '</select>';
 697 }
 698
 699 /** Build the Include subfolders checkbox
 700  */
 701 function asearch_get_form_sub($sub, $row_num = 0)
 702 {
 703         return function_exists('addCheckBox') ? addCheckBox('sub[' . $row_num .']', $sub)
 704         : '<input type="checkbox" name="sub[' . $row_num .']"' . ($sub ? ' checked="checked"' : '') . ' />';
 705 }
 706
 707 /** Build the 2 unop and where selects
 708  */
 709 function asearch_get_form_location($unop, $where, $row_num = 0)
 710 {
 711         global $imap_asearch_unops, $imap_asearch_options;
 712
 713         return asearch_opt_array('unop[' . $row_num . ']', $imap_asearch_unops, $unop)
 714                 . asearch_opt_array('where[' . $row_num . ']', $imap_asearch_options, $where);
 715 }
 716
 717 /** Build the what text input
 718  */
 719 function asearch_get_form_what($what, $row_num = 0)
 720 {
 721         return function_exists('addInput') ? addInput('what[' . $row_num . ']', $what, '35')
 722         : '<input type="text" size="35" name="what[' . $row_num . ']" value="' . htmlspecialchars($what) . '" />';
 723 }
 724
 725 /** Build the Exclude criteria checkbox
 726  */
 727 function asearch_get_form_exclude($exclude, $row_num = 0)
 728 {
 729         return function_exists('addCheckBox') ? addCheckBox('exclude['.$row_num.']', $exclude)
 730         : '<input type="checkbox" name="exclude[' . $row_num .']"' . ($exclude ? ' checked="checked"' : '') . ' />';
 731 }
 732
 733 /** Print one advanced form row
 734  */
 735 function asearch_print_form_row($imapConnection, &$boxes, $mailbox, $biop, $unop, $where, $what, $exclude, $sub, $row_num)
 736 {
 737         global $imap_asearch_biops_in;
 738         global $color;
 739
 740         echo html_tag('tr', '', '', $color[4]);
 741
 742 //Binary operator
 743         echo html_tag('td', $row_num ?
 744                         asearch_opt_array('biop[' . $row_num . ']', $imap_asearch_biops_in, $biop)
 745                         : '<b>' . _("In") . '</b>', 'center')   . "\n";
 746
 747 //Mailbox list and Include Subfolders
 748         echo html_tag('td',
 749                         asearch_get_form_mailbox($imapConnection, $boxes, $mailbox, $row_num)
 750                 . _("and&nbsp;subfolders:") . asearch_get_form_sub($sub, $row_num), 'center') . "\n";
 751
 752 //Unary operator and Search location
 753         echo html_tag('td', asearch_get_form_location($unop, $where, $row_num), 'center') . "\n";
 754
 755 //Text input
 756         echo html_tag('td', asearch_get_form_what($what, $row_num), 'center') . "\n";
 757
 758 //Exclude criteria
 759         echo html_tag('td', _("Exclude Criteria:") . asearch_get_form_exclude($exclude, $row_num), 'center') . "\n";
 760
 761         echo "</tr>\n";
 762 }
 763
 764 /** Print the advanced search form
 765  */
 766 function asearch_print_form($imapConnection, &$boxes, $mailbox_array, $biop_array, $unop_array, $where_array, $what_array, $exclude_array, $sub_array)
 767 {
 768         global $search_button_html, $add_criteria_button_html, $del_excluded_button_html, $del_all_button_html;
 769         global $color;
 770
 771 //Search Form
 772         echo "<br />\n";
 773         echo '<form action="' . asearch_get_href() . '" name="form_asearch">' . "\n";
 774
 775         echo html_tag('table', '', 'center', $color[9], 'width="100%" cellpadding="1" cellspacing="1" border="0"');
 776         echo html_tag('tr', html_tag('td', asearch_get_title_display($color, _("Search Criteria")), 'center', $color[5], 'colspan=5'));
 777         $row_count = count($where_array);
 778         for ($row_num = 0; $row_num < $row_count; $row_num++) {
 779                 $mailbox = asearch_nz($mailbox_array[$row_num]);
 780                 $biop = strip_tags(asearch_nz($biop_array[$row_num]));
 781                 $unop = strip_tags(asearch_nz($unop_array[$row_num]));
 782                 $where = strip_tags(asearch_nz($where_array[$row_num]));
 783                 $what = asearch_nz($what_array[$row_num]);
 784                 $exclude = strip_tags(asearch_nz($exclude_array[$row_num]));
 785                 $sub = strip_tags(asearch_nz($sub_array[$row_num]));
 786                 asearch_print_form_row($imapConnection, $boxes, $mailbox, $biop, $unop, $where, $what, $exclude, $sub, $row_num);
 787         }
 788         echo '</table>' . "\n";
 789
 790 //Submit buttons
 791         echo html_tag('table', '', 'center', $color[9], 'width="100%" cellpadding="1" cellspacing="0" border="0"');
 792         echo html_tag('tr',
 793                                 html_tag('td', getButton('SUBMIT', 'submit', $search_button_html), 'center') . "\n"
 794                         . html_tag('td', getButton('SUBMIT', 'submit', $add_criteria_button_html), 'center') . "\n"
 795                         . html_tag('td', getButton('SUBMIT', 'submit', $del_all_button_html), 'center') . "\n"
 796                         . html_tag('td', getButton('SUBMIT', 'submit', $del_excluded_button_html), 'center') . "\n"
 797                         );
 798         echo '</table>' . "\n";
 799         echo '</form>' . "\n";
 800 }
 801
 802 /** Print one basic form row
 803  */
 804 function asearch_print_form_row_basic($imapConnection, &$boxes, $mailbox, $biop, $unop, $where, $what, $exclude, $sub, $row_num)
 805 {
 806         global $search_button_html;
 807         global $color;
 808
 809         echo html_tag('tr', '', '', $color[4]);
 810
 811 //Mailbox list
 812         echo html_tag('td', '<b>' . _("In") . '</b> ' . asearch_get_form_mailbox($imapConnection, $boxes, $mailbox), 'center') . "\n";
 813
 814 //Unary operator and Search location
 815         echo html_tag('td', asearch_get_form_location($unop, $where), 'center') . "\n";
 816
 817 //Text input
 818         echo html_tag('td', asearch_get_form_what($what), 'center') . "\n";
 819
 820 //Submit button
 821         echo html_tag('td', getButton('SUBMIT', 'submit', $search_button_html), 'center') . "\n";
 822
 823         echo "</tr>\n";
 824 }
 825
 826 /** Print the basic search form
 827  */
 828 function asearch_print_form_basic($imapConnection, &$boxes, $mailbox_array, $biop_array, $unop_array, $where_array, $what_array, $exclude_array, $sub_array)
 829 {
 830         global $color;
 831
 832 //Search Form
 833         echo "<br />\n";
 834         echo '<form action="' . asearch_get_href() . '" name="form_asearch">' . "\n";
 835
 836         echo html_tag('table', '', 'center', $color[9], 'width="100%" cellpadding="1" cellspacing="1" border="0"');
 837         //echo html_tag('tr', html_tag('td', asearch_get_title_display($color, _("Search Criteria")), 'center', $color[5], 'colspan=4'));
 838         $row_count = count($where_array);
 839         for ($row_num = 0; $row_num < $row_count; $row_num++) {
 840                 $mailbox = asearch_nz($mailbox_array[$row_num]);
 841                 $biop = strip_tags(asearch_nz($biop_array[$row_num]));
 842                 $unop = strip_tags(asearch_nz($unop_array[$row_num]));
 843                 $where = strip_tags(asearch_nz($where_array[$row_num]));
 844                 $what = asearch_nz($what_array[$row_num]);
 845                 $exclude = strip_tags(asearch_nz($exclude_array[$row_num]));
 846                 $sub = strip_tags(asearch_nz($sub_array[$row_num]));
 847                 asearch_print_form_row_basic($imapConnection, $boxes, $mailbox, $biop, $unop, $where, $what, $exclude, $sub, $row_num);
 848         }
 849         echo '</table>' . "\n";
 850         echo '</form>' . "\n";
 851 }
 852
 853 /** Print the $msgs messages from $mailbox mailbox
 854  */
 855 function asearch_print_mailbox_msgs($imapConnection, $mbxresponse, $mailbox, $msgs, $cnt, $sort, $color, $where, $what)
 856 {
 857         if ($cnt > 0) {
 858                 global $allow_server_sort, $allow_thread_sort, $thread_sort_messages;
 859
 860                 $thread_sort_messages = 0;
 861                 if ($allow_thread_sort) {
 862                         global $data_dir, $username;
 863                         $thread_sort_messages = getPref($data_dir, $username, 'thread_' . $mailbox);
 864                         $msort = $msgs;
 865                         $real_sort = 6;
 866                 }
 867                 elseif ($allow_server_sort) {
 868                         $msort = $msgs;
 869                         $real_sort = 6;
 870                 }
 871                 else {
 872                         $msort = calc_msort($msgs, $sort);
 873                         $real_sort = $sort;
 874                 }
 875
 876                 $mailbox_display = asearch_get_mailbox_display($mailbox);
 877                 $mailbox_title = '<b><big>' . _("Folder:") . ' '. $mailbox_display . '&nbsp;</big></b>';
 878                 $devel = check_sm_version(1, 5, 0);
 879                 if (!$devel) {
 880                         echo html_tag('div', $mailbox_title, 'center') . "\n";
 881                         $mailbox_title = get_selectall_link(1, $real_sort);
 882                 }
 883                 $msg_cnt_str = get_msgcnt_str(1, $cnt, $cnt);
 884
 885                 echo '<table border="0" width="100%" cellpadding="0" cellspacing="0">';
 886
 887                 echo '<tr><td>';
 888                 if ($devel)
 889                         mail_message_listing_beginning($imapConnection, $mbxresponse, $mailbox, $real_sort, $msg_cnt_str, $mailbox_title, 1, 1);
 890                 else
 891                         mail_message_listing_beginning($imapConnection, $mailbox, $real_sort, $msg_cnt_str, $mailbox_title, 1, 1);
 892                 echo '</td></tr>';
 893
 894                 echo '<tr><td HEIGHT="5" BGCOLOR="'.$color[4].'"></td></tr>';
 895
 896                 echo '<tr><td>';
 897                 echo '    <table width="100%" cellpadding="1" cellspacing="0" align="center"'.' border="0" bgcolor="'.$color[9].'">';
 898                 echo '     <tr><td>';
 899
 900                 echo '       <table width="100%" cellpadding="1" cellspacing="0" align="center" border="0" bgcolor="'.$color[5].'">';
 901                 echo '        <tr><td>';
 902                 printHeader($mailbox, $sort, $color, !$thread_sort_messages);
 903                 displayMessageArray($imapConnection, $cnt, 1, $msort, $mailbox, $real_sort, $color, $cnt, $where, $what);
 904                 echo '        </td></tr>';
 905                 echo '       </table>';
 906                 echo '     </td></tr>';
 907                 echo '    </table>';
 908                 mail_message_listing_end($cnt, '', $msg_cnt_str, $color);
 909                 echo '</td></tr>';
 910
 911                 echo '</table>';
 912         }
 913 }
 914
 915 /**
 916  * @param array $boxes mailboxes array (reference)
 917  * @return array selectable unformatted mailboxes names
 918  */
 919 function sqimap_asearch_get_selectable_unformatted_mailboxes(&$boxes)
 920 {
 921         $mboxes_array = array();
 922         $boxcount = count($boxes);
 923         for ($boxnum = 0; $boxnum < $boxcount; $boxnum++) {
 924                 if (!in_array('noselect', $boxes[$boxnum]['flags']))
 925                         $mboxes_array[] = $boxes[$boxnum]['unformatted'];
 926         }
 927         return $mboxes_array;
 928 }
 929
 930 /* ------------------------ main ------------------------ */
 931 /* get globals we will need */
 932 sqgetGlobalVar('username', $username, SQ_SESSION);
 933 sqgetGlobalVar('key', $key, SQ_COOKIE);
 934 sqgetGlobalVar('delimiter', $delimiter, SQ_SESSION);
 935 sqgetGlobalVar('onetimepad', $onetimepad, SQ_SESSION);
 936
 937 if ( sqgetGlobalVar('checkall', $temp, SQ_GET) ) {
 938   $checkall = (int) $temp;
 939 }
 940
 941 $search_button_html = _("Search");
 942 $search_button_text = asearch_unhtmlentities($search_button_html);
 943 $add_criteria_button_html = _("Add New Criteria");
 944 $add_criteria_button_text = asearch_unhtmlentities($add_criteria_button_html);
 945 $del_excluded_button_html = _("Remove Excluded Criteria");
 946 $del_excluded_button_text = asearch_unhtmlentities($del_excluded_button_html);
 947 $del_all_button_html = _("Remove All Criteria");
 948 $del_all_button_text = asearch_unhtmlentities($del_all_button_html);
 949
 950 /** Maximum number of recent searches to handle
 951  * Default 0
 952  * @global integer $search_memory
 953  */
 954 $search_memory = getPref($data_dir, $username, 'search_memory', 0);
 955
 956 /** Advanced search control
 957  * - 0 => allow basic interface only
 958  * - 1 => allow advanced interface only
 959  * - 2 => allow both
 960  * Default 2
 961  * @global integer $allow_advanced_search
 962  */
 963 $allow_advanced_search = asearch_nz($allow_advanced_search, 2);
 964
 965 /**
 966  * Toggle advanced/basic search
 967  */
 968 if (sqgetGlobalVar('advanced', $search_advanced, SQ_GET))
 969         setPref($data_dir, $username, 'search_advanced', $search_advanced & 1);
 970
 971 /** If 1, show advanced search interface
 972  * Default from allow_advanced_search pref
 973  * @global integer $search_advanced
 974  */
 975 if ($allow_advanced_search > 1)
 976         $search_advanced = getPref($data_dir, $username, 'search_advanced', 0);
 977 else
 978         $search_advanced = $allow_advanced_search;
 979
 980 if ($search_advanced) {
 981 /** Set recent prefkeys according to $search_advanced
 982  * @global array $recent_prefkeys
 983  */
 984         $recent_prefkeys = array('asearch_recent_where', 'asearch_recent_mailbox', 'asearch_recent_what', 'asearch_recent_unop', 'asearch_recent_biop', 'asearch_recent_exclude', 'asearch_recent_sub');
 985
 986 /** Set saved prefkeys according to $search_advanced
 987  * @global array $saved_prefkeys
 988  */
 989         $saved_prefkeys = array('asearch_saved_where', 'asearch_saved_mailbox', 'asearch_saved_what', 'asearch_saved_unop', 'asearch_saved_biop', 'asearch_saved_exclude', 'asearch_saved_sub');
 990
 991 /*$asearch_prefkeys = array('where', 'mailbox', 'what', 'biop', 'unop', 'exclude', 'sub');*/
 992 }
 993 else {
 994         $recent_prefkeys = array('search_where', 'search_folder', 'search_what', 'search_unop');
 995         $saved_prefkeys = array('saved_where', 'saved_folder', 'saved_what', 'saved_unop');
 996 }
 997
 998 /** How we did enter the form
 999  * - unset : Enter key, or called from outside (eg read_body)
1000  * - $search_button_text : Search button
1001  * - 'Search_no_update' : Search but don't update recent
1002  * - 'Search_last' : Same as no_update but reload and search last
1003  * - 'Search_silent' : Same as no_update but only display results
1004  * - $add_criteria_button_text : Add New Criteria button
1005  * - $del_excluded_button_text : Remove Excluded Criteria button
1006  * - $del_all_button_text : Remove All Criteria button
1007  * - 'save_recent'
1008  * - 'search_recent'
1009  * - 'forget_recent'
1010  * - 'edit_saved'
1011  * - 'search_saved'
1012  * - 'delete_saved'
1013  * @global string $submit
1014  */
1015 if (isset($_GET['submit']))
1016         $submit = strip_tags($_GET['submit']);
1017
1018 /** Searched mailboxes
1019  * @global array $mailbox_array
1020  */
1021 if (isset($_GET['mailbox'])) {
1022         $mailbox_array = $_GET['mailbox'];
1023         if (!is_array($mailbox_array))
1024                 $mailbox_array = array($mailbox_array);
1025 }
1026 else
1027         $mailbox_array = array();
1028
1029 /** Binary operators
1030  * @global array $biop_array
1031  */
1032 if (isset($_GET['biop'])) {
1033         $biop_array = $_GET['biop'];
1034         if (!is_array($biop_array))
1035                 $biop_array = array($biop_array);
1036 }
1037 else
1038         $biop_array = array();
1039
1040 /** Unary operators
1041  * @global array $unop_array
1042  */
1043 if (isset($_GET['unop'])) {
1044         $unop_array = $_GET['unop'];
1045         if (!is_array($unop_array))
1046                 $unop_array = array($unop_array);
1047 }
1048 else
1049         $unop_array = array();
1050
1051 /** Where to search
1052  * @global array $where_array
1053  */
1054 if (isset($_GET['where'])) {
1055         $where_array = $_GET['where'];
1056         if (!is_array($where_array))
1057                 $where_array = array($where_array);
1058 }
1059 else
1060         $where_array = array();
1061
1062 /** What to search
1063  * @global array $what_array
1064  */
1065 if (isset($_GET['what'])) {
1066         $what_array = $_GET['what'];
1067         if (!is_array($what_array))
1068                 $what_array = array($what_array);
1069 }
1070 else
1071         $what_array = array();
1072
1073 /** Whether to exclude this criteria from search
1074  * @global array $exclude_array
1075  */
1076 if (isset($_GET['exclude']))
1077         $exclude_array = $_GET['exclude'];
1078 else
1079         $exclude_array = array();
1080
1081 /** Search within subfolders
1082  * @global array $sub_array
1083  */
1084 if (isset($_GET['sub']))
1085         $sub_array = $_GET['sub'];
1086 else
1087         $sub_array = array();
1088
1089 /** Row number used by recent and saved stuff
1090  */
1091 if (isset($_GET['rownum']))
1092     $submit_rownum = strip_tags($_GET['rownum']);
1093
1094 /** Change global sort
1095  */
1096 if (sqgetGlobalVar('newsort', $newsort, SQ_GET)) {
1097         setPref($data_dir, $username, 'sort', $newsort);
1098         $sort = $newsort;
1099         sqsession_register($sort, 'sort');
1100         asearch_edit_last();
1101 }
1102
1103 /** Toggle mailbox threading
1104  */
1105 if (sqgetGlobalVar('set_thread', $set_thread, SQ_GET)) {
1106         setPref($data_dir, $username, 'thread_' . $mailbox_array[0], $set_thread & 1);
1107         asearch_edit_last();
1108 }
1109
1110 /** Toggle show/hide saved searches
1111  */
1112 if (sqgetGlobalVar('search_show_saved', $search_show_saved, SQ_GET))
1113         setPref($data_dir, $username, 'search_show_saved', $search_show_saved & 1);
1114
1115 /** Toggle show/hide recent searches
1116  */
1117 if (sqgetGlobalVar('search_show_recent', $search_show_recent, SQ_GET))
1118         setPref($data_dir, $username, 'search_show_recent', $search_show_recent & 1);
1119
1120 // end of get globals
1121
1122 /** If TRUE, do not show search interface
1123  * Default FALSE
1124  * @global bool $search_silent
1125  */
1126 $search_silent = FALSE;
1127
1128 /*  See how the page was called and fire off correct function  */
1129 if ((empty($submit)) && (!empty($where_array))) {
1130         /* This happens when the Enter key is used or called from outside */
1131         $submit = $search_button_text;
1132         if (count($where_array) != count($unop_array))  /* Hack needed to handle coming back from read_body et als */
1133                 asearch_edit_last();
1134 }
1135
1136 if (!isset($submit)) {
1137         $submit = '';
1138 }
1139 else {
1140         switch ($submit) {
1141                 case $search_button_text:
1142                         if (asearch_check_query($where_array, $what_array, $exclude_array) == '')
1143                                 asearch_push_recent($mailbox_array, $biop_array, $unop_array, $where_array, $what_array, $exclude_array, $sub_array);
1144                 break;
1145                 case 'Search_silent':
1146                         $search_silent = TRUE;
1147                 /*nobreak;*/
1148                 case 'Search_no_update':
1149                         $submit = $search_button_text;
1150                 break;
1151                 case $del_excluded_button_text:
1152                         $delarray = array_keys($exclude_array);
1153                         while (!empty($delarray)) {
1154                                 $delrow = array_pop($delarray);
1155                                 array_splice($mailbox_array, $delrow, 1);
1156                                 array_splice($biop_array, $delrow, 1);
1157                                 array_splice($unop_array, $delrow, 1);
1158                                 array_splice($where_array, $delrow, 1);
1159                                 array_splice($what_array, $delrow, 1);
1160 /*                      array_splice($exclude_array, $delrow, 1);*/     /* There is still some php magic that eludes me */
1161                                 array_splice($sub_array, $delrow, 1);
1162                         }
1163                         $exclude_array = array();
1164                 break;
1165                 case $del_all_button_text:
1166                         $mailbox_array = array();
1167                         $biop_array = array();
1168                         $unop_array = array();
1169                         $where_array = array();
1170                         $what_array = array();
1171                         $exclude_array = array();
1172                         $sub_array = array();
1173                 break;
1174                 case 'save_recent':
1175                         asearch_save_recent($submit_rownum);
1176                 break;
1177                 case 'search_recent':
1178                         $submit = $search_button_text;
1179                         asearch_edit_recent($submit_rownum);
1180                         asearch_push_recent($mailbox_array, $biop_array, $unop_array, $where_array, $what_array, $exclude_array, $sub_array);
1181                 break;
1182                 case 'edit_recent':     /* no link to do this, yet */
1183                         asearch_edit_recent($submit_rownum);
1184                 break;
1185                 case 'forget_recent':
1186                         asearch_forget_recent($submit_rownum);
1187                 break;
1188                 case 'search_saved':
1189                         $submit = $search_button_text;
1190                         asearch_edit_saved($submit_rownum);
1191                         asearch_push_recent($mailbox_array, $biop_array, $unop_array, $where_array, $what_array, $exclude_array, $sub_array);
1192                 break;
1193                 case 'edit_saved':
1194                         asearch_edit_saved($submit_rownum);
1195                 break;
1196                 case 'delete_saved':
1197                         asearch_delete_saved($submit_rownum);
1198                 break;
1199         }
1200 }
1201
1202 //Texts in both basic and advanced form
1203 $imap_asearch_unops = array(
1204         '' => '',
1205         'NOT' => _("Not")
1206 );
1207
1208 if ($search_advanced) {
1209         //Texts in advanced form only
1210         $imap_asearch_options = array(
1211                 //<message set>,
1212                 //'ALL' is binary operator
1213                 'ANSWERED' => _("Answered"),
1214                 'BCC' => _("Bcc"),
1215                 'BEFORE' => _("Before"),
1216                 'BODY' => _("Message Body"),
1217                 'CC' => _("CC"),
1218                 'DELETED' => _("Deleted"),
1219                 'DRAFT' => _("Draft"),
1220                 'FLAGGED' => _("Flagged"),
1221                 'FROM' => _("Sent By"),
1222                 'HEADER' => _("Header Field"),
1223                 'KEYWORD' => _("Keyword"),
1224                 'LARGER' => _("Larger Than"),
1225                 'NEW' => _("New"),
1226                 //'NOT' is unary operator
1227                 'OLD' => _("Old"),
1228                 'ON' => _("On"),
1229                 //'OR' is binary operator
1230                 'RECENT' => _("Recent"),
1231                 'SEEN' => _("Seen"),
1232                 'SENTBEFORE' => _("Sent Before"),
1233                 'SENTON' => _("Sent On"),
1234                 'SENTSINCE' => _("Sent Since"),
1235                 'SINCE' => _("Since"),
1236                 'SMALLER' => _("Smaller Than"),
1237                 'SUBJECT' => _("Subject Contains"),
1238                 'TEXT' => _("Header and Body"),
1239                 'TO' => _("Sent To"),
1240                 //'UID' => 'anum',
1241 /*      'UNANSWERED' => '',
1242                 'UNDELETED' => '',
1243                 'UNDRAFT' => '',
1244                 'UNFLAGGED' => '',
1245                 'UNKEYWORD' => _("Unkeyword"),
1246                 'UNSEEN' => _("Unseen"),*/
1247         );
1248
1249         $imap_asearch_biops_in = array(
1250                 'ALL' => _("And In"),
1251                 'OR' => _("Or In")
1252         );
1253
1254         $imap_asearch_biops = array(
1255                 'ALL' => _("And"),
1256                 'OR' => _("Or")
1257         );
1258 }
1259 else {
1260         //Texts in basic form only
1261         $imap_asearch_options = array(
1262                 'BCC' => _("Bcc"),
1263                 'BODY' => _("Body"),
1264                 'CC' => _("Cc"),
1265                 'FROM' => _("From"),
1266                 'SUBJECT' => _("Subject"),
1267                 'TEXT' => _("Everywhere"),
1268                 'TO' => _("To"),
1269         );
1270 }
1271
1272 uasort($imap_asearch_options, 'asearch_unhtml_strcoll');
1273
1274 /* open IMAP connection */
1275 $imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0);
1276 /* get mailboxes once here */
1277 $boxes = sqimap_mailbox_list($imapConnection);
1278 /* ensure we have a valid default mailbox name */
1279 $mailbox = asearch_nz($mailbox_array[0]);
1280 if (($mailbox == '') || ($mailbox == 'None'))   //Workaround for sm quirk IMHO (what if I really have a mailbox called None?)
1281         $mailbox = $boxes[0]['unformatted'];    //Usually INBOX ;)
1282
1283 if (isset($composenew) && $composenew) {
1284         $comp_uri = "../src/compose.php?mailbox=" . urlencode($mailbox)
1285                 . "&amp;session=$composesession&amp;attachedmessages=true&amp";
1286         displayPageHeader($color, $mailbox, "comp_in_new('$comp_uri');", false);
1287 }
1288 else
1289         displayPageHeader($color, $mailbox);
1290
1291 do_hook('search_before_form');
1292
1293 if (!$search_silent) {
1294         //Add a link to the other search mode if allowed
1295         if ($allow_advanced_search > 1)
1296                 $toggle_link = ' - <small>['
1297                         . asearch_get_toggle_link(!$search_advanced, 'advanced', array(_("Standard search"), _("Advanced search")))
1298                         . ']</small>';
1299         else
1300                 $toggle_link = '';
1301
1302         echo html_tag('table',
1303                                 html_tag('tr', "\n"
1304                                 . html_tag('td', asearch_get_title_display($color, _("Search")) . $toggle_link, 'center', $color[0])
1305                                         ) ,
1306                                 '', '', 'width="100%"') . "\n";
1307         asearch_print_saved($boxes);
1308         asearch_print_recent($boxes);
1309         if (empty($where_array)) {
1310                 global $sent_folder;
1311
1312                 $mailbox_array[0] = $mailbox;
1313                 $biop_array[0] = '';
1314                 $unop_array[0] = '';
1315                 if ($mailbox == $sent_folder)
1316                         $where_array[0] = 'TO';
1317                 else
1318                         $where_array[0] = 'FROM';
1319                 $what_array[0] = '';
1320                 $exclude_array[0] = '';
1321                 $sub_array[0] = '';
1322         }
1323         //Display advanced or basic form
1324         if ($search_advanced) {
1325                 if ($submit == $add_criteria_button_text) {
1326                         $last_index = max(count($where_array) - 1, 0);
1327                         $mailbox_array[] = asearch_nz($mailbox_array[$last_index]);
1328                         $biop_array[] = asearch_nz($biop_array[$last_index]);
1329                         $unop_array[] = asearch_nz($unop_array[$last_index]);
1330                         $where_array[] = asearch_nz($where_array[$last_index]);
1331                         $what_array[] = asearch_nz($what_array[$last_index]);
1332                         $exclude_array[] = asearch_nz($exclude_array[$last_index]);
1333                         $sub_array[] = asearch_nz($sub_array[$last_index]);
1334                 }
1335                 asearch_print_form($imapConnection, $boxes, $mailbox_array, $biop_array, $unop_array, $where_array, $what_array, $exclude_array, $sub_array);
1336         }
1337         else
1338                 asearch_print_form_basic($imapConnection, $boxes, $mailbox_array, $biop_array, $unop_array, $where_array, $what_array, $exclude_array, $sub_array);
1339 }
1340
1341 /*********************************************************************
1342  * Check to see if we can use cache or not. Currently the only time  *
1343  * when you will not use it is when a link on the left hand frame is *
1344  * used. Also check to make sure we actually have the array in the   *
1345  * registered session data.  :)                                      *
1346  *********************************************************************/
1347 if (!isset($use_mailbox_cache))
1348     $use_mailbox_cache = 0;
1349
1350 do_hook('search_after_form');
1351
1352 if ($submit == $search_button_text) {
1353         echo html_tag('table', '', 'center', $color[9], 'width="100%" cellpadding="1" cellspacing="0" border="0"');
1354         echo html_tag('tr', html_tag('td', asearch_get_title_display($color, _("Search Results")), 'center', $color[5]));
1355         echo html_tag('tr', html_tag('td', asearch_get_query_display($color, $mailbox_array, $biop_array, $unop_array, $where_array, $what_array, $exclude_array, $sub_array), 'center', $color[4]));
1356         echo '</table>' . "\n";
1357
1358         flush();
1359
1360         $query_error = asearch_check_query($where_array, $what_array, $exclude_array);
1361         if ($query_error != '')
1362                 echo '<br />' . html_tag('div', asearch_get_error_display($color, $query_error), 'center') . "\n";
1363         else {
1364                 // Disable thread sort for now if there is more than one mailbox or at least one 'All Folders'
1365                 global $allow_thread_sort;
1366                 $old_allow_thread_sort = $allow_thread_sort;
1367                 $allow_thread_sort = ((count(array_unique($mailbox_array)) <= 1) && (!in_array('All Folders', $mailbox_array)));
1368
1369                 $mboxes_array = sqimap_asearch_get_selectable_unformatted_mailboxes($boxes);
1370                 $mboxes_msgs = sqimap_asearch($imapConnection, $mailbox_array, $biop_array, $unop_array, $where_array, $what_array, $exclude_array, $sub_array, $mboxes_array);
1371                 if (empty($mboxes_msgs))
1372                         echo '<br />' . html_tag('div', asearch_get_error_display($color, _("No Messages Found")), 'center') . "\n";
1373                 else {
1374                         foreach($mboxes_msgs as $mailbox => $msgs) {
1375                                 echo '<br />';
1376                                 $mbxresponse = sqimap_mailbox_select($imapConnection, $mailbox);
1377                                 $msgs = fillMessageArray($imapConnection, $msgs, count($msgs));
1378 /* For now just keep the first criteria to make the regular search happy if the user tries to come back to search */
1379 /*                      $where = asearch_serialize($where_array);
1380                                 $what = asearch_serialize($what_array);*/
1381                                 $where = $where_array[0];
1382                                 $what = $what_array[0];
1383                                 asearch_print_mailbox_msgs($imapConnection, $mbxresponse, $mailbox, $msgs, count($msgs), $sort, $color, urlencode($where), urlencode($what));
1384                         }
1385                 }
1386
1387                 $allow_thread_sort = $old_allow_thread_sort;    // Restore thread sort
1388         }
1389 }
1390
1391 do_hook('search_bottom');
1392 sqimap_logout($imapConnection);
1393 echo '</body></html>';
1394
1395 ?>