1 // This module handles the view for "mailbox" rooms.
3 // Copyright (c) 2016-2022 by the citadel.org team
5 // This program is open source software. Use, duplication, or
6 // disclosure are subject to the GNU General Public License v3.
9 var selected_message = 0; // Remember the last message that was selected
10 var RefreshMailboxInterval; // We store our refresh timer here
13 // Render reply address for a message (FIXME we might want to figure out in-reply-to)
14 function reply_addr(msg) {
19 return([msg.from + " <" + msg.rfca + ">"]);
24 // Render the To: recipients for a reply-all operation
25 function replyall_to(msg) {
26 return([...reply_addr(msg), ...msg.rcpt]);
30 // Render a message into the mailbox view
31 // (We want the message number and the message itself because we need to keep the msgnum for reply purposes)
32 function mail_render_one(msgnum, msg, target_div, include_controls) {
36 "<div class=\"ctdl-mmsg-wrapper\">" // begin message wrapper
39 if (include_controls) { // omit controls if this is a pull quote
41 render_userpic(msg.from) // user avatar
42 + "<div class=\"ctdl-mmsg-content\">" // begin content
43 + "<div class=\"ctdl-msg-header\">" // begin header
44 + "<span class=\"ctdl-msg-header-info\">" // begin header info on left side
45 + render_msg_author(msg)
46 + "<span class=\"ctdl-msgdate\">"
47 + string_timestamp(msg.time,0)
48 + "</span>" // end msgdate
49 + "</span>" // end header info on left side
50 + "<span class=\"ctdl-msg-header-buttons\">" // begin buttons on right side
52 + "<span class=\"ctdl-msg-button\">" // Reply (mail is always Quoted)
53 + "<a href=\"javascript:mail_compose(true,'"+msg.wefw+"','"+msgnum+"', reply_addr(msg), [], 'Re: '+msg.subj);\">"
54 + "<i class=\"fa fa-reply\"></i> "
58 + "<span class=\"ctdl-msg-button\">" // Reply-All (mail is always Quoted)
59 + "<a href=\"javascript:mail_compose(true,'"+msg.wefw+"','"+msgnum+"', replyall_to(msg), msg.cccc, 'Re: '+msg.subj);\">"
60 + "<i class=\"fa fa-reply-all\"></i> "
64 if (can_delete_messages) {
66 "<span class=\"ctdl-msg-button\">"
67 + "<a href=\"javascript:forum_delete_message('"+div+"','"+msg.msgnum+"');\">"
68 + "<i class=\"fa fa-trash\"></i> "
74 "</span>"; // end buttons on right side
76 // Display the To: recipients, if any are present
78 outmsg += "<br><span>" + _("To:") + " ";
79 for (var r=0; r<msg.rcpt.length; ++r) {
83 outmsg += escapeHTML(msg.rcpt[r]);
88 // Display the Cc: recipients, if any are present
90 outmsg += "<br><span>" + _("Cc:") + " ";
91 for (var r=0; r<msg.cccc.length; ++r) {
95 outmsg += escapeHTML(msg.cccc[r]);
100 // Display a subject line, but only if the message has a subject (internal Citadel messages often don't)
103 "<br><span class=\"ctdl-msgsubject\">" + msg.subj + "</span>";
107 "</div>"; // end header
111 "<div class=\"ctdl-msg-body\" id=\"" + div + "_body\">" // begin body
113 + "</div>" // end body
114 + "</div>" // end content
115 + "</div>" // end wrapper
119 outmsg = "<div class=\"ctdl-mmsg-wrapper\">" + err.message + "</div>";
122 target_div.innerHTML = outmsg;
126 // display an individual message (note: this wants an actual div object, not a string containing the name of a div)
127 function mail_display_message(msgnum, target_div, include_controls) {
128 url = "/ctdl/r/" + escapeHTMLURI(current_room) + "/" + msgnum + "/json";
129 mail_fetch_msg = async() => {
130 response = await fetch(url);
131 msg = await(response.json());
133 mail_render_one(msgnum, msg, target_div, include_controls);
140 // A message has been selected...
141 function select_message(msgnum) {
142 // unhighlight any previously selected message
144 document.getElementById("ctdl-msgsum-" + selected_message).classList.remove("ctdl-mail-selected");
149 // highlight the newly selected message
150 document.getElementById("ctdl-msgsum-" + msgnum).classList.add("ctdl-mail-selected");
151 //document.getElementById("ctdl-msgsum-" + msgnum).scrollIntoView();
153 // display the message if it isn't already displayed
154 if (selected_message != msgnum) {
155 selected_message = msgnum;
156 mail_display_message(msgnum, document.getElementById("ctdl-mailbox-reading-pane"), 1);
161 // render one row in the mailbox table (this could be called from one of several places)
162 function mail_render_row(msg) {
164 + "id=\"ctdl-msgsum-" + msg["msgnum"] + "\" "
165 + "onClick=\"select_message(" + msg["msgnum"] + ");\" "
166 //+ "onmouseenter=\"console.log('mouse in');\" "
167 //+ "onmouseleave=\"console.log('mouse out');\""
169 + "<td class=\"ctdl-mail-subject\">" + msg["subject"] + "</td>"
170 + "<td class=\"ctdl-mail-sender\">" + msg["author"] + "</td>"
171 + "<td class=\"ctdl-mail-date\">" + string_timestamp(msg["time"],1) + "</td>"
172 + "<td class=\"ctdl-mail-msgnum\">" + msg["msgnum"] + "</td>"
178 // Set up the mailbox view
179 function mail_display() {
181 // Put the "enter new message" button into the sidebar
182 document.getElementById("ctdl-newmsg-button").innerHTML = "<i class=\"fa fa-edit\"></i>" + _("Write mail");
183 document.getElementById("ctdl-newmsg-button").style.display = "block";
185 document.getElementById("ctdl-main").innerHTML
186 = "<div id=\"ctdl-mailbox-grid-container\" class=\"ctdl-mailbox-grid-container\">"
187 + "<div id=\"ctdl-mailbox-pane\" class=\"ctdl-mailbox-pane\"></div>"
188 + "<div id=\"ctdl-mailbox-reading-pane\" class=\"ctdl-mailbox-reading-pane\"></div>"
192 render_mailbox_display();
193 try { // if this was already set up, clear it so there aren't multiple
194 clearInterval(RefreshMailboxInterval);
198 RefreshMailboxInterval = setInterval(refresh_mail_display, 10000);
202 // Refresh the mailbox, either for the first time or whenever needed
203 function refresh_mail_display() {
205 // If the "ctdl-mailbox-pane" no longer exists, the user has navigated to a different part of the site,
206 // so cancel the refresh.
208 document.getElementById("ctdl-mailbox-pane").innerHTML;
211 console.log("ending refresh_mail_display()");
212 clearInterval(RefreshMailboxInterval);
216 // Ask the server if the room has been written to since our last look at it.
217 url = "/ctdl/r/" + escapeHTMLURI(current_room) + "/stat";
218 fetch_stat = async() => {
219 response = await fetch(url);
220 stat = await(response.json());
221 if (stat.room_mtime > room_mtime) {
222 room_mtime = stat.room_mtime;
223 render_mailbox_display();
230 // This is where the rendering of the message list in the mailbox view is performed.
231 function render_mailbox_display() {
233 url = "/ctdl/r/" + escapeHTMLURI(current_room) + "/mailbox";
234 fetch_mailbox = async() => {
235 response = await fetch(url);
236 msgs = await(response.json());
239 box = "<table class=\"ctdl-mailbox-table\" width=100%><tr>"
240 + "<th>" + _("Subject") + "</th>"
241 + "<th>" + _("Sender") + "</th>"
242 + "<th>" + _("Date") + "</th>"
246 for (var i=0; i<msgs.length; ++i) {
247 box += mail_render_row(msgs[i]);
251 document.getElementById("ctdl-mailbox-pane").innerHTML = box;
253 if (selected_message > 0) { // if we had a message selected, keep it selected
254 select_message(selected_message);
262 // Compose a new mail message (called by the Reply button here, or by the dispatcher in views.js)
263 function mail_compose(is_quoted, references, quoted_msgnum, m_to, m_cc, m_subject) {
264 console.log("mail_compose()");
266 // m_to will be an array of zero or more recipients for the To: field. Convert it to a string.
268 m_to = Array.from(new Set(m_to)); // remove dupes
270 for (i=0; i<m_to.length; ++i) {
274 m_to_str += m_to[i].replaceAll("<", "<").replaceAll(">", ">");
281 // m_to will be an array of zero or more recipients for the Cc: field. Convert it to a string.
283 m_cc = Array.from(new Set(m_cc)); // remove dupes
285 for (i=0; i<m_cc.length; ++i) {
289 m_cc_str += m_cc[i].replaceAll("<", "<").replaceAll(">", ">");
296 quoted_div_name = randomString();
298 // Make the "Write mail" button disappear. We're already there!
299 document.getElementById("ctdl-newmsg-button").style.display = "none";
301 // is_quoted true or false depending on whether the user selected "reply quoted" (is this appropriate for mail?)
302 // references list of references, be sure to use this in a reply
303 // msgid if a reply, the msgid of the most recent message in the chain, the one to which we are replying
305 // Now display the screen.
307 // Hidden values that we are storing right here in the document tree for later
308 "<input id=\"ctdl_mc_is_quoted\" style=\"display:none\" value=\"" + is_quoted + "\"></input>"
309 + "<input id=\"ctdl_mc_references\" style=\"display:none\" value=\"" + references + "\"></input>"
311 // Header fields, the composition window, and the button bar are arranged using a Grid layout.
312 + "<div id=\"ctdl-compose-mail\" class=\"ctdl-compose-mail\">"
314 // Visible To: field, plus a box to make the CC/BCC lines appear
315 + "<div class=\"ctdl-compose-to-label\">" + _("To:") + "</div>"
316 + "<div class=\"ctdl-compose-to-line\">"
317 + "<div class=\"ctdl-compose-to-field\" id=\"ctdl-compose-to-field\" contenteditable=\"true\">" + m_to_str + "</div>"
318 + "<div class=\"ctdl-cc-bcc-buttons ctdl-msg-button\" id=\"ctdl-cc-bcc-buttons\" "
319 + "onClick=\"make_cc_bcc_visible()\">"
320 + _("CC:") + "/" + _("BCC:") + "</div>"
324 + "<div class=\"ctdl-compose-cc-label\" id=\"ctdl-compose-cc-label\">" + _("CC:") + "</div>"
325 + "<div class=\"ctdl-compose-cc-field\" id=\"ctdl-compose-cc-field\" contenteditable=\"true\">" + m_cc_str + "</div>"
326 + "<div class=\"ctdl-compose-bcc-label\" id=\"ctdl-compose-bcc-label\">" + _("BCC:") + "</div>"
327 + "<div class=\"ctdl-compose-bcc-field\" id=\"ctdl-compose-bcc-field\" contenteditable=\"true\"></div>"
329 // Visible subject field
330 + "<div class=\"ctdl-compose-subject-label\">" + _("Subject:") + "</div>"
331 + "<div class=\"ctdl-compose-subject-field\" id=\"ctdl-compose-subject-field\" contenteditable=\"true\">" + m_subject + "</div>"
333 // Message composition box
334 + "<div class=\"ctdl-compose-message-box\" id=\"ctdl-editor-body\" contenteditable=\"true\">"
338 compose_screen += "<br><br><blockquote><div id=\"" + quoted_div_name + "\"></div></blockquote>";
344 // The button bar is a Grid element, and is also a Flexbox container.
345 + "<div class=\"ctdl-compose-toolbar\">"
346 + "<span class=\"ctdl-msg-button\" onclick=\"mail_send_message()\"><i class=\"fa fa-paper-plane\" style=\"color:green\"></i> " + _("Send message") + "</span>"
347 + "<span class=\"ctdl-msg-button\">" + _("Save to Drafts") + "</span>"
348 + "<span class=\"ctdl-msg-button\">" + _("Attachments:") + " 0" + "</span>"
349 + "<span class=\"ctdl-msg-button\">" + _("Contacts") + "</span>"
350 + "<span class=\"ctdl-msg-button\" onClick=\"gotoroom(current_room)\"><i class=\"fa fa-trash\" style=\"color:red\"></i> " + _("Cancel") + "</span>"
354 document.getElementById("ctdl-main").innerHTML = compose_screen;
355 mail_display_message(quoted_msgnum, document.getElementById(quoted_div_name), 0);
357 document.getElementById("ctdl-compose-cc-label").style.display = "block";
358 document.getElementById("ctdl-compose-cc-field").style.display = "block";
363 function make_cc_bcc_visible() {
364 document.getElementById("ctdl-cc-bcc-buttons").style.display = "none";
365 document.getElementById("ctdl-compose-bcc-label").style.display = "block";
366 document.getElementById("ctdl-compose-bcc-field").style.display = "block";
370 // Helper function for mail_send_messages() to extract and decode metadata values.
371 function msm_field(element_name, separator) {
372 let s1 = document.getElementById(element_name).innerHTML;
373 let s2 = s1.replaceAll("|",separator); // Replace "|" with "!" because "|" is a field separator in Citadel wire protocol
374 let s3 = decodeURI(s2);
375 let s4 = document.createElement("textarea"); // This One Weird Trick Unescapes All HTML Entities
382 // Save the posted message to the server
383 function mail_send_message() {
385 document.body.style.cursor = "wait";
386 url = "/ctdl/r/" + escapeHTMLURI(current_room)
387 + "/dummy_name_for_new_mail"
388 + "?wefw=" + msm_field("ctdl_mc_references", "!") // references (if present)
389 + "&subj=" + msm_field("ctdl-compose-subject-field", " ") // subject (if present)
390 + "&mailto=" + msm_field("ctdl-compose-to-field", ",") // To: (required)
391 + "&mailcc=" + msm_field("ctdl-compose-cc-field", ",") // Cc: (if present)
392 + "&mailbcc=" + msm_field("ctdl-compose-bcc-field", ",") // Bcc: (if present)
395 boundary = randomString();
397 "--" + boundary + "\r\n"
398 + "Content-type: text/html\r\n"
399 + "Content-transfer-encoding: quoted-printable\r\n"
401 + quoted_printable_encode(
402 "<html><body>" + document.getElementById("ctdl-editor-body").innerHTML + "</body></html>"
404 + "--" + boundary + "--\r\n"
407 var request = new XMLHttpRequest();
408 request.open("PUT", url, true);
409 request.setRequestHeader("Content-type", "multipart/mixed; boundary=\"" + boundary + "\"");
410 request.onreadystatechange = function() {
411 if (request.readyState == 4) {
412 document.body.style.cursor = "default";
413 if (Math.trunc(request.status / 100) == 2) {
414 headers = request.getAllResponseHeaders().split("\n");
415 for (var i in headers) {
416 if (headers[i].startsWith("etag: ")) {
417 new_msg_num = headers[i].split(" ")[1];
421 // After saving the message, go back to the mailbox view.
422 gotoroom(current_room);
426 error_message = request.responseText;
427 if (error_message.length == 0) {
428 error_message = _("An error has occurred.");
430 alert(error_message); // editor remains open
434 request.send(body_text);