X-Git-Url: https://code.citadel.org/?a=blobdiff_plain;f=citadel%2Fmsgbase.c;h=13e1b125806bc2c888ebac3da01f056a806708ec;hb=682137147d66ec1ea06b9099c55e597c23b0e31f;hp=91e8e10a16dc119e8ad8898589cebb179efae2cf;hpb=c911b8373944eb4eef5688475faba0ff84767ce0;p=citadel.git diff --git a/citadel/msgbase.c b/citadel/msgbase.c index 91e8e10a1..13e1b1258 100644 --- a/citadel/msgbase.c +++ b/citadel/msgbase.c @@ -1,23 +1,21 @@ /* - * $Id$ - * * Implements the message store. - * + * * Copyright (c) 1987-2010 by the citadel.org team * - * This program is free software; you can redistribute it and/or modify - * it under the terms of the GNU General Public License as published by - * the Free Software Foundation; either version 3 of the License, or - * (at your option) any later version. + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 3 of the License, or + * (at your option) any later version. * - * This program is distributed in the hope that it will be useful, - * but WITHOUT ANY WARRANTY; without even the implied warranty of - * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the - * GNU General Public License for more details. + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. * - * You should have received a copy of the GNU General Public License - * along with this program; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + * You should have received a copy of the GNU General Public License + * along with this program; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ #include "sysdep.h" @@ -309,7 +307,10 @@ void headers_euid(long msgnum, void *userdata) return; } - cprintf("%ld|%s|\n", msgnum, (msg->cm_fields['E'] ? msg->cm_fields['E'] : "")); + cprintf("%ld|%s|%s\n", + msgnum, + (msg->cm_fields['E'] ? msg->cm_fields['E'] : ""), + (msg->cm_fields['T'] ? msg->cm_fields['T'] : "0")); CtdlFreeMessage(msg); } @@ -353,7 +354,7 @@ int CtdlMsgCmp(struct CtdlMessage *msg, struct CtdlMessage *template) { * Retrieve the "seen" message list for the current room. */ void CtdlGetSeen(char *buf, int which_set) { - struct visit vbuf; + visit vbuf; /* Learn about the user and room in question */ CtdlGetRelationship(&vbuf, &CC->user, &CC->room); @@ -378,7 +379,7 @@ void CtdlSetSeen(long *target_msgnums, int num_target_msgnums, int was_seen = 0; long lo = (-1L); long hi = (-1L); - struct visit vbuf; + visit vbuf; long *msglist; int num_msgs = 0; StrBuf *vset; @@ -604,7 +605,7 @@ int CtdlForEachMessage(int mode, long ref, char *search_string, { int a, i, j; - struct visit vbuf; + visit vbuf; struct cdbdata *cdbfr; long *msglist = NULL; int num_msgs = 0; @@ -796,6 +797,8 @@ void cmd_msgs(char *cmdbuf) char search_string[1024]; ForEachMsgCallback CallBack; + if (CtdlAccessCheck(ac_logged_in_or_guest)) return; + extract_token(which, cmdbuf, 0, '|', sizeof which); cm_ref = extract_int(cmdbuf, 1); extract_token(search_string, cmdbuf, 1, '|', sizeof search_string); @@ -832,11 +835,6 @@ void cmd_msgs(char *cmdbuf) else mode = MSGS_ALL; - if ((!(CC->logged_in)) && (!(CC->internal_pgm))) { - cprintf("%d not logged in\n", ERROR + NOT_LOGGED_IN); - return; - } - if ( (mode == MSGS_SEARCH) && (!config.c_enable_fulltext) ) { cprintf("%d Full text index is not enabled on this server.\n", ERROR + CMD_NOT_SUPPORTED); @@ -927,92 +925,56 @@ void do_help_subst(char *buffer) */ void memfmout( char *mptr, /* where are we going to get our text from? */ - const char *nl) /* string to terminate lines with */ -{ - StrBuf *OutBuf; - char *LineStart; - char *LastBlank; - size_t len; - size_t NLLen; - char *eptr; - int NLFound, NLFoundLastTime; - int Found; - - len = strlen (mptr); - NLLen = strlen (nl); - eptr = mptr + len; - - OutBuf = NewStrBufPlain(NULL, 200); - - NLFound = NLFoundLastTime = 0; - do { - size_t i; - - LineStart = LastBlank = mptr; - Found = 'x'; - i = 0; - while (Found == 'x') - { - if (LineStart[i] == '\n') - Found = '\n'; - else if (LineStart[i] == '\r') - Found = '\r'; - else if (LineStart[i] == ' ') - { - LastBlank = &LineStart[i]; - i++; + const char *nl /* string to terminate lines with */ +) { + int column = 0; + unsigned char ch = 0; + char outbuf[1024]; + int len = 0; + int nllen = 0; + + if (!mptr) return; + nllen = strlen(nl); + while (ch=*(mptr++), ch != 0) { + + if (ch == '\n') { + client_write(outbuf, len); + len = 0; + client_write(nl, nllen); + column = 0; + } + else if (ch == '\r') { + /* Ignore carriage returns. Newlines are always LF or CRLF but never CR. */ + } + else if (isspace(ch)) { + if (column > 72) { /* Beyond 72 columns, break on the next space */ + client_write(outbuf, len); + len = 0; + client_write(nl, nllen); + column = 0; + } + else { + outbuf[len++] = ch; + ++column; } - else if ((i > 80) && (LineStart != LastBlank)) - Found = ' '; - else if (LineStart[i] == '\0') - Found = '\0'; - else i++; } - switch (Found) - { - case '\n': - if (LineStart[i + 1] == '\r') - mptr = &LineStart[i + 2]; - else - mptr = &LineStart[i + 1]; - i--; - NLFound = 1; - break; - case '\r': - if (LineStart[i + 1] == '\n') - mptr = &LineStart[i + 2]; - else - mptr = &LineStart[i + 1]; - i--; - NLFound = 1; - break; - case '\0': - mptr = &LineStart[i + 1]; - i--; - NLFound = 0; - break; - case ' ': - mptr = LastBlank + 1; - i = LastBlank - LineStart; - NLFound = 0; - break; - case 'x': - /* WHUT? */ - while (*mptr != '\0') mptr++; - break; + else { + outbuf[len++] = ch; + ++column; + if (column > 1000) { /* Beyond 1000 columns, break anywhere */ + client_write(outbuf, len); + len = 0; + client_write(nl, nllen); + column = 0; + } } - if (NLFoundLastTime) - StrBufPlain(OutBuf, HKEY(" ")); - else - FlushStrBuf(OutBuf); - StrBufAppendBufPlain(OutBuf, LineStart, i, 0); - StrBufAppendBufPlain(OutBuf, nl, NLLen, 0); - - cputbuf(OutBuf); - NLFoundLastTime = NLFound; - } while (*mptr != '\0'); - - FreeStrBuf(&OutBuf); + } + if (len) { + client_write(outbuf, len); + len = 0; + client_write(nl, nllen); + column = 0; + } } @@ -1135,7 +1097,49 @@ void mime_spew_section(char *name, char *filename, char *partnum, char *disp, } } +#ifdef MESSAGE_IN_ROOM +/* + * Check if a message is in the current room. + * This is used by CtdlFetchMessage to prevent random picking + * of messages from users private rooms + * + * The message list should probably be cached against the CC->room + */ +int CtdlMessageInRoom(long msgnum) +{ + visit vbuf; + struct cdbdata *cdbfr; + + /* Learn about the user and room in question */ + CtdlGetUser(&CC->user, CC->curr_user); + CtdlGetRelationship(&vbuf, &CC->user, &CC->room); + + /* Load the message list */ + cdbfr = cdb_fetch(CDB_MSGLISTS, &CC->room.QRnumber, sizeof(long)); + if (cdbfr != NULL) { + long *msglist = NULL; + int num_msgs = 0; + int i; + int r = 0; + + msglist = (long *) cdbfr->ptr; + num_msgs = cdbfr->len / sizeof(long); + + /* search for message msgnum */ + for (i=0; icm_fields['M'] == NULL) && (with_body) ) { dmsgtext = cdb_fetch(CDB_BIGMSGS, &msgnum, sizeof(long)); if (dmsgtext != NULL) { - ret->cm_fields['M'] = strdup(dmsgtext->ptr); + ret->cm_fields['M'] = dmsgtext->ptr; + dmsgtext->ptr = NULL; cdb_free(dmsgtext); } } @@ -1415,16 +1427,27 @@ void choose_preferred(char *name, char *filename, char *partnum, char *disp, /* * Now that we've chosen our preferred part, output it. */ -void output_preferred(char *name, char *filename, char *partnum, char *disp, - void *content, char *cbtype, char *cbcharset, size_t length, - char *encoding, char *cbid, void *cbuserdata) +void output_preferred(char *name, + char *filename, + char *partnum, + char *disp, + void *content, + char *cbtype, + char *cbcharset, + size_t length, + char *encoding, + char *cbid, + void *cbuserdata) { int i; char buf[128]; int add_newline = 0; char *text_content; struct ma_info *ma; - + char *decoded = NULL; + size_t bytes_decoded; + int rc = 0; + ma = (struct ma_info *)cbuserdata; /* This is not the MIME part you're looking for... */ @@ -1437,8 +1460,21 @@ void output_preferred(char *name, char *filename, char *partnum, char *disp, extract_token(buf, CC->preferred_formats, i, '|', sizeof buf); if (!strcasecmp(buf, cbtype)) { /* Yeah! Go! W00t!! */ + if (ma->dont_decode == 0) + rc = mime_decode_now (content, + length, + encoding, + &decoded, + &bytes_decoded); + if (rc < 0) + break; /* Give us the chance, maybe theres another one. */ + + if (rc == 0) text_content = (char *)content; + else { + text_content = decoded; + length = bytes_decoded; + } - text_content = (char *)content; if (text_content[length-1] != '\n') { ++add_newline; } @@ -1456,16 +1492,34 @@ void output_preferred(char *name, char *filename, char *partnum, char *disp, } cprintf("X-Citadel-MSG4-Partnum: %s\n", partnum); cprintf("\n"); - client_write(content, length); + client_write(text_content, length); if (add_newline) cprintf("\n"); + if (decoded != NULL) free(decoded); return; } } /* No translations required or possible: output as text/plain */ cprintf("Content-type: text/plain\n\n"); - fixed_output(name, filename, partnum, disp, content, cbtype, cbcharset, + rc = 0; + if (ma->dont_decode == 0) + rc = mime_decode_now (content, + length, + encoding, + &decoded, + &bytes_decoded); + if (rc < 0) + return; /* Give us the chance, maybe theres another one. */ + + if (rc == 0) text_content = (char *)content; + else { + text_content = decoded; + length = bytes_decoded; + } + + fixed_output(name, filename, partnum, disp, text_content, cbtype, cbcharset, length, encoding, cbid, cbuserdata); + if (decoded != NULL) free(decoded); } @@ -1494,16 +1548,18 @@ void extract_encapsulated_message(char *name, char *filename, char *partnum, cha memcpy(encap->msg, content, length); return; } - } - - - - +/* + * Determine whether the currently logged in session has permission to read + * messages in the current room. + */ int CtdlDoIHavePermissionToReadMessagesInThisRoom(void) { - if ((!(CC->logged_in)) && (!(CC->internal_pgm))) { + if ( (!(CC->logged_in)) + && (!(CC->internal_pgm)) + && (!config.c_guest_logins) + ) { return(om_not_logged_in); } return(om_ok); @@ -1545,7 +1601,14 @@ int CtdlOutputMsg(long msg_num, /* message number (local) to fetch */ return(r); } - /* FIXME: check message id against msglist for this room */ +#ifdef MESSAGE_IN_ROOM + if (!CtdlMessageInRoom(msg_num)) { + CtdlLogPrintf(CTDL_DEBUG, "Message %ld not in current room\n", msg_num); + if (do_proto) cprintf("%d Can't locate msg %ld in room\n", + ERROR + MESSAGE_NOT_FOUND, msg_num); + return(om_no_such_msg); + } +#endif /* * Fetch the message from disk. If we're in HEADERS_FAST mode, @@ -1608,7 +1671,7 @@ int CtdlOutputMsg(long msg_num, /* message number (local) to fetch */ char *qp_encode_email_addrs(char *source) { - char user[256], node[256], name[256]; + char *user, *node, *name; const char headerStr[] = "=?UTF-8?Q?"; char *Encoded; char *EncodedName; @@ -1626,6 +1689,8 @@ char *qp_encode_email_addrs(char *source) if (source == NULL) return source; if (IsEmptyStr(source)) return source; + cit_backtrace(); + CtdlLogPrintf(CTDL_DEBUG, "qp_encode_email_addrs: [%s]\n", source); AddrPtr = malloc (sizeof (long) * nAddrPtrMax); AddrUtf8 = malloc (sizeof (long) * nAddrPtrMax); @@ -1673,6 +1738,10 @@ char *qp_encode_email_addrs(char *source) for (i = 0; i < nColons; i++) source[AddrPtr[i]++] = '\0'; + /* TODO: if libidn, this might get larger*/ + user = malloc(SourceLen + 1); + node = malloc(SourceLen + 1); + name = malloc(SourceLen + 1); nPtr = Encoded; *nPtr = '\0'; @@ -1716,6 +1785,10 @@ char *qp_encode_email_addrs(char *source) } for (i = 0; i < nColons; i++) source[--AddrPtr[i]] = ','; + + free(user); + free(node); + free(name); free(AddrUtf8); free(AddrPtr); return Encoded; @@ -1746,6 +1819,330 @@ void sanitize_truncated_recipient(char *str) } +void OutputCtdlMsgHeaders( + struct CtdlMessage *TheMessage, + int do_proto) /* do Citadel protocol responses? */ +{ + char allkeys[30]; + int i, k, n; + int suppress_f = 0; + char buf[SIZ]; + char display_name[256]; + + /* begin header processing loop for Citadel message format */ + safestrncpy(display_name, "", sizeof display_name); + if (TheMessage->cm_fields['A']) { + strcpy(buf, TheMessage->cm_fields['A']); + if (TheMessage->cm_anon_type == MES_ANONONLY) { + safestrncpy(display_name, "****", sizeof display_name); + } + else if (TheMessage->cm_anon_type == MES_ANONOPT) { + safestrncpy(display_name, "anonymous", sizeof display_name); + } + else { + safestrncpy(display_name, buf, sizeof display_name); + } + if ((is_room_aide()) + && ((TheMessage->cm_anon_type == MES_ANONONLY) + || (TheMessage->cm_anon_type == MES_ANONOPT))) { + size_t tmp = strlen(display_name); + snprintf(&display_name[tmp], + sizeof display_name - tmp, + " [%s]", buf); + } + } + + /* Don't show Internet address for users on the + * local Citadel network. + */ + suppress_f = 0; + if (TheMessage->cm_fields['N'] != NULL) + if (!IsEmptyStr(TheMessage->cm_fields['N'])) + if (haschar(TheMessage->cm_fields['N'], '.') == 0) { + suppress_f = 1; + } + + /* Now spew the header fields in the order we like them. */ + n = safestrncpy(allkeys, FORDER, sizeof allkeys); + for (i=0; icm_fields[k] != NULL) + && (msgkeys[k] != NULL) ) { + if ((k == 'V') || (k == 'R') || (k == 'Y')) { + sanitize_truncated_recipient(TheMessage->cm_fields[k]); + } + if (k == 'A') { + if (do_proto) cprintf("%s=%s\n", + msgkeys[k], + display_name); + } + else if ((k == 'F') && (suppress_f)) { + /* do nothing */ + } + /* Masquerade display name if needed */ + else { + if (do_proto) cprintf("%s=%s\n", + msgkeys[k], + TheMessage->cm_fields[k] + ); + } + } + } + } + +} + +void OutputRFC822MsgHeaders( + struct CtdlMessage *TheMessage, + int flags, /* should the bessage be exported clean */ + const char *nl, + char *mid, long sizeof_mid, + char *suser, long sizeof_suser, + char *luser, long sizeof_luser, + char *fuser, long sizeof_fuser, + char *snode, long sizeof_snode) +{ + char datestamp[100]; + int subject_found = 0; + char buf[SIZ]; + int i, j, k; + char *mptr = NULL; + char *mpptr = NULL; + + for (i = 0; i < 256; ++i) { + if (TheMessage->cm_fields[i]) { + mptr = mpptr = TheMessage->cm_fields[i]; + + if (i == 'A') { + safestrncpy(luser, mptr, sizeof_luser); + safestrncpy(suser, mptr, sizeof_suser); + } + else if (i == 'Y') { + if ((flags & QP_EADDR) != 0) { + mptr = qp_encode_email_addrs(mptr); + } + sanitize_truncated_recipient(mptr); + cprintf("CC: %s%s", mptr, nl); + } + else if (i == 'P') { + cprintf("Return-Path: %s%s", mptr, nl); + } + else if (i == 'L') { + cprintf("List-ID: %s%s", mptr, nl); + } + else if (i == 'V') { + if ((flags & QP_EADDR) != 0) + mptr = qp_encode_email_addrs(mptr); + cprintf("Envelope-To: %s%s", mptr, nl); + } + else if (i == 'U') { + cprintf("Subject: %s%s", mptr, nl); + subject_found = 1; + } + else if (i == 'I') + safestrncpy(mid, mptr, sizeof_mid); /// TODO: detect @ here and copy @nodename in if not found. + else if (i == 'F') + safestrncpy(fuser, mptr, sizeof_fuser); + /* else if (i == 'O') + cprintf("X-Citadel-Room: %s%s", + mptr, nl); */ + else if (i == 'N') + safestrncpy(snode, mptr, sizeof_snode); + else if (i == 'R') + { + if (haschar(mptr, '@') == 0) + { + sanitize_truncated_recipient(mptr); + cprintf("To: %s@%s", mptr, config.c_fqdn); + cprintf("%s", nl); + } + else + { + if ((flags & QP_EADDR) != 0) { + mptr = qp_encode_email_addrs(mptr); + } + sanitize_truncated_recipient(mptr); + cprintf("To: %s", mptr); + cprintf("%s", nl); + } + } + else if (i == 'T') { + datestring(datestamp, sizeof datestamp, + atol(mptr), DATESTRING_RFC822); + cprintf("Date: %s%s", datestamp, nl); + } + else if (i == 'W') { + cprintf("References: "); + k = num_tokens(mptr, '|'); + for (j=0; j", buf); + if (j == (k-1)) { + cprintf("%s", nl); + } + else { + cprintf(" "); + } + } + } + else if (i == 'K') { + cprintf("Reply-To: <%s>%s", mptr, nl); + } + if (mptr != mpptr) + free (mptr); + } + } + if (subject_found == 0) { + cprintf("Subject: (no subject)%s", nl); + } +} + + +void Dump_RFC822HeadersBody( + struct CtdlMessage *TheMessage, + int headers_only, /* eschew the message body? */ + int flags, /* should the bessage be exported clean? */ + + const char *nl) +{ + cit_uint8_t prev_ch; + int eoh = 0; + const char *StartOfText = StrBufNOTNULL; + char outbuf[1024]; + int outlen = 0; + int nllen = strlen(nl); + char *mptr; + + mptr = TheMessage->cm_fields['M']; + + + prev_ch = '\0'; + while (*mptr != '\0') { + if (*mptr == '\r') { + /* do nothing */ + } + else { + if ((!eoh) && + (*mptr == '\n')) + { + eoh = (*(mptr+1) == '\r') && (*(mptr+2) == '\n'); + if (!eoh) + eoh = *(mptr+1) == '\n'; + if (eoh) + { + StartOfText = mptr; + StartOfText = strchr(StartOfText, '\n'); + StartOfText = strchr(StartOfText, '\n'); + } + } + if (((headers_only == HEADERS_NONE) && (mptr >= StartOfText)) || + ((headers_only == HEADERS_ONLY) && (mptr < StartOfText)) || + ((headers_only != HEADERS_NONE) && + (headers_only != HEADERS_ONLY)) + ) { + if (*mptr == '\n') { + memcpy(&outbuf[outlen], nl, nllen); + outlen += nllen; + outbuf[outlen] = '\0'; + } + else { + outbuf[outlen++] = *mptr; + } + } + } + if (flags & ESC_DOT) + { + if ((prev_ch == '\n') && + (*mptr == '.') && + ((*(mptr+1) == '\r') || (*(mptr+1) == '\n'))) + { + outbuf[outlen++] = '.'; + } + prev_ch = *mptr; + } + ++mptr; + if (outlen > 1000) { + client_write(outbuf, outlen); + outlen = 0; + } + } + if (outlen > 0) { + client_write(outbuf, outlen); + outlen = 0; + } +} + + + +/* If the format type on disk is 1 (fixed-format), then we want + * everything to be output completely literally ... regardless of + * what message transfer format is in use. + */ +void DumpFormatFixed( + struct CtdlMessage *TheMessage, + int mode, /* how would you like that message? */ + const char *nl) +{ + cit_uint8_t ch; + char buf[SIZ]; + int buflen; + int xlline = 0; + int nllen = strlen (nl); + char *mptr; + + mptr = TheMessage->cm_fields['M']; + + if (mode == MT_MIME) { + cprintf("Content-type: text/plain\n\n"); + } + *buf = '\0'; + buflen = 0; + while (ch = *mptr++, ch > 0) { + if (ch == '\n') + ch = '\r'; + + if ((buflen > 250) && (!xlline)){ + int tbuflen; + tbuflen = buflen; + + while ((buflen > 0) && + (!isspace(buf[buflen]))) + buflen --; + if (buflen == 0) { + xlline = 1; + } + else { + mptr -= tbuflen - buflen; + buf[buflen] = '\0'; + ch = '\r'; + } + } + /* if we reach the outer bounds of our buffer, + abort without respect what whe purge. */ + if (xlline && + ((isspace(ch)) || + (buflen > SIZ - nllen - 2))) + ch = '\r'; + + if (ch == '\r') { + memcpy (&buf[buflen], nl, nllen); + buflen += nllen; + buf[buflen] = '\0'; + + client_write(buf, buflen); + *buf = '\0'; + buflen = 0; + xlline = 0; + } else { + buf[buflen] = ch; + buflen++; + } + } + buf[buflen] = '\0'; + if (!IsEmptyStr(buf)) + cprintf("%s%s", buf, nl); +} /* * Get a message off disk. (returns om_* values found in msgbase.h) @@ -1758,15 +2155,9 @@ int CtdlOutputPreLoadedMsg( int crlf, /* Use CRLF newlines instead of LF? */ int flags /* should the bessage be exported clean? */ ) { - int i, j, k; - char buf[SIZ]; - cit_uint8_t ch, prev_ch; - char allkeys[30]; - char display_name[256]; - char *mptr, *mpptr; + int i; + char *mptr = NULL; const char *nl; /* newline string */ - int suppress_f = 0; - int subject_found = 0; struct ma_info ma; /* Buffers needed for RFC822 translation. These are all filled @@ -1778,7 +2169,6 @@ int CtdlOutputPreLoadedMsg( char fuser[100]; char snode[100]; char mid[100]; - char datestamp[100]; CtdlLogPrintf(CTDL_DEBUG, "CtdlOutputPreLoadedMsg(TheMessage=%s, %d, %d, %d, %d\n", ((TheMessage == NULL) ? "NULL" : "not null"), @@ -1873,164 +2263,27 @@ int CtdlOutputPreLoadedMsg( cprintf("nhdr=yes\n"); } - /* begin header processing loop for Citadel message format */ - - if ((mode == MT_CITADEL) || (mode == MT_MIME)) { - - safestrncpy(display_name, "", sizeof display_name); - if (TheMessage->cm_fields['A']) { - strcpy(buf, TheMessage->cm_fields['A']); - if (TheMessage->cm_anon_type == MES_ANONONLY) { - safestrncpy(display_name, "****", sizeof display_name); - } - else if (TheMessage->cm_anon_type == MES_ANONOPT) { - safestrncpy(display_name, "anonymous", sizeof display_name); - } - else { - safestrncpy(display_name, buf, sizeof display_name); - } - if ((is_room_aide()) - && ((TheMessage->cm_anon_type == MES_ANONONLY) - || (TheMessage->cm_anon_type == MES_ANONOPT))) { - size_t tmp = strlen(display_name); - snprintf(&display_name[tmp], - sizeof display_name - tmp, - " [%s]", buf); - } - } - - /* Don't show Internet address for users on the - * local Citadel network. - */ - suppress_f = 0; - if (TheMessage->cm_fields['N'] != NULL) - if (!IsEmptyStr(TheMessage->cm_fields['N'])) - if (haschar(TheMessage->cm_fields['N'], '.') == 0) { - suppress_f = 1; - } - - /* Now spew the header fields in the order we like them. */ - safestrncpy(allkeys, FORDER, sizeof allkeys); - for (i=0; icm_fields[k] != NULL) - && (msgkeys[k] != NULL) ) { - if ((k == 'V') || (k == 'R') || (k == 'Y')) { - sanitize_truncated_recipient(TheMessage->cm_fields[k]); - } - if (k == 'A') { - if (do_proto) cprintf("%s=%s\n", - msgkeys[k], - display_name); - } - else if ((k == 'F') && (suppress_f)) { - /* do nothing */ - } - /* Masquerade display name if needed */ - else { - if (do_proto) cprintf("%s=%s\n", - msgkeys[k], - TheMessage->cm_fields[k] - ); - } - } - } - } + if ((mode == MT_CITADEL) || (mode == MT_MIME)) + OutputCtdlMsgHeaders(TheMessage, do_proto); - } /* begin header processing loop for RFC822 transfer format */ - strcpy(suser, ""); strcpy(luser, ""); strcpy(fuser, ""); strcpy(snode, NODENAME); - if (mode == MT_RFC822) { - for (i = 0; i < 256; ++i) { - if (TheMessage->cm_fields[i]) { - mptr = mpptr = TheMessage->cm_fields[i]; - - if (i == 'A') { - safestrncpy(luser, mptr, sizeof luser); - safestrncpy(suser, mptr, sizeof suser); - } - else if (i == 'Y') { - if ((flags & QP_EADDR) != 0) { - mptr = qp_encode_email_addrs(mptr); - } - sanitize_truncated_recipient(mptr); - cprintf("CC: %s%s", mptr, nl); - } - else if (i == 'P') { - cprintf("Return-Path: %s%s", mptr, nl); - } - else if (i == 'L') { - cprintf("List-ID: %s%s", mptr, nl); - } - else if (i == 'V') { - if ((flags & QP_EADDR) != 0) - mptr = qp_encode_email_addrs(mptr); - cprintf("Envelope-To: %s%s", mptr, nl); - } - else if (i == 'U') { - cprintf("Subject: %s%s", mptr, nl); - subject_found = 1; - } - else if (i == 'I') - safestrncpy(mid, mptr, sizeof mid); - else if (i == 'F') - safestrncpy(fuser, mptr, sizeof fuser); - /* else if (i == 'O') - cprintf("X-Citadel-Room: %s%s", - mptr, nl); */ - else if (i == 'N') - safestrncpy(snode, mptr, sizeof snode); - else if (i == 'R') - { - if (haschar(mptr, '@') == 0) - { - sanitize_truncated_recipient(mptr); - cprintf("To: %s@%s", mptr, config.c_fqdn); - cprintf("%s", nl); - } - else - { - if ((flags & QP_EADDR) != 0) { - mptr = qp_encode_email_addrs(mptr); - } - sanitize_truncated_recipient(mptr); - cprintf("To: %s", mptr); - cprintf("%s", nl); - } - } - else if (i == 'T') { - datestring(datestamp, sizeof datestamp, - atol(mptr), DATESTRING_RFC822); - cprintf("Date: %s%s", datestamp, nl); - } - else if (i == 'W') { - cprintf("References: "); - k = num_tokens(mptr, '|'); - for (j=0; j", buf); - if (j == (k-1)) { - cprintf("%s", nl); - } - else { - cprintf(" "); - } - } - } - if (mptr != mpptr) - free (mptr); - } - } - if (subject_found == 0) { - cprintf("Subject: (no subject)%s", nl); - } - } + if (mode == MT_RFC822) + OutputRFC822MsgHeaders( + TheMessage, + flags, + nl, + mid, sizeof(mid), + suser, sizeof(suser), + luser, sizeof(luser), + fuser, sizeof(fuser), + snode, sizeof(snode) + ); + for (i=0; !IsEmptyStr(&suser[i]); ++i) { suser[i] = tolower(suser[i]); @@ -2071,69 +2324,24 @@ int CtdlOutputPreLoadedMsg( /* end header processing loop ... at this point, we're in the text */ START_TEXT: if (headers_only == HEADERS_FAST) goto DONE; - mptr = TheMessage->cm_fields['M']; /* Tell the client about the MIME parts in this message */ if (TheMessage->cm_format_type == FMT_RFC822) { if ( (mode == MT_CITADEL) || (mode == MT_MIME) ) { + mptr = TheMessage->cm_fields['M']; memset(&ma, 0, sizeof(struct ma_info)); mime_parser(mptr, NULL, (do_proto ? *list_this_part : NULL), (do_proto ? *list_this_pref : NULL), (do_proto ? *list_this_suff : NULL), - (void *)&ma, 0); + (void *)&ma, 1); } else if (mode == MT_RFC822) { /* unparsed RFC822 dump */ - char *start_of_text = NULL; - start_of_text = strstr(mptr, "\n\r\n"); - if (start_of_text == NULL) start_of_text = strstr(mptr, "\n\n"); - if (start_of_text == NULL) start_of_text = mptr; - ++start_of_text; - start_of_text = strstr(start_of_text, "\n"); - ++start_of_text; - - char outbuf[1024]; - int outlen = 0; - int nllen = strlen(nl); - prev_ch = 0; - while (ch=*mptr, ch!=0) { - if (ch==13) { - /* do nothing */ - } - else { - if ( - ((headers_only == HEADERS_NONE) && (mptr >= start_of_text)) - || ((headers_only == HEADERS_ONLY) && (mptr < start_of_text)) - || ((headers_only != HEADERS_NONE) && (headers_only != HEADERS_ONLY)) - ) { - if (ch == 10) { - sprintf(&outbuf[outlen], "%s", nl); - outlen += nllen; - } - else { - outbuf[outlen++] = ch; - } - } - } - if (flags & ESC_DOT) - { - if ((prev_ch == 10) && (ch == '.') && ((*(mptr+1) == 13) || (*(mptr+1) == 10))) - { - outbuf[outlen++] = '.'; - } - } - prev_ch = ch; - ++mptr; - if (outlen > 1000) { - client_write(outbuf, outlen); - outlen = 0; - } - } - if (outlen > 0) { - client_write(outbuf, outlen); - outlen = 0; - } - + Dump_RFC822HeadersBody( + TheMessage, + headers_only, + flags, + nl); goto DONE; } } @@ -2147,34 +2355,11 @@ START_TEXT: if (do_proto) cprintf("text\n"); } - /* If the format type on disk is 1 (fixed-format), then we want - * everything to be output completely literally ... regardless of - * what message transfer format is in use. - */ - if (TheMessage->cm_format_type == FMT_FIXED) { - int buflen; - if (mode == MT_MIME) { - cprintf("Content-type: text/plain\n\n"); - } - *buf = '\0'; - buflen = 0; - while (ch = *mptr++, ch > 0) { - if (ch == 13) - ch = 10; - if ((ch == 10) || (buflen > 250)) { - buf[buflen] = '\0'; - cprintf("%s%s", buf, nl); - *buf = '\0'; - buflen = 0; - } else { - buf[buflen] = ch; - buflen++; - } - } - buf[buflen] = '\0'; - if (!IsEmptyStr(buf)) - cprintf("%s%s", buf, nl); - } + if (TheMessage->cm_format_type == FMT_FIXED) + DumpFormatFixed( + TheMessage, + mode, /* how would you like that message? */ + nl); /* If the message on disk is format 0 (Citadel vari-format), we * output using the formatter at 80 columns. This is the final output @@ -2184,6 +2369,8 @@ START_TEXT: * message to the reader's screen width. */ if (TheMessage->cm_format_type == FMT_CITADEL) { + mptr = TheMessage->cm_fields['M']; + if (mode == MT_MIME) { cprintf("Content-type: text/x-citadel-variformat\n\n"); } @@ -2202,11 +2389,12 @@ START_TEXT: ma.use_fo_hooks = 0; strcpy(ma.chosen_part, "1"); ma.chosen_pref = 9999; + ma.dont_decode = CC->msg4_dont_decode; mime_parser(mptr, NULL, *choose_preferred, *fixed_output_pre, - *fixed_output_post, (void *)&ma, 0); + *fixed_output_post, (void *)&ma, 1); mime_parser(mptr, NULL, - *output_preferred, NULL, NULL, (void *)&ma, CC->msg4_dont_decode); + *output_preferred, NULL, NULL, (void *)&ma, 1); } else { ma.use_fo_hooks = 1; @@ -2223,7 +2411,6 @@ DONE: /* now we're done */ } - /* * display a message (mode 0 - Citadel proprietary) */ @@ -2370,8 +2557,8 @@ void cmd_dlat(char *cmdbuf) * this mode of operation only works if we're saving a single message.) */ int CtdlSaveMsgPointersInRoom(char *roomname, long newmsgidlist[], int num_newmsgs, - int do_repl_check, struct CtdlMessage *supplied_msg) -{ + int do_repl_check, struct CtdlMessage *supplied_msg, int suppress_refcount_adj +) { int i, j, unique; char hold_rm[ROOMNAMELEN]; struct cdbdata *cdbfr; @@ -2386,8 +2573,9 @@ int CtdlSaveMsgPointersInRoom(char *roomname, long newmsgidlist[], int num_newms int num_msgs_to_be_merged = 0; CtdlLogPrintf(CTDL_DEBUG, - "CtdlSaveMsgPointersInRoom(room=%s, num_msgs=%d, repl=%d)\n", - roomname, num_newmsgs, do_repl_check); + "CtdlSaveMsgPointersInRoom(room=%s, num_msgs=%d, repl=%d, suppress_rca=%d)\n", + roomname, num_newmsgs, do_repl_check, suppress_refcount_adj + ); strcpy(hold_rm, CC->room.QRname); @@ -2437,7 +2625,7 @@ int CtdlSaveMsgPointersInRoom(char *roomname, long newmsgidlist[], int num_newms } } - CtdlLogPrintf(9, "%d unique messages to be merged\n", num_msgs_to_be_merged); + CtdlLogPrintf(CTDL_DEBUG, "%d unique messages to be merged\n", num_msgs_to_be_merged); /* * Now merge the new messages @@ -2508,8 +2696,10 @@ int CtdlSaveMsgPointersInRoom(char *roomname, long newmsgidlist[], int num_newms CtdlGetRoom(&CC->room, hold_rm); /* Bump the reference count for all messages which were merged */ - for (i=0; iuser.axlevel == 2) { + if (CCC->user.axlevel == AxProbU) { strcpy(hold_rm, actual_rm); strcpy(actual_rm, config.c_twitroom); CtdlLogPrintf(CTDL_DEBUG, "Diverting to twit room\n"); @@ -2912,15 +3102,11 @@ long CtdlSubmitMsg(struct CtdlMessage *msg, /* message to save */ CtdlLogPrintf(CTDL_ALERT, "CCC->redirect_buffer is not NULL during message submission!\n"); abort(); } - CCC->redirect_buffer = malloc(SIZ); - CCC->redirect_len = 0; - CCC->redirect_alloc = SIZ; + CCC->redirect_buffer = NewStrBufPlain(NULL, SIZ); CtdlOutputPreLoadedMsg(msg, MT_RFC822, HEADERS_ALL, 0, 1, QP_EADDR); - smi.meta_rfc822_length = CCC->redirect_len; + smi.meta_rfc822_length = StrLength(CCC->redirect_buffer); saved_rfc822_version = CCC->redirect_buffer; CCC->redirect_buffer = NULL; - CCC->redirect_len = 0; - CCC->redirect_alloc = 0; PutMetaData(&smi); @@ -3157,7 +3343,7 @@ long CtdlSubmitMsg(struct CtdlMessage *msg, /* message to save */ JournalBackgroundSubmit(msg, saved_rfc822_version, recps); } else { - free(saved_rfc822_version); + FreeStrBuf(&saved_rfc822_version); } } @@ -3223,105 +3409,219 @@ void quickie_message(const char *from, const char *fromaddr, char *to, char *roo /* * Back end function used by CtdlMakeMessage() and similar functions */ -char *CtdlReadMessageBody(char *terminator, /* token signalling EOT */ - size_t maxlen, /* maximum message length */ - char *exist, /* if non-null, append to it; - exist is ALWAYS freed */ - int crlf, /* CRLF newlines instead of LF */ - int sock /* socket handle or 0 for this session's client socket */ - ) { - char buf[1024]; - int linelen; - size_t message_len = 0; - size_t buffer_len = 0; - char *ptr; - char *m; +StrBuf *CtdlReadMessageBodyBuf(char *terminator, /* token signalling EOT */ + long tlen, + size_t maxlen, /* maximum message length */ + char *exist, /* if non-null, append to it; + exist is ALWAYS freed */ + int crlf, /* CRLF newlines instead of LF */ + int *sock /* socket handle or 0 for this session's client socket */ + ) +{ + StrBuf *Message; + StrBuf *LineBuf; int flushing = 0; int finished = 0; int dotdot = 0; + LineBuf = NewStrBufPlain(NULL, SIZ); if (exist == NULL) { - m = malloc(4096); - m[0] = 0; - buffer_len = 4096; - message_len = 0; + Message = NewStrBufPlain(NULL, 4 * SIZ); } else { - message_len = strlen(exist); - buffer_len = message_len + 4096; - m = realloc(exist, buffer_len); - if (m == NULL) { - free(exist); - return m; - } + Message = NewStrBufPlain(exist, -1); + free(exist); } /* Do we need to change leading ".." to "." for SMTP escaping? */ - if (!strcmp(terminator, ".")) { + if ((tlen == 1) && (*terminator == '.')) { dotdot = 1; } - /* flush the input if we have nowhere to store it */ - if (m == NULL) { - flushing = 1; - } - /* read in the lines of message text one by one */ do { - if (sock > 0) { - if (sock_getln(sock, buf, (sizeof buf - 3)) < 0) finished = 1; + if (sock != NULL) { + if ((CtdlSockGetLine(sock, LineBuf, 5) < 0) || + (*sock == -1)) + finished = 1; } else { - if (client_getln(buf, (sizeof buf - 3)) < 1) finished = 1; + if (CtdlClientGetLine(LineBuf) < 0) finished = 1; + } + if ((StrLength(LineBuf) == tlen) && + (!strcmp(ChrPtr(LineBuf), terminator))) + finished = 1; + + if ( (!flushing) && (!finished) ) { + if (crlf) { + StrBufAppendBufPlain(LineBuf, HKEY("\r\n"), 0); + } + else { + StrBufAppendBufPlain(LineBuf, HKEY("\n"), 0); + } + + /* Unescape SMTP-style input of two dots at the beginning of the line */ + if ((dotdot) && + (StrLength(LineBuf) == 2) && + (!strcmp(ChrPtr(LineBuf), ".."))) + { + StrBufCutLeft(LineBuf, 1); + } + + StrBufAppendBuf(Message, LineBuf, 0); } - if (!strcmp(buf, terminator)) finished = 1; - if (crlf) { - strcat(buf, "\r\n"); + + /* if we've hit the max msg length, flush the rest */ + if (StrLength(Message) >= maxlen) flushing = 1; + + } while (!finished); + FreeStrBuf(&LineBuf); + return Message; +} + +void DeleteAsyncMsg(ReadAsyncMsg **Msg) +{ + if (*Msg == NULL) + return; + FreeStrBuf(&(*Msg)->MsgBuf); + + free(*Msg); + *Msg = NULL; +} + +ReadAsyncMsg *NewAsyncMsg(const char *terminator, /* token signalling EOT */ + long tlen, + size_t maxlen, /* maximum message length */ + size_t expectlen, /* if we expect a message, how long should it be? */ + char *exist, /* if non-null, append to it; + exist is ALWAYS freed */ + long eLen, /* length of exist */ + int crlf /* CRLF newlines instead of LF */ + ) +{ + ReadAsyncMsg *NewMsg; + + NewMsg = (ReadAsyncMsg *)malloc(sizeof(ReadAsyncMsg)); + memset(NewMsg, 0, sizeof(ReadAsyncMsg)); + + if (exist == NULL) { + long len; + + if (expectlen == 0) { + len = 4 * SIZ; } else { - strcat(buf, "\n"); + len = expectlen + 10; } + NewMsg->MsgBuf = NewStrBufPlain(NULL, len); + } + else { + NewMsg->MsgBuf = NewStrBufPlain(exist, eLen); + free(exist); + } + /* Do we need to change leading ".." to "." for SMTP escaping? */ + if ((tlen == 1) && (*terminator == '.')) { + NewMsg->dodot = 1; + } - /* Unescape SMTP-style input of two dots at the beginning of the line */ - if (dotdot) { - if (!strncmp(buf, "..", 2)) { - strcpy(buf, &buf[1]); - } + NewMsg->terminator = terminator; + NewMsg->tlen = tlen; + + NewMsg->maxlen = maxlen; + + NewMsg->crlf = crlf; + + return NewMsg; +} + +/* + * Back end function used by CtdlMakeMessage() and similar functions + */ +eReadState CtdlReadMessageBodyAsync(AsyncIO *IO) +{ + ReadAsyncMsg *ReadMsg; + int MsgFinished = 0; + eReadState Finished = eMustReadMore; + + ReadMsg = IO->ReadMsg; + + /* read in the lines of message text one by one */ + do { + Finished = StrBufChunkSipLine(IO->IOBuf, &IO->RecvBuf); + + switch (Finished) { + case eMustReadMore: /// read new from socket... + return Finished; + break; + case eBufferNotEmpty: /* shouldn't happen... */ + case eReadSuccess: /// done for now... + break; + case eReadFail: /// WHUT? + ///todo: shut down! + break; } + - if ( (!flushing) && (!finished) ) { - /* Measure the line */ - linelen = strlen(buf); - - /* augment the buffer if we have to */ - if ((message_len + linelen) >= buffer_len) { - ptr = realloc(m, (buffer_len * 2) ); - if (ptr == NULL) { /* flush if can't allocate */ - flushing = 1; - } else { - buffer_len = (buffer_len * 2); - m = ptr; - CtdlLogPrintf(CTDL_DEBUG, "buffer_len is now %ld\n", (long)buffer_len); - } + if ((StrLength(IO->IOBuf) == ReadMsg->tlen) && + (!strcmp(ChrPtr(IO->IOBuf), ReadMsg->terminator))) { + MsgFinished = 1; + } + else if (!ReadMsg->flushing) { + /* Unescape SMTP-style input of two dots at the beginning of the line */ + if ((ReadMsg->dodot) && + (StrLength(IO->IOBuf) == 2) && /* TODO: do we just unescape lines with two dots or any line? */ + (!strcmp(ChrPtr(IO->IOBuf), ".."))) + { + StrBufCutLeft(IO->IOBuf, 1); } - - /* Add the new line to the buffer. NOTE: this loop must avoid - * using functions like strcat() and strlen() because they - * traverse the entire buffer upon every call, and doing that - * for a multi-megabyte message slows it down beyond usability. - */ - strcpy(&m[message_len], buf); - message_len += linelen; + + if (ReadMsg->crlf) { + StrBufAppendBufPlain(IO->IOBuf, HKEY("\r\n"), 0); + } + else { + StrBufAppendBufPlain(IO->IOBuf, HKEY("\n"), 0); + } + + StrBufAppendBuf(ReadMsg->MsgBuf, IO->IOBuf, 0); } /* if we've hit the max msg length, flush the rest */ - if (message_len >= maxlen) flushing = 1; + if (StrLength(ReadMsg->MsgBuf) >= ReadMsg->maxlen) ReadMsg->flushing = 1; - } while (!finished); - return(m); + } while (!MsgFinished); + + if (MsgFinished) + return eReadSuccess; + else + return eAbort; } +/* + * Back end function used by CtdlMakeMessage() and similar functions + */ +char *CtdlReadMessageBody(char *terminator, /* token signalling EOT */ + long tlen, + size_t maxlen, /* maximum message length */ + char *exist, /* if non-null, append to it; + exist is ALWAYS freed */ + int crlf, /* CRLF newlines instead of LF */ + int *sock /* socket handle or 0 for this session's client socket */ + ) +{ + StrBuf *Message; + + Message = CtdlReadMessageBodyBuf(terminator, + tlen, + maxlen, + exist, + crlf, + sock); + if (Message == NULL) + return NULL; + else + return SmashStrBuf(&Message); +} /* @@ -3349,6 +3649,8 @@ struct CtdlMessage *CtdlMakeMessage( char dest_node[256]; char buf[1024]; struct CtdlMessage *msg; + StrBuf *FakeAuthor; + StrBuf *FakeEncAuthor = NULL; msg = malloc(sizeof(struct CtdlMessage)); memset(msg, 0, sizeof(struct CtdlMessage)); @@ -3378,11 +3680,14 @@ struct CtdlMessage *CtdlMakeMessage( msg->cm_fields['T'] = strdup(buf); if ((fake_name != NULL) && (fake_name[0])) { /* author */ - msg->cm_fields['A'] = strdup(fake_name); + FakeAuthor = NewStrBufPlain (fake_name, -1); } else { - msg->cm_fields['A'] = strdup(author->fullname); + FakeAuthor = NewStrBufPlain (author->fullname, -1); } + StrBufRFC2047encode(&FakeEncAuthor, FakeAuthor); + msg->cm_fields['A'] = SmashStrBuf(&FakeEncAuthor); + FreeStrBuf(&FakeAuthor); if (CC->room.QRflags & QR_MAILBOX) { /* room */ msg->cm_fields['O'] = strdup(&CC->room.QRname[11]); @@ -3447,7 +3752,7 @@ struct CtdlMessage *CtdlMakeMessage( msg->cm_fields['M'] = preformatted_text; } else { - msg->cm_fields['M'] = CtdlReadMessageBody("000", config.c_maxmsglen, NULL, 0, 0); + msg->cm_fields['M'] = CtdlReadMessageBody(HKEY("000"), config.c_maxmsglen, NULL, 0, 0); } return(msg); @@ -3459,10 +3764,13 @@ struct CtdlMessage *CtdlMakeMessage( * room. Returns a *CITADEL ERROR CODE* and puts a message in errmsgbuf, or * returns 0 on success. */ -int CtdlDoIHavePermissionToPostInThisRoom(char *errmsgbuf, - size_t n, - const char* RemoteIdentifier, - int PostPublic) { +int CtdlDoIHavePermissionToPostInThisRoom( + char *errmsgbuf, + size_t n, + const char* RemoteIdentifier, + int PostPublic, + int is_reply +) { int ra; if (!(CC->logged_in) && @@ -3519,7 +3827,7 @@ int CtdlDoIHavePermissionToPostInThisRoom(char *errmsgbuf, } - if ((CC->user.axlevel < 2) + if ((CC->user.axlevel < AxProbU) && ((CC->room.QRflags & QR_MAILBOX) == 0)) { snprintf(errmsgbuf, n, "Need to be validated to enter " "(except in %s> to sysop)", MAILROOM); @@ -3527,7 +3835,18 @@ int CtdlDoIHavePermissionToPostInThisRoom(char *errmsgbuf, } CtdlRoomAccess(&CC->room, &CC->user, &ra, NULL); - if (!(ra & UA_POSTALLOWED)) { + + if ( (!(ra & UA_POSTALLOWED)) && (ra & UA_REPLYALLOWED) && (!is_reply) ) { + /* + * To be thorough, we ought to check to see if the message they are + * replying to is actually a valid one in this room, but unless this + * actually becomes a problem we'll go with high performance instead. + */ + snprintf(errmsgbuf, n, "You may only reply to existing messages here."); + return (ERROR + HIGHER_ACCESS_REQUIRED); + } + + else if (!(ra & UA_POSTALLOWED)) { snprintf(errmsgbuf, n, "Higher access is required to post in this room."); return (ERROR + HIGHER_ACCESS_REQUIRED); } @@ -3544,7 +3863,7 @@ int CtdlDoIHavePermissionToPostInThisRoom(char *errmsgbuf, int CtdlCheckInternetMailPermission(struct ctdluser *who) { /* Do not allow twits to send Internet mail */ - if (who->axlevel <= 2) return(0); + if (who->axlevel <= AxProbU) return(0); /* Globally enabled? */ if (config.c_restrict == 0) return(1); @@ -3553,7 +3872,7 @@ int CtdlCheckInternetMailPermission(struct ctdluser *who) { if (who->flags & US_INTERNET) return(2); /* Aide level access? */ - if (who->axlevel >= 6) return(3); + if (who->axlevel >= AxAideU) return(3); /* No mail for you! */ return(0); @@ -3569,7 +3888,7 @@ int CtdlCheckInternetMailPermission(struct ctdluser *who) { * * Caller needs to free the result using free_recipients() */ -struct recptypes *validate_recipients(char *supplied_recipients, +struct recptypes *validate_recipients(const char *supplied_recipients, const char *RemoteIdentifier, int Flags) { struct recptypes *ret; @@ -3687,10 +4006,12 @@ struct recptypes *validate_recipients(char *supplied_recipients, CC->room = tempQR; /* Check permissions to send mail to this room */ - err = CtdlDoIHavePermissionToPostInThisRoom(errmsg, - sizeof errmsg, - RemoteIdentifier, - Flags + err = CtdlDoIHavePermissionToPostInThisRoom( + errmsg, + sizeof errmsg, + RemoteIdentifier, + Flags, + 0 /* 0 = not a reply */ ); if (err) { @@ -3893,7 +4214,13 @@ void cmd_ent0(char *entargs) /* first check to make sure the request is valid. */ - err = CtdlDoIHavePermissionToPostInThisRoom(errmsg, sizeof errmsg, NULL, POST_LOGGED_IN); + err = CtdlDoIHavePermissionToPostInThisRoom( + errmsg, + sizeof errmsg, + NULL, + POST_LOGGED_IN, + (!IsEmptyStr(references)) /* is this a reply? or a top-level post? */ + ); if (err) { cprintf("%d %s\n", err, errmsg); @@ -3905,7 +4232,7 @@ void cmd_ent0(char *entargs) if (IsEmptyStr(newusername)) { strcpy(newusername, CC->user.fullname); } - if ( (CC->user.axlevel < 6) + if ( (CC->user.axlevel < AxAideU) && (strcasecmp(newusername, CC->user.fullname)) && (strcasecmp(newusername, CC->cs_inet_fn)) ) { @@ -3949,13 +4276,14 @@ void cmd_ent0(char *entargs) /* In mailbox rooms we have to behave a little differently -- * make sure the user has specified at least one recipient. Then * validate the recipient(s). We do this for the Mail> room, as - * well as any room which has the "Mailbox" view set. + * well as any room which has the "Mailbox" view set - unless it + * is the DRAFTS room which does not require recipients */ - if ( ( (CC->room.QRflags & QR_MAILBOX) && (!strcasecmp(&CC->room.QRname[11], MAILROOM)) ) - || ( (CC->room.QRflags & QR_MAILBOX) && (CC->curr_view == VIEW_MAILBOX) ) - ) { - if (CC->user.axlevel < 2) { + if ( ( ( (CC->room.QRflags & QR_MAILBOX) && (!strcasecmp(&CC->room.QRname[11], MAILROOM)) ) + || ( (CC->room.QRflags & QR_MAILBOX) && (CC->curr_view == VIEW_MAILBOX) ) + ) && (strcasecmp(&CC->room.QRname[11], USERDRAFTROOM)) !=0 ) { + if (CC->user.axlevel < AxProbU) { strcpy(recp, "sysop"); strcpy(cc, ""); strcpy(bcc, ""); @@ -4007,7 +4335,7 @@ void cmd_ent0(char *entargs) } if ( ( (valid_to->num_internet + valid_to->num_ignet + valid_cc->num_internet + valid_cc->num_ignet + valid_bcc->num_internet + valid_bcc->num_ignet) > 0) - && (CC->user.axlevel < 4) ) { + && (CC->user.axlevel < AxNetU) ) { cprintf("%d Higher access required for network mail.\n", ERROR + HIGHER_ACCESS_REQUIRED); free_recipients(valid_to); @@ -4225,7 +4553,10 @@ int CtdlDeleteMessages(char *room_name, /* which room */ cdb_store(CDB_MSGLISTS, &qrbuf.QRnumber, (int)sizeof(long), msglist, (int)(num_msgs * sizeof(long))); - qrbuf.QRhighest = msglist[num_msgs - 1]; + if (num_msgs > 0) + qrbuf.QRhighest = msglist[num_msgs - 1]; + else + qrbuf.QRhighest = 0; } CtdlPutRoomLock(&qrbuf); @@ -4363,7 +4694,7 @@ void cmd_move(char *args) permit = 0; /* Aides can move/copy */ - if (CC->user.axlevel >= 6) permit = 1; + if (CC->user.axlevel >= AxAideU) permit = 1; /* Room aides can move/copy */ if (CC->user.usernum == CC->room.QRroomaide) permit = 1; @@ -4405,7 +4736,7 @@ void cmd_move(char *args) /* * Do the copy */ - err = CtdlSaveMsgPointersInRoom(targ, msgs, num_msgs, 1, NULL); + err = CtdlSaveMsgPointersInRoom(targ, msgs, num_msgs, 1, NULL, 0); if (err != 0) { cprintf("%d Cannot store message(s) in %s: error %d\n", err, targ, err); @@ -4479,6 +4810,10 @@ void AdjRefCount(long msgnum, int incr) struct arcq new_arcq; int rv = 0; + CtdlLogPrintf(CTDL_DEBUG, "AdjRefCount() msg %ld ref count delta %+d\n", + msgnum, incr + ); + begin_critical_section(S_SUPPMSGMAIN); if (arcfp == NULL) { arcfp = fopen(file_arcq, "ab+"); @@ -4592,8 +4927,9 @@ void TDAP_AdjRefCount(long msgnum, int incr) smi.meta_refcount += incr; PutMetaData(&smi); end_critical_section(S_SUPPMSGMAIN); - CtdlLogPrintf(CTDL_DEBUG, "msg %ld ref count delta %+d, is now %d\n", - msgnum, incr, smi.meta_refcount); + CtdlLogPrintf(CTDL_DEBUG, "TDAP_AdjRefCount() msg %ld ref count delta %+d, is now %d\n", + msgnum, incr, smi.meta_refcount + ); /* If the reference count is now zero, delete the message * (and its supplementary record as well). @@ -4848,5 +5184,5 @@ CTDL_MODULE_INIT(msgbase) } /* return our Subversion id for the Log */ - return "$Id$"; + return "msgbase"; }