988e110958d76e7930aa58f63f6662aee5d406e3
[citadel.git] / webcit / notes.c
1 /*
2  * $Id$
3  *
4  */
5
6 #include "webcit.h"
7 #include "groupdav.h"
8 #include "webserver.h"
9
10 int pastel_palette[9][3] = {
11         { 0x80, 0x80, 0x80 },
12         { 0xff, 0x80, 0x80 },
13         { 0x80, 0x80, 0xff },
14         { 0xff, 0xff, 0x80 },
15         { 0x80, 0xff, 0x80 },
16         { 0xff, 0x80, 0xff },
17         { 0x80, 0xff, 0xff },
18         { 0xff, 0x80, 0x80 },
19         { 0x80, 0x80, 0x80 }
20 };
21
22
23 /*
24  * Fetch a message from the server and extract a vNote from it
25  */
26 struct vnote *vnote_new_from_msg(long msgnum,int unread) 
27 {
28         StrBuf *Buf;
29         StrBuf *Data = NULL;
30         const char *bptr;
31         int Done = 0;
32         char uid_from_headers[256];
33         char mime_partnum[256];
34         char mime_filename[256];
35         char mime_content_type[256];
36         char mime_disposition[256];
37         int mime_length;
38         char relevant_partnum[256];
39         int phase = 0;                          /* 0 = citadel headers, 1 = mime headers, 2 = body */
40         char msg4_content_type[256] = "";
41         char msg4_content_encoding[256] = "";
42         int msg4_content_length = 0;
43         struct vnote *vnote_from_body = NULL;
44
45         relevant_partnum[0] = '\0';
46         serv_printf("MSG4 %ld", msgnum);        /* we need the mime headers */
47         Buf = NewStrBuf();
48         StrBuf_ServGetln(Buf);
49         if (GetServerStatus(Buf, NULL) != 1) {
50                 FreeStrBuf (&Buf);
51                 return NULL;
52         }
53         while ((StrBuf_ServGetln(Buf)>=0) && !Done) {
54                 if ( (StrLength(Buf)==3) && 
55                      !strcmp(ChrPtr(Buf), "000")) {
56                         Done = 1;
57                         break;
58                 }
59                 bptr = ChrPtr(Buf);
60                 switch (phase) {
61                 case 0:
62                         if (!strncasecmp(bptr, "exti=", 5)) {
63                                 safestrncpy(uid_from_headers, &(ChrPtr(Buf)[5]), sizeof uid_from_headers);
64                         }
65                         else if (!strncasecmp(bptr, "part=", 5)) {
66                                 extract_token(mime_filename, &bptr[5], 1, '|', sizeof mime_filename);
67                                 extract_token(mime_partnum, &bptr[5], 2, '|', sizeof mime_partnum);
68                                 extract_token(mime_disposition, &bptr[5], 3, '|', sizeof mime_disposition);
69                                 extract_token(mime_content_type, &bptr[5], 4, '|', sizeof mime_content_type);
70                                 mime_length = extract_int(&bptr[5], 5);
71
72                                 if (!strcasecmp(mime_content_type, "text/vnote")) {
73                                         strcpy(relevant_partnum, mime_partnum);
74                                 }
75                         }
76                         else if ((phase == 0) && (!strncasecmp(bptr, "text", 4))) {
77                                 phase = 1;
78                         }
79                 break;
80                 case 1:
81                         if (!IsEmptyStr(bptr)) {
82                                 if (!strncasecmp(bptr, "Content-type: ", 14)) {
83                                         safestrncpy(msg4_content_type, &bptr[14], sizeof msg4_content_type);
84                                         striplt(msg4_content_type);
85                                 }
86                                 else if (!strncasecmp(bptr, "Content-transfer-encoding: ", 27)) {
87                                         safestrncpy(msg4_content_encoding, &bptr[27], sizeof msg4_content_encoding);
88                                         striplt(msg4_content_type);
89                                 }
90                                 else if ((!strncasecmp(bptr, "Content-length: ", 16))) {
91                                         msg4_content_length = atoi(&bptr[16]);
92                                 }
93                                 break;
94                         }
95                         else {
96                                 phase++;
97                                 
98                                 if ((msg4_content_length > 0)
99                                     && ( !strcasecmp(msg4_content_encoding, "7bit"))
100                                     && (!strcasecmp(mime_content_type, "text/vnote"))
101                                 ) { 
102                                         /* shouldn't we do something here? */
103                                 }
104                         }
105                 //case 2:
106                         //Data = NewStrBufPlain(NULL, msg4_content_length * 2);
107                         //if (msg4_content_length > 0) {
108                                 //StrBuf_ServGetBLOBBuffered(Data, msg4_content_length);
109                                 //phase ++;
110                         //}
111                         //else {
112                                 //StrBufAppendBuf(Data, Buf, 0);
113                                 //StrBufAppendBufPlain(Data, "\r\n", 1, 0);
114                         //}
115                 //case 3:
116                         //StrBufAppendBuf(Data, Buf, 0);
117                 }
118         }
119         FreeStrBuf(&Buf);
120
121         /* If MSG4 didn't give us the part we wanted, but we know that we can find it
122          * as one of the other MIME parts, attempt to load it now.
123          */
124         if ((Data == NULL) && (!IsEmptyStr(relevant_partnum))) {
125                 Data = load_mimepart(msgnum, relevant_partnum);
126         }
127
128         if (StrLength(Data) > 0) {
129                 if (IsEmptyStr(uid_from_headers)) {
130                         // Convert an old-style note to a vNote
131                         vnote_from_body = vnote_new();
132                         vnote_from_body->uid = strdup(uid_from_headers);
133                         vnote_from_body->color_red = pastel_palette[3][0];
134                         vnote_from_body->color_green = pastel_palette[3][1];
135                         vnote_from_body->color_blue = pastel_palette[3][2];
136                         vnote_from_body->body = malloc(StrLength(Data) + 1);
137                         vnote_from_body->body[0] = 0;
138                         memcpy(vnote_from_body->body, ChrPtr(Data), StrLength(Data) + 1);
139                         FreeStrBuf(&Data);
140                         return vnote_from_body;
141                 }
142                 else {
143                         struct vnote *v = vnote_new_from_str(ChrPtr(Data));
144                         FreeStrBuf(&Data);
145                         return(v);
146                 }
147         }
148         return NULL;
149 }
150
151
152
153 /*
154  * Serialize a vnote and write it to the server
155  */
156 void write_vnote_to_server(struct vnote *v) 
157 {
158         char buf[1024];
159         char *pch;
160
161         serv_puts("ENT0 1|||4");
162         serv_getln(buf, sizeof buf);
163         if (buf[0] == '4') {
164                 serv_puts("Content-type: text/vnote");
165                 serv_puts("");
166                 pch = vnote_serialize(v);
167                 serv_puts(pch);
168                 free(pch);
169                 serv_puts("000");
170         }
171 }
172
173
174
175
176 /*
177  * Background ajax call to receive updates from the browser when a note is moved, resized, or updated.
178  */
179 void ajax_update_note(void) {
180
181         char buf[1024];
182         int msgnum;
183         struct vnote *v = NULL;
184
185         if (!havebstr("note_uid")) {
186                 begin_ajax_response();
187                 wprintf("Received ajax_update_note() request without a note UID.");
188                 end_ajax_response();
189                 return;
190         }
191
192         // lprintf(9, "Note UID = %s\n", bstr("note_uid"));
193         serv_printf("EUID %s", bstr("note_uid"));
194         serv_getln(buf, sizeof buf);
195         if (buf[0] != '2') {
196                 begin_ajax_response();
197                 wprintf("Cannot find message containing vNote with the requested uid!");
198                 end_ajax_response();
199                 return;
200         }
201         msgnum = atol(&buf[4]);
202         // lprintf(9, "Note msg = %ld\n", msgnum);
203
204         // Was this request a delete operation?  If so, nuke it...
205         if (havebstr("deletenote")) {
206                 if (!strcasecmp(bstr("deletenote"), "yes")) {
207                         serv_printf("DELE %d", msgnum);
208                         serv_getln(buf, sizeof buf);
209                         begin_ajax_response();
210                         wprintf("%s", buf);
211                         end_ajax_response();
212                         return;
213                 }
214         }
215
216         // If we get to this point it's an update, not a delete
217         v = vnote_new_from_msg(msgnum, 0);
218         if (!v) {
219                 begin_ajax_response();
220                 wprintf("Cannot locate a vNote within message %d\n", msgnum);
221                 end_ajax_response();
222                 return;
223         }
224
225         /* Make any requested changes */
226         if (havebstr("top")) {
227                 v->pos_top = atoi(bstr("top"));
228         }
229         if (havebstr("left")) {
230                 v->pos_left = atoi(bstr("left"));
231         }
232         if (havebstr("height")) {
233                 v->pos_height = atoi(bstr("height"));
234         }
235         if (havebstr("width")) {
236                 v->pos_width = atoi(bstr("width"));
237         }
238         if (havebstr("red")) {
239                 v->color_red = atoi(bstr("red"));
240         }
241         if (havebstr("green")) {
242                 v->color_green = atoi(bstr("green"));
243         }
244         if (havebstr("blue")) {
245                 v->color_blue = atoi(bstr("blue"));
246         }
247         if (havebstr("value")) {        // I would have preferred 'body' but InPlaceEditor hardcodes 'value'
248                 if (v->body) free(v->body);
249                 v->body = strdup(bstr("value"));
250         }
251
252         /* Serialize it and save it to the message base.  Server will delete the old one. */
253         write_vnote_to_server(v);
254
255         begin_ajax_response();
256         if (v->body) {
257                 escputs(v->body);
258         }
259         end_ajax_response();
260
261         vnote_free(v);
262 }
263
264
265
266
267 /*
268  * display sticky notes
269  *
270  * msgnum = Message number on the local server of the note to be displayed
271  */
272 void display_note(message_summary *Msg, int unread) {
273         struct vnote *v;
274         WCTemplputParams TP;
275
276         memset(&TP, 0, sizeof(WCTemplputParams));
277         TP.Filter.ContextType = CTX_VNOTE;
278         v = vnote_new_from_msg(Msg->msgnum, unread);
279         if (v) {
280                 TP.Context = v;
281                 DoTemplate(HKEY("vnoteitem"),
282                            WC->WBuf, &TP);
283                         
284
285                 /* uncomment these lines to see ugly debugging info 
286                 StrBufAppendPrintf(WC->trailing_javascript,
287                         "document.write('L: ' + $('note-%s').style.left + '; ');", v->uid);
288                 StrBufAppendPrintf(WC->trailing_javascript,
289                         "document.write('T: ' + $('note-%s').style.top + '; ');", v->uid);
290                 StrBufAppendPrintf(WC->trailing_javascript,
291                         "document.write('W: ' + $('note-%s').style.width + '; ');", v->uid);
292                 StrBufAppendPrintf(WC->trailing_javascript,
293                         "document.write('H: ' + $('note-%s').style.height + '<br>');", v->uid);
294                 */
295
296                 vnote_free(v);
297         }
298 }
299
300
301
302 /*
303  * Create a new note
304  */
305 void add_new_note(void) {
306         struct vnote *v;
307
308         v = vnote_new();
309         if (v) {
310                 v->uid = malloc(128);
311                 generate_uuid(v->uid);
312                 v->color_red = pastel_palette[3][0];
313                 v->color_green = pastel_palette[3][1];
314                 v->color_blue = pastel_palette[3][2];
315                 v->body = strdup(_("Click on any note to edit it."));
316                 write_vnote_to_server(v);
317                 vnote_free(v);
318         }
319         
320         readloop(readfwd);
321 }
322
323
324 void tmpl_vcard_put_posleft(StrBuf *Target, WCTemplputParams *TP)
325 {
326         struct vnote *v = (struct vnote *) CTX;
327         StrBufAppendPrintf(Target, "%d", v->pos_left);
328 }
329
330 void tmpl_vcard_put_postop(StrBuf *Target, WCTemplputParams *TP)
331 {
332         struct vnote *v = (struct vnote *) CTX;
333         StrBufAppendPrintf(Target, "%d", v->pos_top);
334 }
335
336 void tmpl_vcard_put_poswidth(StrBuf *Target, WCTemplputParams *TP)
337 {
338         struct vnote *v = (struct vnote *) CTX;
339         StrBufAppendPrintf(Target, "%d", v->pos_width);
340 }
341
342 void tmpl_vcard_put_posheight(StrBuf *Target, WCTemplputParams *TP)
343 {
344         struct vnote *v = (struct vnote *) CTX;
345         StrBufAppendPrintf(Target, "%d", v->pos_height);
346 }
347
348 void tmpl_vcard_put_posheight2(StrBuf *Target, WCTemplputParams *TP)
349 {
350         struct vnote *v = (struct vnote *) CTX;
351         StrBufAppendPrintf(Target, "%d", (v->pos_height / 16) - 5);
352 }
353
354 void tmpl_vcard_put_width2(StrBuf *Target, WCTemplputParams *TP)
355 {
356         struct vnote *v = (struct vnote *) CTX;
357         StrBufAppendPrintf(Target, "%d", (v->pos_width / 9) - 1);
358 }
359
360 void tmpl_vcard_put_color(StrBuf *Target, WCTemplputParams *TP)
361 {
362         struct vnote *v = (struct vnote *) CTX;
363         StrBufAppendPrintf(Target, "%02X%02X%02X", v->color_red, v->color_green, v->color_blue);
364 }
365
366 void tmpl_vcard_put_bgcolor(StrBuf *Target, WCTemplputParams *TP)
367 {
368         struct vnote *v = (struct vnote *) CTX;
369         StrBufAppendPrintf(Target, "%02X%02X%02X", v->color_red/2, v->color_green/2, v->color_blue/2);
370 }
371
372 void tmpl_vcard_put_message(StrBuf *Target, WCTemplputParams *TP)
373 {
374         struct vnote *v = (struct vnote *) CTX;
375         StrEscAppend(Target, NULL, v->body, 0, 0); ///TODO?
376 }
377
378 void tmpl_vcard_put_uid(StrBuf *Target, WCTemplputParams *TP)
379 {
380         struct vnote *v = (struct vnote *) CTX;
381         StrBufAppendBufPlain(Target, v->uid, -1, 0);
382 }
383
384 void 
385 InitModule_NOTES
386 (void)
387 {
388         WebcitAddUrlHandler(HKEY("add_new_note"), add_new_note, 0);
389         WebcitAddUrlHandler(HKEY("ajax_update_note"), ajax_update_note, 0);
390
391         RegisterNamespace("VNOTE:POS:LEFT", 0, 0, tmpl_vcard_put_posleft, CTX_VNOTE);
392         RegisterNamespace("VNOTE:POS:TOP", 0, 0, tmpl_vcard_put_postop, CTX_VNOTE);
393         RegisterNamespace("VNOTE:POS:WIDTH", 0, 0, tmpl_vcard_put_poswidth, CTX_VNOTE);
394         RegisterNamespace("VNOTE:POS:HEIGHT", 0, 0, tmpl_vcard_put_posheight, CTX_VNOTE);
395         RegisterNamespace("VNOTE:POS:HEIGHT2", 0, 0, tmpl_vcard_put_posheight2, CTX_VNOTE);
396         RegisterNamespace("VNOTE:POS:WIDTH2", 0, 0, tmpl_vcard_put_width2, CTX_VNOTE);
397         RegisterNamespace("VNOTE:COLOR", 0, 0, tmpl_vcard_put_color, CTX_VNOTE);
398         RegisterNamespace("VNOTE:BGCOLOR", 0, 0,tmpl_vcard_put_bgcolor, CTX_VNOTE);
399         RegisterNamespace("VNOTE:MSG", 0, 1, tmpl_vcard_put_message, CTX_VNOTE);
400         RegisterNamespace("VNOTE:UID", 0, 0, tmpl_vcard_put_uid, CTX_VNOTE);
401 }