-require_once('../src/validate.php');
-require_once('../functions/imap.php');
-require_once('../functions/imap_search.php');
-require_once('../functions/array.php');
-require_once('../functions/strings.php');
-
-
-/* here are some functions, could go in imap_search.php
-
- this was here, pretty handy */
-function s_opt( $val, $sel, $tit ) {
- echo " <option value=\"$val\"";
- if ( $sel == $val ) {
- echo ' selected';
- }
- echo ">$tit</option>\n";
-}
-
-/* function to get the recent searches and put them in arrays */
-function get_recent($pref_name, $username, $data_dir) {
- $array = array ();
- $recent_count = getPref($data_dir, $username, 'search_memory', 0);
- $n = 0;
- for ($x=1;$x<=$recent_count;$x++) {
- $array[$n] = getPref($data_dir, $username, "$pref_name" . "$x", "");
- $n++;
- }
- return $array;
-}
-
-/* function to get the saved searches and put them in arrays */
-function get_saved($pref_name, $username, $data_dir) {
- $array = array ();
- $n = 0;
- for ($x=1;;$x++) {
- $array[$n] = getPref($data_dir, $username, "$pref_name" . "$x", "");
- if ($array[$n] == "") {
- array_pop($array);
- return $array;
- }
- $n++;
- }
- return $array;
-}
-
-/* function to update recent pref arrays */
-function update_recent($what, $where, $mailbox, $username, $data_dir) {
- $what_array = get_recent('search_what', $username, $data_dir);
- $where_array = get_recent('search_where', $username, $data_dir);
- $folder_array = get_recent('search_folder', $username, $data_dir);
- $dupe = 'no';
- for ($i=0;$i<count($what_array);$i++) {
- if ($what == $what_array[$i] &&
- $where == $where_array[$i] &&
- $mailbox == $folder_array[$i]) {
-
- $dupe = 'yes';
- }
- }
- if ($dupe == 'no') {
- array_push ($what_array, $what);
- array_push ($where_array, $where);
- array_push ($folder_array, $mailbox);
- array_shift ($what_array);
- array_shift ($where_array);
- array_shift ($folder_array);
- $recent_count = getPref($data_dir, $username, 'search_memory', 0);
- $n=0;
- for ($i=1;$i<=$recent_count;$i++) {
- setPref($data_dir, $username, "search_what$i", $what_array[$n]);
- setPref($data_dir, $username, "search_where$i", $where_array[$n]);
- setPref($data_dir, $username, "search_folder$i", $folder_array[$n]);
- $n++;
- }
- }
-}
-
-/* function to forget a recent search */
-function forget_recent($forget_index, $username, $data_dir) {
- $what_array = get_recent('search_what', $username, $data_dir);
- $where_array = get_recent('search_where', $username, $data_dir);
- $folder_array = get_recent('search_folder', $username, $data_dir);
- array_splice($what_array, $forget_index, 1);
- array_splice($where_array, $forget_index, 1);
- array_splice($folder_array, $forget_index, 1);
- array_unshift($what_array, '');
- array_unshift($where_array, '');
- array_unshift($folder_array, '');
- $recent_count = getPref($data_dir, $username, 'search_memory', 0);
- $n=0;
- for ($i=1;$i<=$recent_count;$i++) {
- setPref($data_dir, $username, "search_what$i", $what_array[$n]);
- setPref($data_dir, $username, "search_where$i", $where_array[$n]);
- setPref($data_dir, $username, "search_folder$i", $folder_array[$n]);
- $n++;
- }
-}
-
-/* function to delete a saved search */
-function delete_saved($delete_index, $username, $data_dir) {
- $saved_what_array = get_saved('saved_what', $username, $data_dir);
- $saved_where_array = get_saved('saved_where', $username, $data_dir);
- $saved_folder_array = get_saved('saved_folder', $username, $data_dir);
- array_splice($saved_what_array, $delete_index, 1);
- array_splice($saved_where_array, $delete_index, 1);
- array_splice($saved_folder_array, $delete_index, 1);
- $n=0;
- $saved_count = count($saved_what_array);
- $last_element = $saved_count + 1;
- if ($last_element < 1) {
- for ($i=1;$i<=$saved_count;$i++) {
- setPref($data_dir, $username, "saved_what$i", $saved_what_array[$n]);
- setPref($data_dir, $username, "saved_where$i", $saved_where_array[$n]);
- setPref($data_dir, $username, "saved_folder$i", $saved_folder_array[$n]);
- $n++;
- }
- }
- removePref($data_dir, $username, "saved_what$last_element");
- removePref($data_dir, $username, "saved_where$last_element");
- removePref($data_dir, $username, "saved_folder$last_element");
-}
-
-/* function to save a search from recent to saved */
-function save_recent($save_index, $username, $data_dir) {
- $what_array = get_recent('search_what', $username, $data_dir);
- $where_array = get_recent('search_where', $username, $data_dir);
- $folder_array = get_recent('search_folder', $username, $data_dir);
- $saved_what_once = array_slice($what_array, $save_index, 1);
- $saved_where_once = array_slice($where_array, $save_index, 1);
- $saved_folder_once = array_slice($folder_array, $save_index, 1);
- $saved_array = get_saved('saved_what', $username, $data_dir);
- $saved_count = (count($saved_array) + 1);
- setPref($data_dir, $username, "saved_what$saved_count", $saved_what_once[0]);
- setPref($data_dir, $username, "saved_where$saved_count", $saved_where_once[0]);
- setPref($data_dir, $username, "saved_folder$saved_count", $saved_folder_once[0]);
+/** Edit a saved search */
+function asearch_edit_saved($data_dir, $username, $index)
+{
+ global $mailbox_array, $biop_array, $unop_array, $where_array, $what_array, $exclude_array, $sub_array;
+
+ $mailbox_array = asearch_unserialize(asearch_getPref($data_dir, $username, 'asearch_saved_mailbox', $index));
+ $biop_array = asearch_unserialize(asearch_getPref($data_dir, $username, 'asearch_saved_biop', $index));
+ $unop_array = asearch_unserialize(asearch_getPref($data_dir, $username, 'asearch_saved_unop', $index));
+ $where_array = asearch_unserialize(asearch_getPref($data_dir, $username, 'asearch_saved_where', $index));
+ $what_array = asearch_unserialize(asearch_getPref($data_dir, $username, 'asearch_saved_what', $index));
+ $exclude_array = asearch_unserialize(asearch_getPref($data_dir, $username, 'asearch_saved_exclude', $index));
+ $sub_array = asearch_unserialize(asearch_getPref($data_dir, $username, 'asearch_saved_sub', $index));
+}
+
+/** Write a saved searches */
+function asearch_write_saved($data_dir, $username, $saved_array)
+{
+ global $saved_prefkeys;
+
+ $saved_count = count($saved_array[$saved_prefkeys[0]]);
+ for ($saved_num=0; $saved_num < $saved_count; $saved_num++) {
+ foreach ($saved_prefkeys as $key) {
+ asearch_setPref($data_dir, $username, $key, $saved_num, $saved_array[$key][$saved_num]);
+ }
+ }
+ foreach ($saved_prefkeys as $key) {
+ asearch_removePref($data_dir, $username, $key, $saved_count);
+ }
+}
+
+/** Delete a saved search */
+function asearch_delete_saved($data_dir, $username, $saved_index)
+{
+ global $saved_prefkeys;
+
+ $saved_array = asearch_read_saved($data_dir, $username);
+ $asearch_keys = $saved_prefkeys;
+ foreach ($asearch_keys as $key) {
+ array_splice($saved_array[$key], $saved_index, 1);
+ }
+ asearch_write_saved($data_dir, $username, $saved_array);
+}
+
+/** Translate the input date to imap date to local date display, so the user can know if the date is wrong or illegal */
+function asearch_get_date_display($what)
+{
+ $what_parts = sqimap_asearch_parse_date($what);
+ if (count($what_parts) == 4) {
+ if (checkdate($what_parts[2], $what_parts[1], $what_parts[3])) {
+ $what_display = date_intl(_("M j, Y"), mktime(0,0,0,$what_parts[2],$what_parts[1],$what_parts[3]));
+ /*$what_display = $what_parts[1] . ' ' . getMonthName($what_parts[2]) . ' ' . $what_parts[3];*/
+ }
+ else
+ $what_display = _("(Illegal date)");
+ }
+ else
+ $what_display = _("(Wrong date)");
+ return $what_display;
+}
+
+/** Translate the query to rough natural display */
+function asearch_get_query_display($color, $mailbox_array, $biop_array, $unop_array, $where_array, $what_array, $exclude_array, $sub_array)
+{
+ global $imap_asearch_biops_in, $imap_asearch_biops, $imap_asearch_unops, $imap_asearch_options;
+ global $imap_asearch_opcodes;
+
+ $last_mailbox = $mailbox_array[0];
+ if (empty($last_mailbox))
+ $last_mailbox = 'INBOX';
+ $query_display = '';
+ for ($crit_num=0; $crit_num < count($where_array); $crit_num++) {
+ if ((!isset($exclude_array[$crit_num])) || (!$exclude_array[$crit_num])) {
+ $cur_mailbox = $mailbox_array[$crit_num];
+ if (empty($cur_mailbox))
+ $cur_mailbox = 'INBOX';
+ $biop = asearch_nz($biop_array[$crit_num]);
+ if (($query_display == '') || ($cur_mailbox != $last_mailbox)) {
+ $mailbox_display = ' <B>' . asearch_get_mailbox_display($cur_mailbox) . '</B>';
+ if ($query_display == '')
+ $biop_display = _("In");
+ else
+ $biop_display = $imap_asearch_biops_in[$biop];
+ $last_mailbox = $cur_mailbox;
+ }
+ else {
+ $mailbox_display = '';
+ $biop_display = $imap_asearch_biops[$biop];
+ }
+ $biop_display = ' <U><I>' . $biop_display . '</I></U>';
+ $unop = $unop_array[$crit_num];
+ $unop_display = $imap_asearch_unops[$unop];
+ $where = $where_array[$crit_num];
+ $where_display = $imap_asearch_options[$where];
+ if ($unop_display != '')
+ $where_display = ' <U><I>' . $unop_display . ' ' . $where_display . '</I></U>';
+ else
+ $where_display = ' <U><I>' . $where_display . '</I></U>';
+ $what_type = $imap_asearch_opcodes[$where];
+ $what = $what_array[$crit_num];
+ if ($what_type) { /* Check opcode parameter */
+ if ($what == '')
+ $what_display = ' ' . asearch_get_error_display($color, _("(Missing argument)"));
+ else {
+ if ($what_type == 'adate')
+ $what_display = asearch_get_date_display($what);
+ else
+ $what_display = htmlspecialchars($what);
+ $what_display = ' <B>' . $what_display . '</B>';
+ }
+ }
+ else {
+ if ($what)
+ $what_display = ' ' . asearch_get_error_display($color, _("(Spurious argument)"));
+ else
+ $what_display = '';
+ }
+ $query_display .= ' ' . $biop_display . $mailbox_display . $where_display . $what_display;
+ }
+ }
+ return $query_display;
+}
+
+/** Handle the alternate row colors */
+function asearch_get_row_color($color, $row_num)
+{
+/*$color_string = ($row_num%2 ? $color[0] : $color[4]);*/
+ $color_string = $color[4];
+ if ($GLOBALS['alt_index_colors']) {
+ if (($row_num % 2) == 0) {
+ if (!isset($color[12]))
+ $color[12] = '#EAEAEA';
+ $color_string = $color[12];
+ }
+ }
+ return $color_string;
+}
+
+/** Print a whole query array, recent or saved */
+function asearch_print_query_array($query_array, $query_keys, $action_array, $title)
+{
+ global $color;
+
+ echo "<br>\n";
+ echo html_tag('table', '', 'center', $color[9], 'width="95%" cellpadding="1" cellspacing="1" border="0"');
+ echo html_tag('tr', html_tag('td', asearch_get_title_display($color, $title), 'center', $color[5], 'colspan=5'));
+ $main_key = $query_keys[0];
+ $query_count = count($query_array[$main_key]);
+ for ($query_num=0, $row_num=0; $query_num<$query_count; $query_num++) {
+ if (!empty($query_array[$main_key][$query_num])) {
+ echo html_tag('tr', '', '', asearch_get_row_color($color, $row_num));
+
+ unset($search_array);
+ foreach ($query_keys as $query_key) {
+ $search_array[] = asearch_unserialize($query_array[$query_key][$query_num]);
+ }
+ $mailbox_array = $search_array[1];
+ $biop_array = $search_array[3];
+ $unop_array = $search_array[4];
+ $where_array = $search_array[0];
+ $what_array = $search_array[2];
+ $exclude_array = $search_array[5];
+ $sub_array = $search_array[6];
+ $query_display = asearch_get_query_display($color, $mailbox_array, $biop_array, $unop_array, $where_array, $what_array, $exclude_array, $sub_array);
+
+ echo html_tag('td', $query_num+1, 'right');
+ echo html_tag('td', $query_display, 'center', '', 'width="80%"');
+ foreach ($action_array as $action => $action_display) {
+ echo html_tag('td', '<a href=search.php?submit=' . $action . '&rownum=' . $query_num . '>' . $action_display . '</a>', 'center');
+ }
+
+ echo '</tr>' . "\n";
+ $row_num++;
+ }
+ }
+ echo '</table>' . "\n";
+}
+
+/** Print the saved array */
+function asearch_print_saved($data_dir, $username)
+{
+ global $saved_prefkeys;
+
+ $saved_array = asearch_read_saved($data_dir, $username);
+ if (isset($saved_array[$saved_prefkeys[0]])) {
+ $saved_count = count($saved_array[$saved_prefkeys[0]]);
+ if ($saved_count > 0) {
+ $saved_actions = array('edit_saved' => _("edit"), 'search_saved' => _("search"), 'delete_saved' => _("delete"));
+ asearch_print_query_array($saved_array, $saved_prefkeys, $saved_actions, _("Saved Searches"));
+ }
+ }
+}
+
+/** Print the recent array */
+function asearch_print_recent($data_dir, $username)
+{
+ global $recent_prefkeys;
+
+ $recent_array = asearch_read_recent($data_dir, $username);
+ if (isset($recent_array[$recent_prefkeys[0]])) {
+ $recent_count = count($recent_array[$recent_prefkeys[0]]);
+ $recent_max = min($recent_count, getPref($data_dir, $username, 'search_memory', 0));
+ if ($recent_max > 0) {
+ $recent_actions = array('save_recent' => _("save"), 'search_recent' => _("search"), 'forget_recent' => _("forget"));
+ asearch_print_query_array($recent_array, $recent_prefkeys, $recent_actions, _("Recent Searches"));
+ }
+ }
+}
+
+/** Build an <option> statement */
+function asearch_opt($val, $sel, $tit)
+{
+ return '<option value="' . $val . '"' . ($sel == $val ? ' selected' : '') . '>' . $tit . '</option>' . "\n";
+}
+
+/** Build a <select> statement from an array */
+function asearch_opt_array($var_name, $opt_array, $cur_val)
+{
+ $output = '<select name="' . $var_name . '">' . "\n";
+ foreach($opt_array as $val => $display)
+ $output .= asearch_opt($val, $cur_val, $display);
+ $output .= '</select>' . "\n";
+ return $output;
+}
+
+/** Verify that a mailbox exists */
+function asearch_mailbox_exists($mailbox, $boxes)
+{
+ foreach ($boxes as $box) {
+ if ($box['unformatted'] == $mailbox)
+ return TRUE;
+ }
+ return FALSE;
+}
+
+/** Print one form row */
+function asearch_print_form_row($imapConnection, $boxes, $mailbox, $biop, $unop, $where, $what, $exclude, $sub, $row_num)
+{
+ global $imap_asearch_biops_in, $imap_asearch_unops, $imap_asearch_options;
+ global $color;
+
+ echo html_tag('tr', '', '', $color[4]);
+
+ echo html_tag('td', '', 'center');
+/* Binary operator */
+ if ($row_num)
+ echo asearch_opt_array('biop[' . $row_num . ']', $imap_asearch_biops_in, $biop);
+ else
+ echo /*'<input type="hidden" name="biop[0]" value="">' .*/ '<b>' . _("In") . '</b>';
+ echo "</td>\n";
+
+ echo html_tag('td', '', 'center');
+/* Mailbox list */
+ echo '<select name="mailbox[' . $row_num . ']">';
+ if (($mailbox != 'All Folders') && (!asearch_mailbox_exists($mailbox, $boxes)))
+ echo asearch_opt($mailbox, $mailbox, '[' . _("Missing") . '] ' . asearch_get_mailbox_display($mailbox));
+ echo asearch_opt('All Folders', $mailbox, '[' . asearch_get_mailbox_display('All Folders') . ']');
+ echo sqimap_mailbox_option_list($imapConnection, array(strtolower($mailbox)), 0, $boxes, NULL);
+ echo '</select>' . "\n";
+
+/* Include Subfolders */
+ echo _("and subfolders:") .
+ addCheckBox('sub[' . $row_num .']', $sub) . '</td>' . "\n";
+
+/* Unary operator and Search location */
+ echo html_tag('td',
+ asearch_opt_array('unop[' . $row_num . ']', $imap_asearch_unops, $unop)
+ . asearch_opt_array('where[' . $row_num . ']', $imap_asearch_options, $where),
+ 'center');
+
+/* Text input */
+ echo html_tag('td', addInput('what['.$row_num.']', $what, '35'), 'center') . "\n";
+
+/* Exclude criteria */
+ echo html_tag('td',
+ _("Exclude Criteria:") . sm_print_r($exclude) .
+ addCheckBox('exclude['.$row_num.']', $exclude), 'center', '') . "\n";
+
+ echo "</tr>\n";
+}
+
+/** Print the search form */
+function asearch_print_form($imapConnection, $boxes, $mailbox_array, $biop_array, $unop_array, $where_array, $what_array, $exclude_array, $sub_array)
+{
+ global $search_button_html, $add_criteria_button_html, $del_excluded_button_html, $del_all_button_html;
+ global $color;
+
+ /* Search Form */
+ echo "<br>\n";
+ echo '<form action="search.php" name="form_asearch">' . "\n";
+
+ echo html_tag('table', '', 'center', $color[9], 'width="100%" cellpadding="1" cellspacing="1" border="0"');
+ echo html_tag('tr', html_tag('td', asearch_get_title_display($color, _("Search Criteria")), 'center', $color[5], 'colspan=5'));
+ $row_count = count($where_array);
+ for ($row_num = 0; $row_num < $row_count; $row_num++) {
+ $mailbox = asearch_nz($mailbox_array[$row_num]);
+ $biop = strip_tags(asearch_nz($biop_array[$row_num]));
+ $unop = strip_tags(asearch_nz($unop_array[$row_num]));
+ $where = strip_tags(asearch_nz($where_array[$row_num]));
+ $what = asearch_nz($what_array[$row_num]);
+ $exclude = strip_tags(asearch_nz($exclude_array[$row_num]));
+ $sub = strip_tags(asearch_nz($sub_array[$row_num]));
+ asearch_print_form_row($imapConnection, $boxes, $mailbox, $biop, $unop, $where, $what, $exclude, $sub, $row_num);
+ }
+ echo '</table>' . "\n";
+
+/* Submit buttons */
+ echo html_tag('table', '', 'center', $color[9], 'width="100%" cellpadding="1" cellspacing="0" border="0"');
+ echo html_tag('tr',
+ html_tag('td', getButton('SUBMIT', 'submit', $search_button_html), 'center') . "\n"
+ . html_tag('td', getButton('SUBMIT', 'submit', $add_criteria_button_html), 'center') . "\n"
+ . html_tag('td', getButton('SUBMIT', 'submit', $del_all_button_html), 'center') . "\n"
+ . html_tag('td', getButton('SUBMIT', 'submit', $del_excluded_button_html), 'center') . "\n"
+ );
+ echo '</table>' . "\n";
+ echo '</form>' . "\n";
+}
+
+/** Print the $msgs messages from $mailbox mailbox */
+function asearch_print_mailbox_msgs($imapConnection, $mailbox, $msgs, $cnt, $sort, $color, $where, $what)
+{
+ if ($cnt > 0) {
+ global $allow_server_sort, $allow_thread_sort, $thread_sort_messages;
+
+ $thread_sort_messages = 0;
+ if ($allow_thread_sort) {
+ global $data_dir, $username;
+ $thread_sort_messages = getPref($data_dir, $username, 'thread_' . $mailbox);
+ $msort = $msgs;
+ $real_sort = 6;
+ }
+ elseif ($allow_server_sort) {
+ $msort = $msgs;
+ $real_sort = 6;
+ }
+ else {
+ $msort = calc_msort($msgs, $sort);
+ $real_sort = $sort;
+ }
+ $mailbox_display = asearch_get_mailbox_display($mailbox);
+
+ $msg_cnt_str = get_msgcnt_str(1, $cnt, $cnt);
+ $paginator_str = '<b><big>' . _("Folder:") . ' '. $mailbox_display . ' </big></b>';
+
+ echo '<br><table border="0" width="100%" cellpadding="0" cellspacing="0">';
+
+ echo '<tr><td>';
+ mail_message_listing_beginning($imapConnection, NULL, $mailbox, $real_sort, $msg_cnt_str, $paginator_str, 1, 1);
+ echo '</td></tr>';
+
+ echo '<tr><td HEIGHT="5" BGCOLOR="'.$color[4].'"></td></tr>';
+
+ echo '<tr><td>';
+ echo ' <table width="100%" cellpadding="1" cellspacing="0" align="center"'.' border="0" bgcolor="'.$color[9].'">';
+ echo ' <tr><td>';
+
+ echo ' <table width="100%" cellpadding="1" cellspacing="0" align="center" border="0" bgcolor="'.$color[5].'">';
+ echo ' <tr><td>';
+ printHeader($mailbox, $sort, $color, !$thread_sort_messages);
+ displayMessageArray($imapConnection, $cnt, 1, $msort, $mailbox, $real_sort, $color, $cnt, $where, $what);
+ echo ' </td></tr>';
+ echo ' </table>';
+ echo ' </td></tr>';
+ echo ' </table>';
+ mail_message_listing_end($cnt, '', $msg_cnt_str, $color);
+ echo '</td></tr>';
+
+ echo '</table>';
+ }
+}
+
+/**
+ * @param array $boxes mailboxes array (reference)
+ * @return array selectable unformatted mailboxes names
+ */
+function sqimap_asearch_get_selectable_unformatted_mailboxes(&$boxes)
+{
+ $mboxes_array = array();
+ $boxcount = count($boxes);
+ for ($boxnum=0; $boxnum<$boxcount; $boxnum++) {
+ if (!in_array('noselect', $boxes[$boxnum]['flags']))
+ $mboxes_array[] = $boxes[$boxnum]['unformatted'];
+ }
+ return $mboxes_array;