3118a6b7aac8ef5256a6e0f2afdd2eb048c93b2b
[citadel.git] / webcit-ng / static / js / view_mail.js
1 // This module handles the view for "mailbox" rooms.
2 //
3 // Copyright (c) 2016-2023 by the citadel.org team
4 //
5 // This program is open source software.  Use, duplication, or
6 // disclosure are subject to the GNU General Public License v3.
7
8
9 var displayed_message = 0;                                                      // ID of message currently being displayed
10 var RefreshMailboxInterval;                                                     // We store our refresh timer here
11 var highest_mailnum;                                                            // This is used to detect newly arrived mail
12 var newmail_notify = {
13         NO  : 0,                                                                // do not perform new mail notifications
14         YES : 1                                                                 // yes, perform new mail notifications
15 };
16
17
18 // This is the async back end for mail_delete_selected()
19 mail_delete_func = async(table, row) => {
20         let m = parseInt(row["id"].substring(12));                              // derive msgnum from row id
21
22         if (is_trash_folder) {
23                 response = await fetch(
24                         "/ctdl/r/" + escapeHTMLURI(current_room) + "/" + m,
25                         {
26                                 method: "DELETE"                                // If this is the Trash folder, delete permanently
27                         },
28                 );
29         }
30         else {
31                 response = await fetch(
32                         "/ctdl/r/" + escapeHTMLURI(current_room) + "/" + m,
33                         {
34                                 method: "MOVE",                                 // Otherwise, move to the Trash folder
35                                 headers: { "Destination" : "/ctdl/r/_TRASH_" }
36                         },
37                 );
38         }
39
40         if (response.ok) {                              // If the server accepted the delete, blank out the message div
41                 table.deleteRow(row.rowIndex);
42                 if (m == displayed_message) {
43                         document.getElementById("ctdl-mailbox-reading-pane").innerHTML = "";
44                         displayed_message = 0;
45                 }
46         }
47 }
48
49
50 // Delete the selected messages (can be activated by mouse click or keypress)
51 function mail_delete_selected() {
52         let table = document.getElementById("ctdl-onscreen-mailbox");
53         let i, row;
54         for (i=0; row=table.rows[i]; ++i) {
55                 if (row.classList.contains("ctdl-mail-selected")) {
56                         mail_delete_func(table, row);
57                 }
58         }
59 }
60
61
62 // Handler function for keypresses detected while the mail view is displayed.  Mainly for deleting messages.
63 function mail_keypress(event) {
64
65         // If the "ctdl-mailbox-pane" no longer exists, the user has navigated to a different part of the site,
66         // so cancel the event listener.
67         try {
68                 document.getElementById("ctdl-mailbox-pane").innerHTML;
69         }
70         catch {
71                 document.removeEventListener("keydown", mail_keypress);
72                 return;
73         }
74
75         const key = event.key.toLowerCase();
76         if (key == "delete") {
77                 mail_delete_selected();
78         }
79
80 }
81
82
83 // Handler function for dragging email messages to other folders
84 function mail_dragstart(event) {
85         let i;
86         let count = 0;
87         let table = document.getElementById("ctdl-onscreen-mailbox");
88         let messages_being_dragged = [] ;
89
90         if (event.target.classList.contains("ctdl-mail-selected")) {
91                 // The row being dragged IS selected.  See if any OTHER rows are selected, and they will come along for the ride.
92                 for (i=1; row=table.rows[i]; ++i) {
93                         if (row.classList.contains("ctdl-mail-selected")) {
94                                 count = count + 1;
95                                 messages_being_dragged.push(row.id);    // Tell the clipboard what's being moved.
96                         }
97                 }
98         }
99         else {
100                 // The row being dragged is NOT selected.  It will be dragged on its own, ignoring the selected rows.
101                 count = 1;
102                 messages_being_dragged.push(event.target.id);           // Tell the clipboard what's being moved.
103         }
104
105         // Set the custom drag image to an envelope + number of messages being dragged
106         d = document.getElementById("ctdl_draggo");
107         d.innerHTML = "<font size='+2'><i class='fa fa-envelope' style='color: red'></i> " + count + "</font>"
108         event.dataTransfer.setDragImage(d, 0, 0);
109         event.dataTransfer.setData("text", messages_being_dragged);
110 }
111
112
113 // Render reply address for a message (FIXME figure out how to deal with "reply-to:")
114 function reply_addr(msg) {
115         //if (msg.locl) {
116                 //return([msg.from]);
117         //}
118         //else {
119                 return([msg.from + " &lt;" + msg.rfca + "&gt;"]);
120         //}
121 }
122
123
124 // Render the To: recipients for a reply-all operation
125 function replyall_to(msg) {
126         return([...reply_addr(msg), ...msg.rcpt]);
127 }
128
129
130 // Render a message into the mailbox view
131 // (We want the message number and the message itself because we need to keep the msgnum for reply purposes)
132 function mail_render_one(msgnum, msg, target_div, include_controls) {
133         let div = "";
134         try {
135                 outmsg =
136                   "<div class=\"ctdl-mmsg-wrapper\">"                           // begin message wrapper
137                 ;
138
139                 if (include_controls) {                                         // omit controls if this is a pull quote
140                         outmsg +=
141                           render_userpic(msg.from)                              // user avatar
142                         + "<div class=\"ctdl-mmsg-content\">"                   // begin content
143                         + "<div class=\"ctdl-msg-header\">"                     // begin header
144                         + "<span class=\"ctdl-msg-header-info\">"               // begin header info on left side
145                         + render_msg_author(msg, views.VIEW_MAILBOX)
146                         + "<span class=\"ctdl-msgdate\">"
147                         + string_timestamp(msg.time,0)
148                         + "</span>"                                             // end msgdate
149                         + "</span>"                                             // end header info on left side
150                         + "<span class=\"ctdl-msg-header-buttons\">"            // begin buttons on right side
151                 
152                         + "<span class=\"ctdl-msg-button\">"                    // Reply (mail is always Quoted)
153                         + "<a href=\"javascript:mail_compose(true,'"+msg.wefw+"','"+msgnum+"', reply_addr(msg), [], 'Re: '+msg.subj);\">"
154                         + "<i class=\"fa fa-reply\"></i> " 
155                         + _("Reply")
156                         + "</a></span>"
157                 
158                         + "<span class=\"ctdl-msg-button\">"                    // Reply-All (mail is always Quoted)
159                         + "<a href=\"javascript:mail_compose(true,'"+msg.wefw+"','"+msgnum+"', replyall_to(msg), msg.cccc, 'Re: '+msg.subj);\">"
160                         + "<i class=\"fa fa-reply-all\"></i> " 
161                         + _("ReplyAll")
162                         + "</a></span>"
163                 
164                         + "<span class=\"ctdl-msg-button\">"                    // Forward (server handles this)
165                         + "<a href=\"javascript:mail_compose(true,'"+msg.wefw+"','"+msgnum+"', '', '', 'Fwd: '+msg.subj);\">"
166                         + "<i class=\"fa fa-mail-forward\"></i> " 
167                         + _("Forward")
168                         + "</a></span>";
169                 
170                         if (can_delete_messages) {
171                                 outmsg +=
172                                 "<span class=\"ctdl-msg-button\">"
173                                 + "<a href=\"javascript:forum_delete_message('"+div+"','"+msg.msgnum+"');\">"
174                                 + "<i class=\"fa fa-trash\"></i> " 
175                                 + _("Delete")
176                                 + "</a></span>";
177                         }
178                 
179                         outmsg +=
180                           "</span>";                                            // end buttons on right side
181
182                         // Display the To: recipients, if any are present
183                         if (msg.rcpt) {
184                                 outmsg += "<br><span>" + _("To:") + " ";
185                                 for (let r=0; r<msg.rcpt.length; ++r) {
186                                         if (r != 0) {
187                                                 outmsg += ", ";
188                                         }
189                                         outmsg += escapeHTML(msg.rcpt[r]);
190                                 }
191                                 outmsg += "</span>";
192                         }
193
194                         // Display the Cc: recipients, if any are present
195                         if (msg.cccc) {
196                                 outmsg += "<br><span>" + _("Cc:") + " ";
197                                 for (let r=0; r<msg.cccc.length; ++r) {
198                                         if (r != 0) {
199                                                 outmsg += ", ";
200                                         }
201                                         outmsg += escapeHTML(msg.cccc[r]);
202                                 }
203                                 outmsg += "</span>";
204                         }
205
206                         // Display a subject line, but only if the message has a subject (internal Citadel messages often don't)
207                         if (msg.subj) {
208                                 outmsg +=
209                                 "<br><span class=\"ctdl-msgsubject\">" + msg.subj + "</span>";
210                         }
211
212                         outmsg +=
213                           "</div>";                                             // end header
214                 }
215
216                 // Display attachments, if any are present
217                 if (msg.part) {
218                         let display_attachments = 0;
219                         for (let r=0; r<msg.part.length; ++r) {
220                                 if (msg.part[r].disp == "attachment") {
221                                         if (display_attachments == 0) {
222                                                 outmsg += "<ul>";
223                                         }
224                                         display_attachments += 1;
225                                         outmsg += "<li>"
226                                                 + "<a href=\"/ctdl/r/" + escapeHTMLURI(current_room) + "/" + msgnum + "/" + msg.part[r].partnum + "/" + escapeHTMLURI(msg.part[r].filename) + "\" target=\"_blank\">"
227                                                 + "<i class=\"fa fa-paperclip\"></i>&nbsp;" + msg.part[r].partnum + ": " + msg.part[r].filename
228                                                 + " (" + msg.part[r].len + " " + _("bytes") + ")"
229                                                 + "</a>"
230                                                 + "</li>";
231                                 }
232                         }
233                         if (display_attachments > 0) {
234                                 outmsg += "</ul><br>";
235                         }
236                 }
237
238
239                 outmsg +=
240                   "<div class=\"ctdl-msg-body\" id=\"" + div + "_body\">"       // begin body
241                 + msg.text
242                 + "</div>"                                                      // end body
243                 + "</div>"                                                      // end content
244                 + "</div>"                                                      // end wrapper
245                 ;
246         }
247         catch(err) {
248                 outmsg = "<div class=\"ctdl-mmsg-wrapper\">" + err.message + "</div>";
249         }
250
251         target_div.innerHTML = outmsg;
252 }
253
254
255 // display an individual message (note: this wants an actual div object, not a string containing the name of a div)
256 function mail_display_message(msgnum, target_div, include_controls) {
257         url = "/ctdl/r/" + escapeHTMLURI(current_room) + "/" + msgnum + "/json";
258         mail_fetch_msg = async() => {
259                 response = await fetch(url);
260                 msg = await(response.json());
261                 if (response.ok) {
262                         mail_render_one(msgnum, msg, target_div, include_controls);
263                 }
264         }
265         mail_fetch_msg();
266 }
267
268
269 // A message has been selected...
270 function click_message(event, msgnum) {
271         var table = document.getElementById("ctdl-onscreen-mailbox");
272         var i, m, row;
273
274         // ctrl + click = toggle an individual message without changing existing selection
275         if (event.ctrlKey) {
276                 document.getElementById("ctdl-msgsum-" + msgnum).classList.toggle("ctdl-mail-selected");
277         }
278
279         // shift + click = select a range of messages (start with row 1 because row 0 is the header)
280         else if (event.shiftKey) {
281                 for (i=1; row=table.rows[i]; ++i) {
282                         m = parseInt(row["id"].substring(12));                          // derive msgnum from row id
283                         if (
284                                 ((msgnum >= displayed_message) && (m >= displayed_message) && (m <= msgnum))
285                                 || ((msgnum <= displayed_message) && (m <= displayed_message) && (m >= msgnum))
286                         ) {
287                                 row.classList.add("ctdl-mail-selected");
288                         }
289                         else {
290                                 row.classList.remove("ctdl-mail-selected");
291                         }
292                 }
293         }
294
295         // click + no modifiers = select one message and unselect all others (start with row 1 because row 0 is the header)
296         else {
297                 for (i=1; row=table.rows[i]; ++i) {
298                         if (row["id"] == "ctdl-msgsum-" + msgnum) {
299                                 row.classList.add("ctdl-mail-selected");
300                         }
301                         else {
302                                 row.classList.remove("ctdl-mail-selected");
303                         }
304                 }
305         }
306
307         // display the message if it isn't already displayed
308         if (displayed_message != msgnum) {
309                 displayed_message = msgnum;
310                 mail_display_message(msgnum, document.getElementById("ctdl-mailbox-reading-pane"), 1);
311         }
312 }
313
314
315 // render one row in the mailbox table (this could be called from one of several places)
316 function mail_render_row(msg, is_selected) {
317         let row = "<tr "
318                 + "id=\"ctdl-msgsum-" + msg["msgnum"] + "\" "
319                 + (is_selected ? "class=\"ctdl-mail-selected\" " : "")
320                 + "onClick=\"click_message(event," + msg["msgnum"] + ");\""
321                 + "onselectstart=\"return false;\" "
322                 + "draggable=\"true\" "
323                 + "ondragstart=\"mail_dragstart(event)\" "
324                 + ">"
325                 + "<td class=\"ctdl-mail-subject\">" + msg["subject"] + "</td>"
326                 + "<td class=\"ctdl-mail-sender\">" + msg["author"] + "</td>"
327                 + "<td class=\"ctdl-mail-date\">" + string_timestamp(msg["time"],1) + "</td>"
328                 + "<td class=\"ctdl-mail-msgnum\">" + msg["msgnum"] + "</td>"
329                 + "</tr>";
330         return(row);
331 }
332
333
334 // RENDERER FOR THIS VIEW
335 function view_render_mail() {
336         // Put the "enter new message" button into the topbar
337         document.getElementById("ctdl-newmsg-button").innerHTML = "<i class=\"fa fa-edit\"></i>" + _("Write mail");
338         document.getElementById("ctdl-newmsg-button").style.display = "block";
339
340         // Put the "delete message(s)" button into the topbar
341         let d = document.getElementById("ctdl-delete-button");
342         d.innerHTML = "<i class=\"fa fa-trash\"></i>" + _("Delete");
343         d.style.display = "block";
344         //d.addEventListener("click", mail_delete_selected);
345
346         document.getElementById("ctdl-main").innerHTML
347                 = "<div id=\"ctdl-mailbox-grid-container\" class=\"ctdl-mailbox-grid-container\">"
348                 + "<div id=\"ctdl-mailbox-pane\" class=\"ctdl-mailbox-pane\"></div>"
349                 + "<div id=\"ctdl-mailbox-reading-pane\" class=\"ctdl-mailbox-reading-pane\"></div>"
350                 + "</div>"
351         ;
352
353         highest_mailnum = 0;                                    // Keep track of highest message number to track newly arrived messages
354         render_mailbox_display(newmail_notify.NO);
355         try {                                                   // if this was already set up, clear it so there aren't multiple
356                 clearInterval(RefreshMailboxInterval);
357         }
358         catch {
359         }
360         RefreshMailboxInterval = setInterval(refresh_mail_display, 10000);
361 }
362
363
364 // Refresh the mailbox, either for the first time or whenever needed
365 function refresh_mail_display() {
366         // If the "ctdl-mailbox-pane" no longer exists, the user has navigated to a different part of the site,
367         // so cancel the refresh.
368         try {
369                 document.getElementById("ctdl-mailbox-pane").innerHTML;
370         }
371         catch {
372                 clearInterval(RefreshMailboxInterval);
373                 return;
374         }
375
376         // Ask the server if the room has been written to since our last look at it.
377         url = "/ctdl/r/" + escapeHTMLURI(current_room) + "/stat";
378         fetch_stat = async() => {
379                 response = await fetch(url);
380                 stat = await(response.json());
381                 if (stat.room_mtime > room_mtime) {                     // if modified...
382                         room_mtime = stat.room_mtime;
383                         render_mailbox_display(newmail_notify.YES);     // ...force a refresh
384                 }
385         }
386         fetch_stat();
387 }
388
389
390 // This is where the rendering of the message list in the mailbox view is performed.
391 // Set notify to newmail_notify.NO or newmail_notify.YES depending on whether we are interested in the arrival of new messages.
392 function render_mailbox_display(notify) {
393
394         url = "/ctdl/r/" + escapeHTMLURI(current_room) + "/mailbox";
395         fetch_mailbox = async() => {
396                 response = await fetch(url);
397                 msgs = await(response.json());
398                 if (response.ok) {
399                         var previously_selected = [];
400                         var oldtable = document.getElementById("ctdl-onscreen-mailbox");
401                         var i, row;
402
403                         // If one or more messages was already selected, remember them so we can re-select them
404                         if ( (displayed_message > 0) && (oldtable) ) {
405                                 for (i=0; row=oldtable.rows[i]; ++i) {
406                                         if (row.classList.contains("ctdl-mail-selected")) {
407                                                 previously_selected.push(parseInt(row["id"].substring(12)));
408                                         }
409                                 }
410                         }
411
412                         // begin rendering the mailbox table
413                         box =   "<table id=\"ctdl-onscreen-mailbox\" class=\"ctdl-mailbox-table\" width=100%><tr>"
414                                 + "<th>" + _("Subject") + "</th>"
415                                 + "<th>" + _("Sender") + "</th>"
416                                 + "<th>" + _("Date") + "</th>"
417                                 + "<th>#</th>"
418                                 + "</tr>";
419
420                         for (let i=0; i<msgs.length; ++i) {
421                                 let m = parseInt(msgs[i].msgnum);
422                                 let s = (previously_selected.includes(m));
423                                 box += mail_render_row(msgs[i], s);
424                                 if (m > highest_mailnum) {
425                                         highest_mailnum = m;
426                                 }
427                         }
428
429                         box +=  "</table>";
430                         document.getElementById("ctdl-mailbox-pane").innerHTML = box;
431                         document.addEventListener("keydown", mail_keypress);
432                 }
433         }
434         fetch_mailbox();
435 }
436
437
438 // Compose a new mail message (called by the Reply button here, or by the dispatcher in views.js)
439 function mail_compose(is_quoted, references, quoted_msgnum, m_to, m_cc, m_subject) {
440
441         let is_reply = 0;
442
443         // m_to will be an array of zero or more recipients for the To: field.  Convert it to a string.
444         if (m_to) {
445                 is_reply = 1;
446                 m_to = Array.from(new Set(m_to));       // remove dupes
447                 m_to_str = "";
448                 for (i=0; i<m_to.length; ++i) {
449                         if (i > 0) {
450                                 m_to_str += ", ";
451                         }
452                         m_to_str += m_to[i].replaceAll("<", "&lt;").replaceAll(">", "&gt;");
453                 }
454         }
455         else {
456                 m_to_str = "";
457         }
458
459         // m_to will be an array of zero or more recipients for the Cc: field.  Convert it to a string.
460         if (m_cc) {
461                 is_reply = 1;
462                 m_cc = Array.from(new Set(m_cc));       // remove dupes
463                 m_cc_str = "";
464                 for (i=0; i<m_cc.length; ++i) {
465                         if (i > 0) {
466                                 m_cc_str += ", ";
467                         }
468                         m_cc_str += m_cc[i].replaceAll("<", "&lt;").replaceAll(">", "&gt;");
469                 }
470         }
471         else {
472                 m_cc_str = "";
473         }
474
475         quoted_div_name = randomString();
476
477         // Make the "Write mail" button disappear.  We're already there!
478         document.getElementById("ctdl-newmsg-button").style.display = "none";
479
480         // is_quoted    true or false depending on whether the user selected "reply quoted" (is this appropriate for mail?)
481         // references   list of references, be sure to use this in a reply
482         // msgid        if a reply, the msgid of the most recent message in the chain, the one to which we are replying
483
484         // Now display the screen.  (Yes, I combined regular strings + template literals.  I just learned template literals.  Converting to all template literals would be fine.)
485         compose_screen =
486                 // Hidden values that we are storing right here in the document tree for later
487                   "<input id=\"ctdl_mc_is_quoted\" style=\"display:none\" value=\"" + is_quoted + "\"></input>"
488                 + "<input id=\"ctdl_mc_references\" style=\"display:none\" value=\"" + references + "\"></input>"
489
490                 // Header fields, the composition window, and the button bar are arranged using a Grid layout.
491                 + "<div id=\"ctdl-compose-mail\" class=\"ctdl-compose-mail\">"
492
493                 // Visible To: field, plus a box to make the CC/BCC lines appear
494                 + "<div class=\"ctdl-compose-to-label\">" + _("To:") + "</div>"
495                 + "<div class=\"ctdl-compose-to-line\">"
496                 + "<div class=\"ctdl-compose-to-field\" id=\"ctdl-compose-to-field\" contenteditable=\"true\">" + m_to_str + "</div>"
497                 + "<div class=\"ctdl-cc-bcc-buttons ctdl-msg-button\" id=\"ctdl-cc-bcc-buttons\" "
498                 + "onClick=\"make_cc_bcc_visible()\">"
499                 + _("CC:") + "/" + _("BCC:") + "</div>"
500                 + "</div>"
501
502                 // CC/BCC
503                 + "<div class=\"ctdl-compose-cc-label\" id=\"ctdl-compose-cc-label\">" + _("CC:") + "</div>"
504                 + "<div class=\"ctdl-compose-cc-field\" id=\"ctdl-compose-cc-field\" contenteditable=\"true\">" + m_cc_str + "</div>"
505                 + "<div class=\"ctdl-compose-bcc-label\" id=\"ctdl-compose-bcc-label\">" + _("BCC:") + "</div>"
506                 + "<div class=\"ctdl-compose-bcc-field\" id=\"ctdl-compose-bcc-field\" contenteditable=\"true\"></div>"
507
508                 // Visible subject field
509                 + "<div class=\"ctdl-compose-subject-label\">" + _("Subject:") + "</div>"
510                 + "<div class=\"ctdl-compose-subject-field\" id=\"ctdl-compose-subject-field\" contenteditable=\"true\">" + m_subject + "</div>"
511
512                 // Message composition box
513                 + "<div class=\"ctdl-compose-message-box\" id=\"ctdl-editor-body\" contenteditable=\"true\">"
514         ;
515
516         // If this is a quoted reply, insert a div within which we will render the original message.
517         if (is_quoted) {
518                 compose_screen += "<br><br><blockquote><div id=\"" + quoted_div_name + "\">QUOTED MESSAGE HERE</div></blockquote>";
519         }
520
521         // The button bar is a Grid element, and is also a Flexbox container.
522         compose_screen += `
523                 </div>
524                 <div class="ctdl-compose-toolbar">
525                 <span class="ctdl-msg-button" onclick="mail_send_message()"><i class="fa fa-paper-plane" style="color:green"></i> ${_("Send message")} </span>
526                 <span class="ctdl-msg-button"> ${_("Save to Drafts")} </span>
527                 <span class="ctdl-msg-button" onClick="show_or_hide_upload_window()"><i class="fa fa-paperclip" style="color:grey"></i> ${_("Attachments:")} <span id="ctdl_num_attachments"> ${uploads.length} </span></span>
528                 <span class="ctdl-msg-button">  ${_("Contacts")} </span>
529                 <span class="ctdl-msg-button" onClick="flush_uploads();gotoroom(current_room)"><i class="fa fa-trash" style="color:red"></i> ${_("Cancel")} </span>
530                 </div>`
531         ;
532
533
534         document.getElementById("ctdl-main").innerHTML = compose_screen;
535
536         if (m_cc) {
537                 document.getElementById("ctdl-compose-cc-label").style.display = "block";
538                 document.getElementById("ctdl-compose-cc-field").style.display = "block";
539         }
540
541         activate_uploads("ctdl-editor-body");
542
543         // If this is a quoted reply, render the original message into the div we set up earlier.
544         if (is_quoted) {
545                 document.getElementById(quoted_div_name).innerHTML = quoted_msgnum;
546                 mail_display_message(quoted_msgnum, document.getElementById(quoted_div_name), 0);
547         }
548
549         if (is_reply) {
550                 setTimeout(() => { document.getElementById("ctdl-editor-body").focus(); }, 0);
551         }
552         else {
553                 setTimeout(() => { document.getElementById("ctdl-compose-to-field").focus(); }, 0);
554         }
555
556 }
557
558 // Called when the user clicks the button to make the hidden "CC" and "BCC" lines appear.
559 // It is also called automatically during a Reply when CC is pre-populated.
560 function make_cc_bcc_visible() {
561         document.getElementById("ctdl-cc-bcc-buttons").style.display = "none";
562         document.getElementById("ctdl-compose-cc-label").style.display = "block";
563         document.getElementById("ctdl-compose-cc-field").style.display = "block";
564         document.getElementById("ctdl-compose-bcc-label").style.display = "block";
565         document.getElementById("ctdl-compose-bcc-field").style.display = "block";
566 }
567
568
569 // Helper function for mail_send_messages() to extract and decode metadata values.
570 function msm_field(element_name, separator) {
571         let s1 = document.getElementById(element_name).innerHTML;
572         let s2 = s1.replaceAll("|",separator);          // Replace "|" with "!" because "|" is a field separator in Citadel
573         let s3 = decodeURI(s2);
574         let s4 = document.createElement("textarea");    // This One Weird Trick Unescapes All HTML Entities
575         s4.innerHTML = s3;
576         let s5 = s4.value;
577         return(s5);
578 }
579
580
581 // Save the posted message to the server
582 function mail_send_message() {
583
584         document.body.style.cursor = "wait";
585         deactivate_uploads();
586         let url = "/ctdl/r/" + escapeHTMLURI(current_room)
587                 + "/dummy_name_for_new_mail"
588                 + "?wefw="      + msm_field("ctdl_mc_references", "!")                          // references (if present)
589                 + "&subj="      + msm_field("ctdl-compose-subject-field", " ")                  // subject (if present)
590                 + "&mailto="    + msm_field("ctdl-compose-to-field", ",")                       // To: (required)
591                 + "&mailcc="    + msm_field("ctdl-compose-cc-field", ",")                       // Cc: (if present)
592                 + "&mailbcc="   + msm_field("ctdl-compose-bcc-field", ",")                      // Bcc: (if present)
593         ;
594         if (uploads.length > 0) {
595                 url += "&att=";
596                 for (let i=0; i<uploads.length; ++i) {
597                         url += uploads[i]["ref"];
598                         if (i != uploads.length - 1) {
599                                 url += ",";
600                         }
601                 }
602         }
603         body_text = "<html><body>" + document.getElementById("ctdl-editor-body").innerHTML + "</body></html>\r\n";
604
605         var request = new XMLHttpRequest();
606         request.open("PUT", url, true);
607         request.setRequestHeader("Content-type", "text/html");
608         request.onreadystatechange = function() {
609                 if (request.readyState == 4) {
610                         document.body.style.cursor = "default";
611                         if (Math.trunc(request.status / 100) == 2) {
612                                 headers = request.getAllResponseHeaders().split("\n");
613                                 for (var i in headers) {
614                                         if (headers[i].startsWith("etag: ")) {
615                                                 new_msg_num = headers[i].split(" ")[1];
616                                         }
617                                 }
618
619                                 // successfully saving a message means the attachments are now gone from the server.
620                                 uploads = [];
621
622                                 // After saving the message, go back to the mailbox view.
623                                 gotoroom(current_room);
624
625                         }
626                         else {
627                                 error_message = request.responseText;
628                                 if (error_message.length == 0) {
629                                         error_message = _("An error has occurred.");
630                                 }
631                                 alert(error_message);                                           // editor remains open
632                         }
633                 }
634         };
635         request.send(body_text);
636 }