webcit/preferences.c

   1 /*
   2  * $Id$
   3  */
   4 /**
   5  * \defgroup ManagePrefs Manage user preferences with a little help from the Citadel server.
   6  * \ingroup CitadelConfig
   7  *
   8  */
   9 /*@{*/
  10 #include "webcit.h"
  11 #include "webserver.h"
  12 #include "groupdav.h"
  13
  14
  15 /**
  16  * \brief display preferences dialog
  17  */
  18 void load_preferences(void) {
  19         char buf[SIZ];
  20         long msgnum = 0L;
  21
  22         serv_printf("GOTO %s", USERCONFIGROOM);
  23         serv_getln(buf, sizeof buf);
  24         if (buf[0] != '2') return;
  25
  26         serv_puts("MSGS ALL|0|1");
  27         serv_getln(buf, sizeof buf);
  28         if (buf[0] == '8') {
  29                 serv_puts("subj|__ WebCit Preferences __");
  30                 serv_puts("000");
  31         }
  32         while (serv_getln(buf, sizeof buf), strcmp(buf, "000")) {
  33                 msgnum = atol(buf);
  34         }
  35
  36         if (msgnum > 0L) {
  37                 serv_printf("MSG0 %ld", msgnum);
  38                 serv_getln(buf, sizeof buf);
  39                 if (buf[0] == '1') {
  40                         while (serv_getln(buf, sizeof buf),
  41                                 (strcmp(buf, "text") && strcmp(buf, "000"))) {
  42                         }
  43                         if (!strcmp(buf, "text")) {
  44                                 while (serv_getln(buf, sizeof buf), strcmp(buf, "000")) {
  45                                         if (WC->preferences == NULL) {
  46                                                 WC->preferences = malloc(SIZ);
  47                                                 strcpy(WC->preferences, "");
  48                                         }
  49                                         else {
  50                                                 WC->preferences = realloc(
  51                                                         WC->preferences,
  52                                                         strlen(WC->preferences)
  53                                                         +SIZ
  54                                                 );
  55                                         }
  56                                         strcat(WC->preferences, buf);
  57                                         strcat(WC->preferences, "\n");
  58                                 }
  59                         }
  60                 }
  61         }
  62
  63         /** Go back to the room we're supposed to be in */
  64         serv_printf("GOTO %s", WC->wc_roomname);
  65         serv_getln(buf, sizeof buf);
  66 }
  67
  68 /**
  69  * \brief Goto the user's configuration room, creating it if necessary.
  70  * \return 0 on success or nonzero upon failure.
  71  */
  72 int goto_config_room(void) {
  73         char buf[SIZ];
  74
  75         serv_printf("GOTO %s", USERCONFIGROOM);
  76         serv_getln(buf, sizeof buf);
  77         if (buf[0] != '2') { /* try to create the config room if not there */
  78                 serv_printf("CRE8 1|%s|4|0", USERCONFIGROOM);
  79                 serv_getln(buf, sizeof buf);
  80                 serv_printf("GOTO %s", USERCONFIGROOM);
  81                 serv_getln(buf, sizeof buf);
  82                 if (buf[0] != '2') return(1);
  83         }
  84         return(0);
  85 }
  86
  87 /**
  88  * \brief save the modifications
  89  */
  90 void save_preferences(void) {
  91         char buf[SIZ];
  92         long msgnum = 0L;
  93
  94         if (goto_config_room() != 0) return;    /* oh well. */
  95         serv_puts("MSGS ALL|0|1");
  96         serv_getln(buf, sizeof buf);
  97         if (buf[0] == '8') {
  98                 serv_puts("subj|__ WebCit Preferences __");
  99                 serv_puts("000");
 100         }
 101         while (serv_getln(buf, sizeof buf), strcmp(buf, "000")) {
 102                 msgnum = atol(buf);
 103         }
 104
 105         if (msgnum > 0L) {
 106                 serv_printf("DELE %ld", msgnum);
 107                 serv_getln(buf, sizeof buf);
 108         }
 109
 110         serv_printf("ENT0 1||0|1|__ WebCit Preferences __|");
 111         serv_getln(buf, sizeof buf);
 112         if (buf[0] == '4') {
 113                 serv_puts(WC->preferences);
 114                 serv_puts("");
 115                 serv_puts("000");
 116         }
 117
 118         /** Go back to the room we're supposed to be in */
 119         serv_printf("GOTO %s", WC->wc_roomname);
 120         serv_getln(buf, sizeof buf);
 121 }
 122
 123 /**
 124  * \brief query the actual setting of key in the citadel database
 125  * \param key config key to query
 126  * \param value value to the key to get
 127  * \param value_len length of the value string
 128  */
 129 void get_preference(char *key, char *value, size_t value_len) {
 130         int num_prefs;
 131         int i;
 132         char buf[SIZ];
 133         char thiskey[SIZ];
 134
 135         strcpy(value, "");
 136
 137         num_prefs = num_tokens(WC->preferences, '\n');
 138         for (i=0; i<num_prefs; ++i) {
 139                 extract_token(buf, WC->preferences, i, '\n', sizeof buf);
 140                 extract_token(thiskey, buf, 0, '|', sizeof thiskey);
 141                 if (!strcasecmp(thiskey, key)) {
 142                         extract_token(value, buf, 1, '|', value_len);
 143                 }
 144         }
 145 }
 146
 147 /**
 148  * \brief       Write a key into the webcit preferences database for this user
 149  *
 150  * \params      key             key whichs value is to be modified
 151  * \param       value           value to set
 152  * \param       save_to_server  1 = flush all data to the server, 0 = cache it for now
 153  */
 154 void set_preference(char *key, char *value, int save_to_server) {
 155         int num_prefs;
 156         int i;
 157         char buf[SIZ];
 158         char thiskey[SIZ];
 159         char *newprefs = NULL;
 160         size_t newprefs_len = 0;
 161
 162         newprefs_len = strlen(key) + strlen(value) + 10;
 163         if (WC->preferences != NULL) newprefs_len += strlen(WC->preferences);
 164         newprefs = malloc(newprefs_len);
 165         if (newprefs == NULL) return;
 166         strcpy(newprefs, "");
 167
 168         num_prefs = num_tokens(WC->preferences, '\n');
 169         for (i=0; i<num_prefs; ++i) {
 170                 extract_token(buf, WC->preferences, i, '\n', sizeof buf);
 171                 if (num_tokens(buf, '|') == 2) {
 172                         extract_token(thiskey, buf, 0, '|', sizeof thiskey);
 173                         if (strcasecmp(thiskey, key)) {
 174                                 strcat(newprefs, buf);
 175                                 strcat(newprefs, "\n");
 176                         }
 177                 }
 178         }
 179
 180         sprintf(&newprefs[strlen(newprefs)], "%s|%s\n", key, value);
 181         free(WC->preferences);
 182         WC->preferences = newprefs;
 183
 184         if (save_to_server) save_preferences();
 185 }
 186
 187
 188
 189
 190 /**
 191  * \brief display form for changing your preferences and settings
 192  */
 193 void display_preferences(void)
 194 {
 195         output_headers(1, 1, 1, 0, 0, 0);
 196         char ebuf[300];
 197         char buf[256];
 198         int i;
 199         int time_format;
 200         time_t tt;
 201         struct tm tm;
 202         char daylabel[32];
 203
 204         time_format = get_time_format_cached ();
 205
 206         wprintf("<div class=\"box\">\n");
 207         wprintf("<div class=\"boxlabel\">");
 208         wprintf(_("Preferences and settings"));
 209         wprintf("</div>");
 210
 211         wprintf("<div class=\"boxcontent\">");
 212
 213         /** begin form */
 214         wprintf("<form name=\"prefform\" action=\"set_preferences\" "
 215                 "method=\"post\">\n");
 216         wprintf("<input type=\"hidden\" name=\"nonce\" value=\"%ld\">\n", WC->nonce);
 217
 218         /** begin table */
 219         wprintf("<table class=\"altern\">\n");
 220
 221         /**
 222          * Room list view
 223          */
 224         get_preference("roomlistview", buf, sizeof buf);
 225         wprintf("<tr class=\"even\"><td>");
 226         wprintf(_("Room list view"));
 227         wprintf("</td><td>");
 228
 229         wprintf("<input type=\"radio\" name=\"roomlistview\" VALUE=\"folders\"");
 230         if (!strcasecmp(buf, "folders")) wprintf(" checked");
 231         wprintf(">");
 232         wprintf(_("Tree (folders) view"));
 233         wprintf("</input>&nbsp;&nbsp;&nbsp;");
 234
 235         wprintf("<input type=\"radio\" name=\"roomlistview\" VALUE=\"rooms\"");
 236         if (!strcasecmp(buf, "rooms")) wprintf(" checked");
 237         wprintf(">");
 238         wprintf(_("Table (rooms) view"));
 239         wprintf("</input>\n");
 240
 241         wprintf("</td></tr>\n");
 242
 243         /**
 244          * Time hour format
 245          */
 246
 247         wprintf("<tr class=\"odd\"><td>");
 248         wprintf(_("Time format"));
 249         wprintf("</td><td>");
 250
 251         wprintf("<input type=\"radio\" name=\"calhourformat\" VALUE=\"12\"");
 252         if (time_format == WC_TIMEFORMAT_AMPM)
 253                 wprintf(" checked");
 254         wprintf(">");
 255         wprintf(_("12 hour (am/pm)"));
 256         wprintf("</input>&nbsp;&nbsp;&nbsp;");
 257
 258         wprintf("<input type=\"radio\" name=\"calhourformat\" VALUE=\"24\"");
 259         if (time_format == WC_TIMEFORMAT_24)
 260                 wprintf(" checked");
 261         wprintf(">");
 262         wprintf(_("24 hour"));
 263         wprintf("</input>\n");
 264
 265         wprintf("</td></tr>\n");
 266
 267         /**
 268          * Calendar day view -- day start time
 269          */
 270         get_preference("daystart", buf, sizeof buf);
 271         if (buf[0] == 0) strcpy(buf, "8");
 272         wprintf("<tr class=\"even\"><td>");
 273         wprintf(_("Calendar day view begins at:"));
 274         wprintf("</td><td>");
 275
 276         wprintf("<select name=\"daystart\" size=\"1\">\n");
 277         for (i=0; i<=23; ++i) {
 278
 279                 if (time_format == WC_TIMEFORMAT_24) {
 280                         wprintf("<option %s value=\"%d\">%d:00</option>\n",
 281                                 ((atoi(buf) == i) ? "selected" : ""),
 282                                 i, i
 283                         );
 284                 }
 285                 else {
 286                         wprintf("<option %s value=\"%d\">%s</option>\n",
 287                                 ((atoi(buf) == i) ? "selected" : ""),
 288                                 i, hourname[i]
 289                         );
 290                 }
 291
 292         }
 293         wprintf("</select>\n");
 294         wprintf("</td></tr>\n");
 295
 296         /**
 297          * Calendar day view -- day end time
 298          */
 299         get_preference("dayend", buf, sizeof buf);
 300         if (buf[0] == 0) strcpy(buf, "17");
 301         wprintf("<tr class=\"odd\"><td>");
 302         wprintf(_("Calendar day view ends at:"));
 303         wprintf("</td><td>");
 304
 305         wprintf("<select name=\"dayend\" size=\"1\">\n");
 306         for (i=0; i<=23; ++i) {
 307
 308                 if (time_format == WC_TIMEFORMAT_24) {
 309                         wprintf("<option %s value=\"%d\">%d:00</option>\n",
 310                                 ((atoi(buf) == i) ? "selected" : ""),
 311                                 i, i
 312                         );
 313                 }
 314                 else {
 315                         wprintf("<option %s value=\"%d\">%s</option>\n",
 316                                 ((atoi(buf) == i) ? "selected" : ""),
 317                                 i, hourname[i]
 318                         );
 319                 }
 320
 321         }
 322         wprintf("</select>\n");
 323         wprintf("</td></tr>\n");
 324
 325         /**
 326          * Day of week to begin calendar month view
 327          */
 328         get_preference("weekstart", buf, sizeof buf);
 329         if (buf[0] == 0) strcpy(buf, "17");
 330         wprintf("<tr class=\"even\"><td>");
 331         wprintf(_("Week starts on:"));
 332         wprintf("</td><td>");
 333
 334         wprintf("<select name=\"weekstart\" size=\"1\">\n");
 335
 336         for (i=0; i<=1; ++i) {
 337                 tt = time(NULL);
 338                 localtime_r(&tt, &tm);
 339                 tm.tm_wday = i;
 340                 wc_strftime(daylabel, sizeof daylabel, "%A", &tm);
 341
 342                 wprintf("<option %s value=\"%d\">%s</option>\n",
 343                         ((atoi(buf) == i) ? "selected" : ""),
 344                         i, daylabel
 345                 );
 346         }
 347
 348         wprintf("</select>\n");
 349         wprintf("</td></tr>\n");
 350
 351         /**
 352          * Signature
 353          */
 354         get_preference("use_sig", buf, sizeof buf);
 355         if (buf[0] == 0) strcpy(buf, "no");
 356         wprintf("<tr class=\"odd\"><td>");
 357         wprintf(_("Attach signature to email messages?"));
 358         wprintf("</td><td>");
 359
 360         wprintf("       <script type=\"text/javascript\">                                       "
 361                 "       function show_or_hide_sigbox() {                                        "
 362                 "               if ( $F('yes_sig') ) {                                          "
 363                 "                       $('signature_box').style.display = 'inline';            "
 364                 "               }                                                               "
 365                 "               else {                                                          "
 366                 "                       $('signature_box').style.display = 'none';              "
 367                 "               }                                                               "
 368                 "       }                                                                       "
 369                 "       </script>                                                               "
 370         );
 371
 372         wprintf("<input type=\"radio\" id=\"no_sig\" name=\"use_sig\" VALUE=\"no\"");
 373         if (!strcasecmp(buf, "no")) wprintf(" checked");
 374         wprintf(" onChange=\"show_or_hide_sigbox();\" >");
 375         wprintf(_("No signature"));
 376         wprintf("</input>&nbsp,&nbsp;&nbsp;\n");
 377
 378         wprintf("<input type=\"radio\" id=\"yes_sig\" name=\"use_sig\" VALUE=\"yes\"");
 379         if (!strcasecmp(buf, "yes")) wprintf(" checked");
 380         wprintf(" onChange=\"show_or_hide_sigbox();\" >");
 381         wprintf(_("Use this signature:"));
 382         wprintf("<div id=\"signature_box\">"
 383                 "<br><textarea name=\"signature\" cols=\"40\" rows=\"5\">"
 384         );
 385         get_preference("signature", ebuf, sizeof ebuf);
 386         euid_unescapize(buf, ebuf);
 387         escputs(buf);
 388         wprintf("</textarea>"
 389                 "</div>"
 390         );
 391
 392         wprintf("</input>\n");
 393
 394         wprintf("</td></tr>\n");
 395
 396         wprintf("       <script type=\"text/javascript\">       "
 397                 "       show_or_hide_sigbox();                  "
 398                 "       </script>                               "
 399         );
 400
 401         /** Character set to assume is in use for improperly encoded headers */
 402         get_preference("default_header_charset", buf, sizeof buf);
 403         if (buf[0] == 0) strcpy(buf, "UTF-8");
 404         wprintf("<tr class=\"even\"><td>");
 405         wprintf(_("Default character set for email headers:"));
 406         wprintf("</td><td>");
 407         wprintf("<input type=\"text\" NAME=\"default_header_charset\" MAXLENGTH=\"32\" VALUE=\"");
 408         escputs(buf);
 409         wprintf("\">");
 410         wprintf("</td></tr>");
 411
 412         /** end table */
 413         wprintf("</table>\n");
 414
 415         /** submit buttons */
 416         wprintf("<div class=\"buttons\"> ");
 417         wprintf("<input type=\"submit\" name=\"change_button\" value=\"%s\">"
 418                 "&nbsp;"
 419                 "<INPUT type=\"submit\" name=\"cancel_button\" value=\"%s\">\n",
 420                 _("Change"),
 421                 _("Cancel")
 422         );
 423         wprintf("</div>\n");
 424
 425         /** end form */
 426         wprintf("</form>\n");
 427         wprintf("</div>\n");
 428         wDumpContent(1);
 429 }
 430
 431 /**
 432  * \brief Commit new preferences and settings
 433  */
 434 void set_preferences(void)
 435 {
 436         char *fmt;
 437         char ebuf[300];
 438         int *time_format_cache;
 439
 440         time_format_cache = &(WC->time_format_cache);
 441
 442         if (IsEmptyStr(bstr("change_button"))) {
 443                 safestrncpy(WC->ImportantMessage,
 444                         _("Cancelled.  No settings were changed."),
 445                         sizeof WC->ImportantMessage);
 446                 display_main_menu();
 447                 return;
 448         }
 449
 450         /**
 451          * Set the last argument to 1 only for the final setting, so
 452          * we don't send the prefs file to the server repeatedly
 453          */
 454         set_preference("roomlistview", bstr("roomlistview"), 0);
 455         fmt = bstr("calhourformat");
 456         set_preference("calhourformat", fmt, 0);
 457         if (!strcasecmp(fmt, "24"))
 458                 *time_format_cache = WC_TIMEFORMAT_24;
 459         else
 460                 *time_format_cache = WC_TIMEFORMAT_AMPM;
 461
 462         set_preference("weekstart", bstr("weekstart"), 0);
 463         set_preference("use_sig", bstr("use_sig"), 0);
 464         set_preference("daystart", bstr("daystart"), 0);
 465         set_preference("dayend", bstr("dayend"), 0);
 466         set_preference("default_header_charset", bstr("default_header_charset"), 0);
 467
 468         euid_escapize(ebuf, bstr("signature"));
 469         set_preference("signature", ebuf, 1);
 470
 471         display_main_menu();
 472 }
 473
 474
 475 /*@}*/