webcit/sieve.c

   1 /*
   2  * $Id: $
   3  */
   4 /**
   5  * \defgroup Sieve view/edit sieve config
   6  * \ingroup WebcitDisplayItems
   7  */
   8 /*@{*/
   9 #include "webcit.h"
  10
  11 #define MAX_SCRIPTS     100
  12 #define MAX_RULES       8
  13
  14 /**
  15  * \brief view/edit sieve config
  16  */
  17 void display_sieve(void)
  18 {
  19         char script_names[MAX_SCRIPTS][64];
  20         int num_scripts = 0;
  21         int active_script = (-1);
  22         char buf[256];
  23         int i;
  24
  25
  26         memset(script_names, 0, sizeof script_names);
  27
  28         serv_puts("MSIV listscripts");
  29         serv_getln(buf, sizeof(buf));
  30         if (buf[0] == '1') while (serv_getln(buf, sizeof(buf)), strcmp(buf, "000")) {
  31                 if (num_scripts < MAX_SCRIPTS) {
  32                         extract_token(script_names[num_scripts], buf, 0, '|', 64);
  33                         if (extract_int(buf, 1) > 0) {
  34                                 active_script = num_scripts;
  35                         }
  36                         ++num_scripts;
  37                 }
  38         }
  39
  40         output_headers(1, 1, 2, 0, 0, 0);
  41
  42         wprintf("<script type=\"text/javascript\">                                      \n"
  43                 "                                                                       \n"
  44                 "var previously_active_script;                                          \n"
  45                 "                                                                       \n"
  46                 "function ToggleSievePanels() {                                         \n"
  47                 " d = ($('sieveform').bigaction.options[$('sieveform').bigaction.selectedIndex].value); \n"
  48                 " for (i=0; i<3; ++i) {                                                 \n"
  49                 "  if (i == d) {                                                        \n"
  50                 "   $('sievediv' + i).style.display = 'block';                          \n"
  51                 "  }                                                                    \n"
  52                 "  else {                                                               \n"
  53                 "   $('sievediv' + i).style.display = 'none';                           \n"
  54                 "  }                                                                    \n"
  55                 " }                                                                     \n"
  56                 "}                                                                      \n"
  57                 "                                                                       \n"
  58                 "function ToggleScriptPanels() {                                        \n"
  59                 " d = ($('sieveform').active_script.options[$('sieveform').active_script.selectedIndex].value); \n"
  60                 " if ($('script_' + previously_active_script)) {                        \n"
  61                 "  $('script_' + previously_active_script).style.display = 'none';      \n"
  62                 " }                                                                     \n"
  63                 " $('script_' + d).style.display = 'block';                             \n"
  64                 " previously_active_script = d;                                         \n"
  65                 "}                                                                      \n"
  66                 "                                                                       \n"
  67                 "</script>                                                              \n"
  68         );
  69
  70         wprintf("<div id=\"banner\">\n");
  71         wprintf("<TABLE WIDTH=100%% BORDER=0 BGCOLOR=\"#444455\"><TR><TD>");
  72         wprintf("<SPAN CLASS=\"titlebar\">"
  73                 "<img src=\"static/advanpage2_48x.gif\">");
  74         wprintf(_("View/edit server-side mail filters"));
  75         wprintf("</SPAN>\n");
  76         wprintf("</TD></TR></TABLE>\n");
  77         wprintf("</div>\n<div id=\"content\">\n");
  78
  79         wprintf("<div class=\"fix_scrollbar_bug\">"
  80                 "<table border=0 width=100%% bgcolor=\"#FFFFFF\">"
  81                 "<tr><td valign=top>\n");
  82
  83
  84         wprintf("<form id=\"sieveform\" method=\"post\" action=\"save_sieve\">\n");
  85
  86         wprintf(_("When new mail arrives: "));
  87         wprintf("<select name=\"bigaction\" size=1 onChange=\"ToggleSievePanels();\">\n");
  88
  89         wprintf("<option %s value=\"0\">", ((active_script < 0) ? "selected" : ""));
  90         wprintf(_("Leave it in my inbox without filtering"));
  91         wprintf("</option>\n");
  92
  93         wprintf("<option value=\"1\">");
  94         wprintf(_("Filter it according to rules selected below"));
  95         wprintf("</option>\n");
  96
  97         wprintf("<option %s value=\"2\">", ((active_script >= 0) ? "selected" : ""));
  98         wprintf(_("Filter it through a manually edited script (advanced users only)"));
  99         wprintf("</option>\n");
 100
 101         wprintf("</select>");
 102
 103
 104
 105         /* The "no filtering" div */
 106
 107         wprintf("<div id=\"sievediv0\" style=\"display:none\">\n");
 108         wprintf("<div align=\"center\"><br /><br />");
 109         wprintf(_("Your incoming mail will not be filtered through any scripts."));
 110         wprintf("<br /><br /></div>\n");
 111         wprintf("</div>\n");
 112
 113         /* The "webcit managed scripts" div */
 114
 115         wprintf("<div id=\"sievediv1\" style=\"display:none\">\n");
 116         display_rules_editor_inner_div();
 117         wprintf("</div>\n");
 118
 119         /* The "I'm smart and can write my own Sieve scripts" div */
 120
 121         wprintf("<div id=\"sievediv2\" style=\"display:none\">\n");
 122
 123         if (num_scripts > 0) {
 124                 wprintf(_("The currently active script is: "));
 125                 wprintf("<select name=\"active_script\" size=1 onChange=\"ToggleScriptPanels();\">\n");
 126                 for (i=0; i<num_scripts; ++i) {
 127                         wprintf("<option %s value=\"%s\">%s</option>\n",
 128                                 ((active_script == i) ? "selected" : ""),
 129                                 script_names[i],
 130                                 script_names[i]
 131                         );
 132                 }
 133                 wprintf("</select>\n");
 134         }
 135
 136         wprintf("&nbsp;&nbsp;&nbsp;");
 137         wprintf("<a href=\"display_add_remove_scripts\">%s</a>\n", _("Add or delete scripts"));
 138
 139         wprintf("<br />\n");
 140
 141         if (num_scripts > 0) {
 142                 for (i=0; i<num_scripts; ++i) {
 143                         wprintf("<div id=\"script_%s\" style=\"display:none\">\n", script_names[i]);
 144                         wprintf("<textarea name=\"text_%s\" wrap=soft rows=20 cols=80 width=80>\n", script_names[i]);
 145                         serv_printf("MSIV getscript|%s", script_names[i]);
 146                         serv_getln(buf, sizeof buf);
 147                         if (buf[0] == '1') while(serv_getln(buf, sizeof (buf)), strcmp(buf, "000")) {
 148                                 wprintf("%s\n", buf);
 149                         }
 150                         wprintf("</textarea>\n");
 151                         wprintf("</div>\n");
 152                 }
 153         }
 154
 155         wprintf("<script type=\"text/javascript\">      \n"
 156                 "ToggleScriptPanels();                  \n"
 157                 "</script>                              \n"
 158         );
 159
 160         wprintf("</div>\n");
 161
 162
 163         /* The rest of this is common for all panels... */
 164
 165         wprintf("<div align=\"center\"><br>");
 166         wprintf("<input type=\"submit\" name=\"save_button\" value=\"%s\">", _("Save changes"));
 167         wprintf("&nbsp;");
 168         wprintf("<input type=\"submit\" name=\"cancel_button\" value=\"%s\">\n", _("Cancel"));
 169         wprintf("</div></form>\n");
 170
 171         wprintf("</td></tr></table></div>\n");
 172
 173         wprintf("<script type=\"text/javascript\">      \n"
 174                 "ToggleSievePanels();                   \n"
 175                 "</script>                              \n"
 176         );
 177
 178         wDumpContent(1);
 179
 180 }
 181
 182
 183 /**
 184  * \brief save sieve config
 185  */
 186 void save_sieve(void) {
 187         int bigaction;
 188         char script_names[MAX_SCRIPTS][64];
 189         int num_scripts = 0;
 190         int active_script = (-1);
 191         int i;
 192         char this_name[64];
 193         char buf[256];
 194
 195         if (strlen(bstr("save_button")) == 0) {
 196                 strcpy(WC->ImportantMessage,
 197                         _("Cancelled.  Changes were not saved."));
 198                 display_main_menu();
 199                 return;
 200         }
 201
 202         serv_puts("MSIV listscripts");
 203         serv_getln(buf, sizeof(buf));
 204         if (buf[0] == '1') while (serv_getln(buf, sizeof(buf)), strcmp(buf, "000")) {
 205                 if (num_scripts < MAX_SCRIPTS) {
 206                         extract_token(script_names[num_scripts], buf, 0, '|', 64);
 207                         if (extract_int(buf, 1) > 0) {
 208                                 active_script = num_scripts;
 209                         }
 210                         ++num_scripts;
 211                 }
 212         }
 213
 214         bigaction = atoi(bstr("bigaction"));
 215
 216         if (bigaction == 0) {
 217                 serv_puts("MSIV setactive||");
 218                 serv_getln(buf, sizeof buf);
 219         }
 220
 221         else if (bigaction == 2) {
 222                 serv_printf("MSIV setactive|%s|", bstr("active_script"));
 223                 serv_getln(buf, sizeof buf);
 224         }
 225
 226         if (num_scripts > 0) {
 227                 for (i=0; i<num_scripts; ++i) {
 228                         serv_printf("MSIV putscript|%s|", script_names[i]);
 229                         serv_getln(buf, sizeof buf);
 230                         if (buf[0] == '4') {
 231                                 snprintf(this_name, sizeof this_name, "text_%s", script_names[i]);
 232                                 striplt(bstr(this_name));
 233                                 serv_printf("%s", bstr(this_name));
 234                                 serv_puts("000");
 235                         }
 236                 }
 237         }
 238
 239         strcpy(WC->ImportantMessage, _("Your changes have been saved."));
 240         display_main_menu();
 241         return;
 242 }
 243
 244
 245 /**
 246  * \brief show a list of available scripts to add/remove them
 247  */
 248 void display_add_remove_scripts(char *message)
 249 {
 250         char buf[256];
 251         char script_name[256];
 252
 253         output_headers(1, 1, 2, 0, 0, 0);
 254         wprintf("<div id=\"banner\">\n");
 255         wprintf("<table width=100%% border=0 bgcolor=#444455><tr>"
 256                 "<td>"
 257                 "<span class=\"titlebar\">"
 258                 "<img src=\"static/advanpage2_48x.gif\">");
 259         wprintf(_("Add or delete scripts"));
 260         wprintf("</span></td></tr></table>\n"
 261                 "</div>\n<div id=\"content\">\n"
 262         );
 263
 264         if (message != NULL) wprintf(message);
 265
 266         wprintf("<table border=0 cellspacing=10><tr valign=top><td>\n");
 267
 268         svprintf("BOXTITLE", WCS_STRING, _("Add a new script"));
 269         do_template("beginbox");
 270
 271         wprintf(_("To create a new script, enter the desired "
 272                 "script name in the box below and click 'Create'."));
 273         wprintf("<br /><br />");
 274
 275         wprintf("<center><form method=\"POST\" action=\"create_script\">\n");
 276         wprintf(_("Script name: "));
 277         wprintf("<input type=\"text\" name=\"script_name\"><br />\n"
 278                 "<input type=\"submit\" name=\"create_button\" value=\"%s\">"
 279                 "</form></center>\n", _("Create"));
 280
 281         do_template("endbox");
 282
 283         svprintf("BOXTITLE", WCS_STRING, _("Edit scripts"));
 284         do_template("beginbox");
 285         wprintf("<br /><div align=center><a href=\"display_sieve\">%s</a><br /><br />\n",
 286                 _("Return to the script editing screen")
 287         );
 288         do_template("endbox");
 289
 290         wprintf("</td><td>");
 291
 292         svprintf("BOXTITLE", WCS_STRING, _("Delete scripts"));
 293         do_template("beginbox");
 294
 295         wprintf(_("To delete an existing script, select the script "
 296                 "name from the list and click 'Delete'."));
 297         wprintf("<br /><br />");
 298
 299         wprintf("<center>"
 300                 "<form method=\"POST\" action=\"delete_script\">\n");
 301         wprintf("<select name=\"script_name\" size=10 style=\"width:100%%\">\n");
 302
 303         serv_puts("MSIV listscripts");
 304         serv_getln(buf, sizeof buf);
 305         if (buf[0] == '1') {
 306                 while (serv_getln(buf, sizeof buf), strcmp(buf, "000")) {
 307                         extract_token(script_name, buf, 0, '|', sizeof script_name);
 308                         if (extract_int(buf, 1) == 0) {
 309                                 wprintf("<option>");
 310                                 escputs(script_name);
 311                                 wprintf("</option>\n");
 312                         }
 313                 }
 314         }
 315         wprintf("</select><br />\n");
 316
 317         wprintf("<input type=\"submit\" name=\"delete_button\" value=\"%s\" "
 318                 "onClick=\"return confirm('%s');\">", _("Delete script"), _("Delete this script?"));
 319         wprintf("</form></center>\n");
 320         do_template("endbox");
 321
 322         wprintf("</td></tr></table>\n");
 323
 324         wDumpContent(1);
 325 }
 326
 327
 328
 329 /**
 330  * \brief delete a script
 331  */
 332 void delete_script(void) {
 333         char buf[256];
 334
 335         serv_printf("MSIV deletescript|%s", bstr("script_name"));
 336         serv_getln(buf, sizeof buf);
 337         display_add_remove_scripts(&buf[4]);
 338 }
 339
 340
 341
 342 /**
 343  * \brief create a new script
 344  * take the web environment script name and create it on the citadel server
 345  */
 346 void create_script(void) {
 347         char buf[256];
 348
 349         serv_printf("MSIV getscript|%s", bstr("script_name"));
 350         serv_getln(buf, sizeof buf);
 351         if (buf[0] == '1') {
 352                 while (serv_getln(buf, sizeof(buf)), strcmp(buf, "000")) {
 353                         /* flush */
 354                 }
 355                 display_add_remove_scripts(_("A script by that name already exists."));
 356                 return;
 357         }
 358
 359         serv_printf("MSIV putscript|%s", bstr("script_name"));
 360         serv_getln(buf, sizeof buf);
 361         if (buf[0] == '4') {
 362                 serv_puts("keep;");
 363                 serv_puts("000");
 364                 display_add_remove_scripts(_("A new script has been created.  Return to the script editing screen to edit and activate it."));
 365                 return;
 366         }
 367
 368         display_add_remove_scripts(&buf[4]);
 369 }
 370
 371
 372
 373
 374 void display_rules_editor_inner_div(void) {
 375         int i;
 376         char buf[256], targ[256];
 377
 378 /*
 379  * This script should get called by every onChange event...
 380  *
 381  */
 382         wprintf("<script type=\"text/javascript\">                                      \n"
 383                 "                                                                       \n"
 384                 "function UpdateRules() {                                               \n"
 385                 "  for (i=0; i<%d; ++i) {                                               \n", MAX_RULES);
 386         wprintf("  d = ($('action'+i).options[$('action'+i).selectedIndex].value);      \n"
 387                 "  if (d == 'fileinto') {                                               \n"
 388                 "    $('div_fileinto'+i).style.display = 'block';                       \n"
 389                 "    $('div_redirect'+i).style.display = 'none';                        \n"
 390                 "  } else if (d == 'redirect') {                                        \n"
 391                 "    $('div_fileinto'+i).style.display = 'none';                        \n"
 392                 "    $('div_redirect'+i).style.display = 'block';                       \n"
 393                 "  } else  {                                                            \n"
 394                 "    $('div_fileinto'+i).style.display = 'none';                        \n"
 395                 "    $('div_redirect'+i).style.display = 'none';                        \n"
 396                 "  }                                                                    \n"
 397                 " }                                                                     \n"
 398                 "}                                                                      \n"
 399                 "</script>                                                              \n"
 400         );
 401
 402
 403 /*
 404  * Show/hide alternating rows.  This is obviously bogus, it's just here to test the show/hide logic.
 405         wprintf("  for (i=0; i<%d; ++i) {                                               \n", MAX_RULES);
 406         wprintf("   if ( (i % 2) == 0 )  {                                              \n"
 407                 "     $('rule' + i).style.display = 'block';                            \n"
 408                 "   }                                                                   \n"
 409                 "   else {                                                              \n"
 410                 "     $('rule' + i).style.display = 'none';                             \n"
 411                 "   }                                                                   \n"
 412                 "  }                                                                    \n"
 413                 "}                                                                      \n"
 414                 "                                                                       \n"
 415 */
 416
 417
 418         wprintf("<br />");
 419         wprintf("<table class=\"mailbox_summary\" rules=rows cellpadding=2 "
 420                 "style=\"width:100%%;-moz-user-select:none;\">"
 421         );
 422
 423         for (i=0; i<MAX_RULES; ++i) {
 424
 425                 wprintf("<tr id=\"rule%d\">", i);
 426
 427                 wprintf("<td>%d. %s</td>", i+1, _("If") );
 428
 429                 wprintf("<td>");
 430                 wprintf("<select name=\"hfield%d\" size=1 onChange=\"UpdateRules();\">", i);
 431                 wprintf("<option value=\"sender\">%s</option>", _("Sender"));
 432                 wprintf("<option value=\"recipient\">%s</option>", _("Recipient"));
 433                 wprintf("</select>");
 434                 wprintf("</td>");
 435
 436                 wprintf("<td>");
 437                 wprintf("<select name=\"compare%d\" size=1 onChange=\"UpdateRules();\">", i);
 438                 wprintf("<option value=\"match\">%s</option>", _("matches"));
 439                 wprintf("<option value=\"notmatch\">%s</option>", _("does not match"));
 440                 wprintf("</select>");
 441                 wprintf("</td>");
 442
 443                 wprintf("<td>");
 444                 wprintf("<input type=\"text\" name=\"htext%d\">", i);
 445                 wprintf("</td>");
 446
 447                 wprintf("<td>");
 448                 wprintf("<select id=\"action%d\" name=\"action%d\" size=1 onChange=\"UpdateRules();\">",
 449                         i, i);
 450                 wprintf("<option value=\"fileinto\">%s</option>", _("file into"));
 451                 wprintf("<option value=\"redirect\">%s</option>", _("forward to"));
 452                 wprintf("<option value=\"reject\">%s</option>", _("reject"));
 453                 wprintf("</select>");
 454
 455                 wprintf("<div id=\"div_fileinto%d\">", i);
 456                 wprintf("<select name=\"fileinto%d\">", i);
 457                 serv_puts("LKRA");      /* FIXME buffer this and keep reusing it */
 458                 serv_getln(buf, sizeof buf);
 459                 if (buf[0] == '1') {
 460                         while (serv_getln(buf, sizeof buf), strcmp(buf, "000")) {
 461                                 extract_token(targ, buf, 0, '|', sizeof targ);
 462                                 if (!strcasecmp(targ, "Mail")) {
 463                                         wprintf("<option selected>");
 464                                 }
 465                                 else {
 466                                         wprintf("<option>");
 467                                 }
 468                                 escputs(targ);
 469                                 wprintf("\n");
 470                         }
 471                 }
 472                 wprintf("</select>\n");
 473                 wprintf("</div>");
 474
 475                 wprintf("<div id=\"div_redirect%d\">", i);
 476                 wprintf("<input type=\"text\" name=\"redirect%d\">", i);
 477                 wprintf("</div>");
 478                 wprintf("</td>");
 479
 480
 481
 482                 wprintf("<td>%s</td>", _("and then") );
 483
 484                 wprintf("<td>");
 485                 wprintf("<select name=\"final%d\" size=1 onChange=\"UpdateRules();\">", i);
 486                 wprintf("<option value=\"stop\">%s</option>", _("stop"));
 487                 wprintf("<option value=\"continue\">%s</option>", _("continue processing"));
 488                 wprintf("</select>");
 489                 wprintf("</td>");
 490
 491                 wprintf("</tr>\n");
 492
 493         }
 494
 495         wprintf("</table>");
 496
 497
 498         wprintf("<script type=\"text/javascript\">                                      \n"
 499                 "UpdateRules();                                                         \n"
 500                 "</script>                                                              \n"
 501         );
 502
 503 }
 504
 505
 506
 507
 508
 509
 510 /*@}*/