![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to readmail.cpp CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Synchronet] / sbbs / sbbs3|
Return to readmail.cpp CVS log | Up to [Synchronet] / sbbs / sbbs3 |
1.1 ! root 1: /* readmail.cpp */ ! 2: ! 3: /* Synchronet private mail reading function */ ! 4: ! 5: /* $Id: readmail.cpp,v 1.5 2000/12/11 23:21:12 rswindell Exp $ */ ! 6: ! 7: /**************************************************************************** ! 8: * @format.tab-size 4 (Plain Text/Source Code File Header) * ! 9: * @format.use-tabs true (see http://www.synchro.net/ptsc_hdr.html) * ! 10: * * ! 11: * Copyright 2000 Rob Swindell - http://www.synchro.net/copyright.html * ! 12: * * ! 13: * This program is free software; you can redistribute it and/or * ! 14: * modify it under the terms of the GNU General Public License * ! 15: * as published by the Free Software Foundation; either version 2 * ! 16: * of the License, or (at your option) any later version. * ! 17: * See the GNU General Public License for more details: gpl.txt or * ! 18: * http://www.fsf.org/copyleft/gpl.html * ! 19: * * ! 20: * Anonymous FTP access to the most recent released source is available at * ! 21: * ftp://vert.synchro.net, ftp://cvs.synchro.net and ftp://ftp.synchro.net * ! 22: * * ! 23: * Anonymous CVS access to the development source and modification history * ! 24: * is available at cvs.synchro.net:/cvsroot/sbbs, example: * ! 25: * cvs -d :pserver:[email protected]:/cvsroot/sbbs login * ! 26: * (just hit return, no password is necessary) * ! 27: * cvs -d :pserver:[email protected]:/cvsroot/sbbs checkout src * ! 28: * * ! 29: * For Synchronet coding style and modification guidelines, see * ! 30: * http://www.synchro.net/source.html * ! 31: * * ! 32: * You are encouraged to submit any modifications (preferably in Unix diff * ! 33: * format) via e-mail to [email protected] * ! 34: * * ! 35: * Note: If this box doesn't appear square, then you need to fix your tabs. * ! 36: ****************************************************************************/ ! 37: ! 38: #include "sbbs.h" ! 39: ! 40: /****************************************************************************/ ! 41: /* Reads mail waiting for usernumber. */ ! 42: /****************************************************************************/ ! 43: void sbbs_t::readmail(uint usernumber, int which) ! 44: { ! 45: char str[256],str2[256],str3[256],done=0,domsg=1 ! 46: ,*p,*tp,*sp,ch; ! 47: char tmp[512]; ! 48: int i,j; ! 49: int mismatches=0,act; ! 50: ulong msgs,curmsg; ! 51: long length,l,lm_mode; ! 52: ulong last; ! 53: bool replied; ! 54: file_t fd; ! 55: mail_t *mail; ! 56: smbmsg_t msg; ! 57: ! 58: msg.total_hfields=0; /* init to NULL, cause not allocated yet */ ! 59: ! 60: fd.dir=cfg.total_dirs+1; /* temp dir for file attachments */ ! 61: ! 62: if((i=smb_stack(&smb,SMB_STACK_PUSH))!=0) { ! 63: errormsg(WHERE,ERR_OPEN,"MAIL",i); ! 64: return; } ! 65: sprintf(smb.file,"%smail",cfg.data_dir); ! 66: smb.retry_time=cfg.smb_retry_time; ! 67: if((i=smb_open(&smb))!=0) { ! 68: smb_stack(&smb,SMB_STACK_POP); ! 69: errormsg(WHERE,ERR_OPEN,smb.file,i,smb.last_error); ! 70: return; } ! 71: ! 72: if(cfg.sys_misc&SM_SYSVDELM && (SYSOP || cfg.sys_misc&SM_USRVDELM)) ! 73: lm_mode=LM_INCDEL; ! 74: else ! 75: lm_mode=0; ! 76: mail=loadmail(&smb,&msgs,usernumber,which,lm_mode); ! 77: if(!msgs) { ! 78: if(which==MAIL_SENT) ! 79: bputs(text[NoMailSent]); ! 80: else if(which==MAIL_ALL) ! 81: bputs(text[NoMailOnSystem]); ! 82: else ! 83: bputs(text[NoMailWaiting]); ! 84: smb_close(&smb); ! 85: smb_stack(&smb,SMB_STACK_POP); ! 86: return; } ! 87: ! 88: last=smb.status.last_msg; ! 89: ! 90: if(which==MAIL_SENT) ! 91: act=NODE_RSML; ! 92: else if(which==MAIL_ALL) ! 93: act=NODE_SYSP; ! 94: else ! 95: act=NODE_RMAL; ! 96: action=act; ! 97: if(msgs>1 && which!=MAIL_ALL) { ! 98: if(which==MAIL_SENT) ! 99: bputs(text[MailSentLstHdr]); ! 100: else ! 101: bputs(text[MailWaitingLstHdr]); ! 102: ! 103: for(curmsg=0;curmsg<msgs && !msgabort();curmsg++) { ! 104: if(msg.total_hfields) ! 105: smb_freemsgmem(&msg); ! 106: msg.total_hfields=0; ! 107: msg.idx.offset=mail[curmsg].offset; ! 108: if(!loadmsg(&msg,mail[curmsg].number)) ! 109: continue; ! 110: smb_unlockmsghdr(&smb,&msg); ! 111: bprintf(text[MailWaitingLstFmt],curmsg+1 ! 112: ,which==MAIL_SENT ? msg.to ! 113: : (msg.hdr.attr&MSG_ANONYMOUS) && !SYSOP ? text[Anonymous] ! 114: : msg.from ! 115: ,msg.hdr.attr&MSG_DELETE ? '-' : msg.hdr.attr&MSG_REPLIED ? 'R' ! 116: : msg.hdr.attr&MSG_READ ? ' ' ! 117: : msg.from_net.type || msg.to_net.type ? 'N':'*' ! 118: ,msg.subj); ! 119: smb_freemsgmem(&msg); ! 120: msg.total_hfields=0; } ! 121: ! 122: ASYNC; ! 123: if(!(sys_status&SS_ABORT)) { ! 124: bprintf(text[StartWithN],1L); ! 125: if((long)(curmsg=getnum(msgs))>0) ! 126: curmsg--; ! 127: else if(curmsg==-1) { ! 128: FREE(mail); ! 129: smb_close(&smb); ! 130: smb_stack(&smb,SMB_STACK_POP); ! 131: return; } } ! 132: sys_status&=~SS_ABORT; } ! 133: else { ! 134: curmsg=0; ! 135: if(which==MAIL_ALL) ! 136: domsg=0; } ! 137: if(which==MAIL_SENT) ! 138: logline("E","Read sent mail"); ! 139: else if(which==MAIL_ALL) ! 140: logline("S+","Read all mail"); ! 141: else ! 142: logline("E","Read mail"); ! 143: if(useron.misc&RIP) { ! 144: strcpy(str,which==MAIL_YOUR ? "MAILREAD" : which==MAIL_ALL ? ! 145: "ALLMAIL" : "SENTMAIL"); ! 146: menu(str); } ! 147: while(online && !done) { ! 148: action=act; ! 149: ! 150: if(msg.total_hfields) ! 151: smb_freemsgmem(&msg); ! 152: msg.total_hfields=0; ! 153: ! 154: msg.idx.offset=mail[curmsg].offset; ! 155: msg.idx.number=mail[curmsg].number; ! 156: msg.idx.to=mail[curmsg].to; ! 157: msg.idx.from=mail[curmsg].from; ! 158: msg.idx.subj=mail[curmsg].subj; ! 159: ! 160: if((i=smb_locksmbhdr(&smb))!=0) { ! 161: errormsg(WHERE,ERR_LOCK,smb.file,i); ! 162: break; } ! 163: ! 164: if((i=smb_getstatus(&smb))!=0) { ! 165: smb_unlocksmbhdr(&smb); ! 166: errormsg(WHERE,ERR_READ,smb.file,i); ! 167: break; } ! 168: smb_unlocksmbhdr(&smb); ! 169: ! 170: if(smb.status.last_msg!=last) { /* New messages */ ! 171: last=smb.status.last_msg; ! 172: FREE(mail); ! 173: mail=loadmail(&smb,&msgs,usernumber,which,lm_mode); /* So re-load */ ! 174: if(!msgs) ! 175: break; ! 176: for(curmsg=0;curmsg<msgs;curmsg++) ! 177: if(mail[curmsg].number==msg.idx.number) ! 178: break; ! 179: if(curmsg>=msgs) ! 180: curmsg=(msgs-1); ! 181: continue; } ! 182: ! 183: if(!loadmsg(&msg,mail[curmsg].number)) { /* Message header gone */ ! 184: if(mismatches>5) { /* We can't do this too many times in a row */ ! 185: errormsg(WHERE,ERR_CHK,"message number",mail[curmsg].number); ! 186: break; } ! 187: FREE(mail); ! 188: mail=loadmail(&smb,&msgs,usernumber,which,lm_mode); ! 189: if(!msgs) ! 190: break; ! 191: if(curmsg>(msgs-1)) ! 192: curmsg=(msgs-1); ! 193: mismatches++; ! 194: continue; } ! 195: smb_unlockmsghdr(&smb,&msg); ! 196: msg.idx.attr=msg.hdr.attr; ! 197: ! 198: mismatches=0; ! 199: ! 200: if(domsg && !(sys_status&SS_ABORT)) { ! 201: ! 202: show_msg(&msg ! 203: ,msg.from_ext && msg.idx.from==1 && !msg.from_net.type ! 204: ? 0:P_NOATCODES); ! 205: ! 206: if(msg.hdr.auxattr&MSG_FILEATTACH) { /* Attached file */ ! 207: smb_getmsgidx(&smb,&msg); ! 208: strcpy(str,msg.subj); /* filenames in title */ ! 209: strupr(str); ! 210: tp=str; ! 211: while(online) { ! 212: p=strchr(tp,SP); ! 213: if(p) *p=0; ! 214: sp=strrchr(tp,'/'); /* sp is slash pointer */ ! 215: if(!sp) sp=strrchr(tp,'\\'); ! 216: if(sp) tp=sp+1; ! 217: padfname(tp,fd.name); ! 218: sprintf(str2,"%sfile/%04u.in/%s" /* str2 is path/fname */ ! 219: ,cfg.data_dir,msg.idx.to,tp); ! 220: length=flength(str2); ! 221: if(length<1) ! 222: bputs(text[FileNotFound]); ! 223: else if(!(useron.exempt&FLAG('T')) && cur_cps && !SYSOP ! 224: && length/(long)cur_cps>(time_t)timeleft) ! 225: bputs(text[NotEnoughTimeToDl]); ! 226: else { ! 227: sprintf(str3,text[DownloadAttachedFileQ] ! 228: ,tp,ultoac(length,tmp)); ! 229: if(length>0L && yesno(str3)) { ! 230: if(online==ON_LOCAL) { ! 231: bputs(text[EnterPath]); ! 232: if(getstr(str3,60,K_LINE|K_UPPER)) { ! 233: backslashcolon(str3); ! 234: sprintf(tmp,"%s%s",str3,tp); ! 235: if(!mv(str2,tmp,which!=MAIL_YOUR)) { ! 236: logon_dlb+=length; ! 237: logon_dls++; ! 238: useron.dls=(ushort)adjustuserrec(&cfg,useron.number ! 239: ,U_DLS,5,1); ! 240: useron.dlb=adjustuserrec(&cfg,useron.number ! 241: ,U_DLB,10,length); ! 242: bprintf(text[FileNBytesSent] ! 243: ,fd.name,ultoac(length,tmp)); } } } ! 244: ! 245: else { /* Remote User */ ! 246: menu("dlprot"); ! 247: mnemonics(text[ProtocolOrQuit]); ! 248: strcpy(str3,"Q"); ! 249: for(i=0;i<cfg.total_prots;i++) ! 250: if(cfg.prot[i]->dlcmd[0] ! 251: && chk_ar(cfg.prot[i]->ar,&useron)) { ! 252: sprintf(tmp,"%c",cfg.prot[i]->mnemonic); ! 253: strcat(str3,tmp); } ! 254: ch=(char)getkeys(str3,0); ! 255: for(i=0;i<cfg.total_prots;i++) ! 256: if(cfg.prot[i]->dlcmd[0] && ch==cfg.prot[i]->mnemonic ! 257: && chk_ar(cfg.prot[i]->ar,&useron)) ! 258: break; ! 259: if(i<cfg.total_prots) { ! 260: j=protocol(cmdstr(cfg.prot[i]->dlcmd,str2,nulstr ! 261: ,NULL),0); ! 262: if((cfg.prot[i]->misc&PROT_DSZLOG ! 263: && checkprotlog(&fd)) ! 264: || (!(cfg.prot[i]->misc&PROT_DSZLOG) && !j)) { ! 265: if(which==MAIL_YOUR) ! 266: remove(str2); ! 267: logon_dlb+=length; /* Update stats */ ! 268: logon_dls++; ! 269: useron.dls=(ushort)adjustuserrec(&cfg,useron.number ! 270: ,U_DLS,5,1); ! 271: useron.dlb=adjustuserrec(&cfg,useron.number ! 272: ,U_DLB,10,length); ! 273: bprintf(text[FileNBytesSent] ! 274: ,fd.name,ultoac(length,tmp)); ! 275: sprintf(str3 ! 276: ,"Downloaded attached file: %s" ! 277: ,fd.name); ! 278: logline("D-",str3); } ! 279: autohangup(); } } } } ! 280: if(!p) ! 281: break; ! 282: tp=p+1; ! 283: while(*tp==SP) tp++; } ! 284: sprintf(str,"%sfile/%04u.in",cfg.data_dir,usernumber); ! 285: rmdir(str); } ! 286: if(which==MAIL_YOUR && !(msg.hdr.attr&MSG_READ)) { ! 287: mail[curmsg].attr|=MSG_READ; ! 288: if(thisnode.status==NODE_INUSE) ! 289: telluser(&msg); ! 290: if(msg.total_hfields) ! 291: smb_freemsgmem(&msg); ! 292: msg.total_hfields=0; ! 293: msg.idx.offset=0; /* Search by number */ ! 294: if(!smb_locksmbhdr(&smb)) { /* Lock the entire base */ ! 295: if(loadmsg(&msg,msg.idx.number)) { ! 296: msg.hdr.attr|=MSG_READ; ! 297: msg.idx.attr=msg.hdr.attr; ! 298: if((i=smb_putmsg(&smb,&msg))!=0) ! 299: errormsg(WHERE,ERR_WRITE,smb.file,i); ! 300: smb_unlockmsghdr(&smb,&msg); } ! 301: smb_unlocksmbhdr(&smb); } ! 302: if(!msg.total_hfields) { /* unsuccessful reload */ ! 303: domsg=0; ! 304: continue; } } ! 305: } ! 306: else domsg=1; ! 307: ! 308: if(useron.misc&WIP) { ! 309: strcpy(str,which==MAIL_YOUR ? "MAILREAD" : which==MAIL_ALL ? ! 310: "ALLMAIL" : "SENTMAIL"); ! 311: menu(str); } ! 312: ! 313: ASYNC; ! 314: if(which==MAIL_SENT) ! 315: bprintf(text[ReadingSentMail],curmsg+1,msgs); ! 316: else if(which==MAIL_ALL) ! 317: bprintf(text[ReadingAllMail],curmsg+1,msgs); ! 318: else ! 319: bprintf(text[ReadingMail],curmsg+1,msgs); ! 320: sprintf(str,"ADFLNQRT?<>[]{}-+"); ! 321: if(SYSOP) ! 322: strcat(str,"CUSP"); ! 323: if(which!=MAIL_YOUR) ! 324: strcat(str,"E"); ! 325: l=getkeys(str,msgs); ! 326: if(l&0x80000000L) { ! 327: if(l==-1) /* ctrl-c */ ! 328: break; ! 329: curmsg=(l&~0x80000000L)-1; ! 330: continue; } ! 331: switch(l) { ! 332: case 'A': /* Auto-reply to last piece */ ! 333: case 'R': ! 334: if(l==(cfg.sys_misc&SM_RA_EMU ? 'A' : 'R')) /* re-read last message */ ! 335: break; ! 336: ! 337: if(which==MAIL_SENT) ! 338: break; ! 339: if((msg.hdr.attr&MSG_ANONYMOUS) && !SYSOP) { ! 340: bputs(text[CantReplyToAnonMsg]); ! 341: break; } ! 342: ! 343: quotemsg(&msg,1); ! 344: ! 345: if(msg.from_net.type==NET_FIDO) /* FidoNet type */ ! 346: sprintf(str,"%s @%s",msg.from ! 347: ,faddrtoa(*(faddr_t *)msg.from_net.addr)); ! 348: else if(msg.from_net.type==NET_INTERNET) ! 349: strcpy(str,(char *)msg.from_net.addr); ! 350: else if(msg.from_net.type) ! 351: sprintf(str,"%s@%s",msg.from,msg.from_net.addr); ! 352: else /* No net */ ! 353: strcpy(str,msg.from); ! 354: ! 355: strcpy(str2,str); ! 356: ! 357: bputs(text[Email]); ! 358: if(!getstr(str,64,K_EDIT|K_AUTODEL)) ! 359: break; ! 360: msg.hdr.number=msg.idx.number; ! 361: smb_getmsgidx(&smb,&msg); ! 362: ! 363: if(!stricmp(str2,str)) /* Reply to sender */ ! 364: sprintf(str2,text[Regarding],msg.subj); ! 365: else /* Reply to other */ ! 366: sprintf(str2,text[RegardingByOn],msg.subj,msg.from ! 367: ,timestr((time_t *)&msg.hdr.when_written.time)); ! 368: ! 369: p=strrchr(str,'@'); ! 370: if(p) { /* name @addr */ ! 371: replied=netmail(str,msg.subj,WM_QUOTE); ! 372: sprintf(str2,text[DeleteMailQ],msg.from); } ! 373: else { ! 374: if(!msg.from_net.type && !stricmp(str,msg.from)) ! 375: replied=email(msg.idx.from,str2,msg.subj,WM_EMAIL|WM_QUOTE); ! 376: else if(!stricmp(str,"SYSOP")) ! 377: replied=email(1,str2,msg.subj,WM_EMAIL|WM_QUOTE); ! 378: else if((i=finduser(str))!=0) ! 379: replied=email(i,str2,msg.subj,WM_EMAIL|WM_QUOTE); ! 380: sprintf(str2,text[DeleteMailQ],msg.from); } ! 381: ! 382: if(replied==true && !(msg.hdr.attr&MSG_REPLIED)) { ! 383: if(msg.total_hfields) ! 384: smb_freemsgmem(&msg); ! 385: msg.total_hfields=0; ! 386: msg.idx.offset=0; ! 387: if(loadmsg(&msg,msg.idx.number)) { ! 388: msg.hdr.attr|=MSG_REPLIED; ! 389: msg.idx.attr=msg.hdr.attr; ! 390: if((i=smb_putmsg(&smb,&msg))!=0) ! 391: errormsg(WHERE,ERR_WRITE,smb.file,i); ! 392: smb_unlockmsghdr(&smb,&msg); } ! 393: } ! 394: ! 395: if(!yesno(str2)) { ! 396: if(curmsg<msgs-1) curmsg++; ! 397: else done=1; ! 398: break; } ! 399: /* Case 'D': must follow! */ ! 400: case 'D': /* Delete last piece (toggle) */ ! 401: if(msg.hdr.attr&MSG_PERMANENT) { ! 402: bputs("\r\nPermanent message.\r\n"); ! 403: domsg=0; ! 404: break; } ! 405: if(msg.total_hfields) ! 406: smb_freemsgmem(&msg); ! 407: msg.total_hfields=0; ! 408: msg.idx.offset=0; ! 409: if(loadmsg(&msg,msg.idx.number)) { ! 410: msg.hdr.attr^=MSG_DELETE; ! 411: msg.idx.attr=msg.hdr.attr; ! 412: // mail[curmsg].attr=msg.hdr.attr; ! 413: if((i=smb_putmsg(&smb,&msg))!=0) ! 414: errormsg(WHERE,ERR_WRITE,smb.file,i); ! 415: smb_unlockmsghdr(&smb,&msg); } ! 416: if(curmsg<msgs-1) curmsg++; ! 417: else done=1; ! 418: break; ! 419: case 'F': /* Forward last piece */ ! 420: domsg=0; ! 421: bputs(text[ForwardMailTo]); ! 422: if(!getstr(str,LEN_ALIAS,K_UPRLWR)) ! 423: break; ! 424: i=finduser(str); ! 425: if(!i) ! 426: break; ! 427: domsg=1; ! 428: if(curmsg<msgs-1) curmsg++; ! 429: else done=1; ! 430: smb_getmsgidx(&smb,&msg); ! 431: forwardmail(&msg,i); ! 432: if(msg.hdr.attr&MSG_PERMANENT) ! 433: break; ! 434: sprintf(str2,text[DeleteMailQ],msg.from); ! 435: if(!yesno(str2)) ! 436: break; ! 437: if(msg.total_hfields) ! 438: smb_freemsgmem(&msg); ! 439: msg.total_hfields=0; ! 440: msg.idx.offset=0; ! 441: if(loadmsg(&msg,msg.idx.number)) { ! 442: msg.hdr.attr|=MSG_DELETE; ! 443: msg.idx.attr=msg.hdr.attr; ! 444: // mail[curmsg].attr=msg.hdr.attr; ! 445: if((i=smb_putmsg(&smb,&msg))!=0) ! 446: errormsg(WHERE,ERR_WRITE,smb.file,i); ! 447: smb_unlockmsghdr(&smb,&msg); } ! 448: ! 449: break; ! 450: case 'L': /* List mail */ ! 451: domsg=0; ! 452: bprintf(text[StartWithN],(long)curmsg+1); ! 453: if((i=getnum(msgs))>0) ! 454: i--; ! 455: else if(i==-1) ! 456: break; ! 457: else ! 458: i=curmsg; ! 459: if(which==MAIL_SENT) ! 460: bputs(text[MailSentLstHdr]); ! 461: else if(which==MAIL_ALL) ! 462: bputs(text[MailOnSystemLstHdr]); ! 463: else ! 464: bputs(text[MailWaitingLstHdr]); ! 465: for(;(ulong)i<msgs && !msgabort();i++) { ! 466: if(msg.total_hfields) ! 467: smb_freemsgmem(&msg); ! 468: msg.total_hfields=0; ! 469: msg.idx.offset=mail[i].offset; ! 470: if(!loadmsg(&msg,mail[i].number)) ! 471: continue; ! 472: smb_unlockmsghdr(&smb,&msg); ! 473: if(which==MAIL_ALL) ! 474: bprintf(text[MailOnSystemLstFmt] ! 475: ,i+1,msg.from,msg.to ! 476: ,msg.hdr.attr&MSG_DELETE ? '-' : msg.hdr.attr&MSG_REPLIED ? 'R' ! 477: : msg.hdr.attr&MSG_READ ? SP ! 478: : msg.from_net.type || msg.to_net.type ? 'N':'*' ! 479: ,msg.subj); ! 480: else ! 481: bprintf(text[MailWaitingLstFmt],i+1 ! 482: ,which==MAIL_SENT ? msg.to ! 483: : (msg.hdr.attr&MSG_ANONYMOUS) && !SYSOP ! 484: ? text[Anonymous] : msg.from ! 485: ,msg.hdr.attr&MSG_DELETE ? '-' : msg.hdr.attr&MSG_REPLIED ? 'R' ! 486: : msg.hdr.attr&MSG_READ ? SP ! 487: : msg.from_net.type || msg.to_net.type ? 'N':'*' ! 488: ,msg.subj); ! 489: smb_freemsgmem(&msg); ! 490: msg.total_hfields=0; } ! 491: break; ! 492: case 'Q': ! 493: done=1; ! 494: break; ! 495: case 'C': /* Change attributes of last piece */ ! 496: i=chmsgattr(msg.hdr.attr); ! 497: if(msg.hdr.attr==i) ! 498: break; ! 499: if(msg.total_hfields) ! 500: smb_freemsgmem(&msg); ! 501: msg.total_hfields=0; ! 502: msg.idx.offset=0; ! 503: if(loadmsg(&msg,msg.idx.number)) { ! 504: msg.hdr.attr=msg.idx.attr=(ushort)i; ! 505: if((i=smb_putmsg(&smb,&msg))!=0) ! 506: errormsg(WHERE,ERR_WRITE,smb.file,i); ! 507: smb_unlockmsghdr(&smb,&msg); } ! 508: break; ! 509: case '>': ! 510: for(i=curmsg+1;(ulong)i<msgs;i++) ! 511: if(mail[i].subj==msg.idx.subj) ! 512: break; ! 513: if((ulong)i<msgs) ! 514: curmsg=i; ! 515: else ! 516: domsg=0; ! 517: break; ! 518: case '<': /* Search Title backward */ ! 519: for(i=curmsg-1;i>-1;i--) ! 520: if(mail[i].subj==msg.idx.subj) ! 521: break; ! 522: if(i>-1) ! 523: curmsg=i; ! 524: else ! 525: domsg=0; ! 526: break; ! 527: case '}': /* Search Author forward */ ! 528: strcpy(str,msg.from); ! 529: for(i=curmsg+1;(ulong)i<msgs;i++) ! 530: if(mail[i].from==msg.idx.from) ! 531: break; ! 532: if((ulong)i<msgs) ! 533: curmsg=i; ! 534: else ! 535: domsg=0; ! 536: break; ! 537: case 'N': /* Got to next un-read message */ ! 538: for(i=curmsg+1;(ulong)i<msgs;i++) ! 539: if(!(mail[i].attr&MSG_READ)) ! 540: break; ! 541: if((ulong)i<msgs) ! 542: curmsg=i; ! 543: else ! 544: domsg=0; ! 545: break; ! 546: case '{': /* Search Author backward */ ! 547: strcpy(str,msg.from); ! 548: for(i=curmsg-1;i>-1;i--) ! 549: if(mail[i].from==msg.idx.from) ! 550: break; ! 551: if(i>-1) ! 552: curmsg=i; ! 553: else ! 554: domsg=0; ! 555: break; ! 556: case ']': /* Search To User forward */ ! 557: strcpy(str,msg.to); ! 558: for(i=curmsg+1;(ulong)i<msgs;i++) ! 559: if(mail[i].to==msg.idx.to) ! 560: break; ! 561: if((ulong)i<msgs) ! 562: curmsg=i; ! 563: else ! 564: domsg=0; ! 565: break; ! 566: case '[': /* Search To User backward */ ! 567: strcpy(str,msg.to); ! 568: for(i=curmsg-1;(ulong)i>-1;i--) ! 569: if(mail[i].to==msg.idx.to) ! 570: break; ! 571: if((ulong)i>-1) ! 572: curmsg=i; ! 573: else ! 574: domsg=0; ! 575: break; ! 576: case 0: ! 577: case '+': ! 578: if(curmsg<msgs-1) curmsg++; ! 579: else done=1; ! 580: break; ! 581: case '-': ! 582: if(curmsg>0) curmsg--; ! 583: break; ! 584: case 'S': ! 585: domsg=0; ! 586: /* ! 587: if(!yesno(text[SaveMsgToFile])) ! 588: break; ! 589: */ ! 590: bputs(text[FileToWriteTo]); ! 591: if(getstr(str,40,K_LINE|K_UPPER)) ! 592: msgtotxt(&msg,str,1,1); ! 593: break; ! 594: case 'E': ! 595: editmsg(&msg,INVALID_SUB); ! 596: break; ! 597: case 'T': ! 598: domsg=0; ! 599: i=curmsg; ! 600: if(i) i++; ! 601: j=i+10; ! 602: if((ulong)j>msgs) ! 603: j=msgs; ! 604: ! 605: if(which==MAIL_SENT) ! 606: bputs(text[MailSentLstHdr]); ! 607: else if(which==MAIL_ALL) ! 608: bputs(text[MailOnSystemLstHdr]); ! 609: else ! 610: bputs(text[MailWaitingLstHdr]); ! 611: for(;i<j;i++) { ! 612: if(msg.total_hfields) ! 613: smb_freemsgmem(&msg); ! 614: msg.total_hfields=0; ! 615: msg.idx.offset=mail[i].offset; ! 616: if(!loadmsg(&msg,mail[i].number)) ! 617: continue; ! 618: smb_unlockmsghdr(&smb,&msg); ! 619: if(which==MAIL_ALL) ! 620: bprintf(text[MailOnSystemLstFmt] ! 621: ,i+1,msg.from,msg.to ! 622: ,msg.hdr.attr&MSG_DELETE ? '-' : msg.hdr.attr&MSG_REPLIED ? 'R' ! 623: : msg.hdr.attr&MSG_READ ? SP ! 624: : msg.from_net.type || msg.to_net.type ? 'N':'*' ! 625: ,msg.subj); ! 626: else ! 627: bprintf(text[MailWaitingLstFmt],i+1 ! 628: ,which==MAIL_SENT ? msg.to ! 629: : (msg.hdr.attr&MSG_ANONYMOUS) && !SYSOP ! 630: ? text[Anonymous] : msg.from ! 631: ,msg.hdr.attr&MSG_DELETE ? '-' : msg.hdr.attr&MSG_REPLIED ? 'R' ! 632: : msg.hdr.attr&MSG_READ ? SP ! 633: : msg.from_net.type || msg.to_net.type ? 'N':'*' ! 634: ,msg.subj); ! 635: smb_freemsgmem(&msg); ! 636: msg.total_hfields=0; } ! 637: curmsg=(i-1); ! 638: break; ! 639: case 'U': /* user edit */ ! 640: msg.hdr.number=msg.idx.number; ! 641: smb_getmsgidx(&smb,&msg); ! 642: useredit(which==MAIL_SENT ? msg.idx.to : msg.idx.from,0); ! 643: break; ! 644: case 'P': /* Purge author and all mail to/from */ ! 645: if(noyes(text[AreYouSureQ])) ! 646: break; ! 647: msg.hdr.number=msg.idx.number; ! 648: smb_getmsgidx(&smb,&msg); ! 649: purgeuser(msg.idx.from); ! 650: if(curmsg<msgs-1) curmsg++; ! 651: break; ! 652: case '?': ! 653: strcpy(str,which==MAIL_YOUR ? "MAILREAD" : which==MAIL_ALL ! 654: ? "ALLMAIL" : "SENTMAIL"); ! 655: menu(str); ! 656: if(SYSOP && which==MAIL_SENT) ! 657: menu("syssmail"); ! 658: else if(SYSOP && which==MAIL_YOUR) ! 659: menu("sysmailr"); /* Sysop Mail Read */ ! 660: domsg=0; ! 661: break; ! 662: } } ! 663: ! 664: if(msg.total_hfields) ! 665: smb_freemsgmem(&msg); ! 666: ! 667: if(msgs) ! 668: FREE(mail); ! 669: ! 670: /***************************************/ ! 671: /* Delete messages marked for deletion */ ! 672: /***************************************/ ! 673: ! 674: if(cfg.sys_misc&SM_DELEMAIL) { ! 675: if((i=smb_locksmbhdr(&smb))!=0) /* Lock the base, so nobody */ ! 676: errormsg(WHERE,ERR_LOCK,smb.file,i); /* messes with the index */ ! 677: else ! 678: delmail(usernumber,which); } ! 679: ! 680: smb_close(&smb); ! 681: smb_stack(&smb,SMB_STACK_POP); ! 682: } ! 683:
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.