![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to useredit.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Synchronet] / sbbs / sbbs2|
Return to useredit.c CVS log | Up to [Synchronet] / sbbs / sbbs2 |
1.1 ! root 1: #line 1 "USEREDIT.C" ! 2: ! 3: /* Developed 1990-1997 by Rob Swindell; PO Box 501, Yorba Linda, CA 92885 */ ! 4: ! 5: /*******************************************************************/ ! 6: /* The function useredit(), and functions that are closely related */ ! 7: /*******************************************************************/ ! 8: ! 9: #include "sbbs.h" ! 10: ! 11: #define SEARCH_TXT 0 ! 12: #define SEARCH_ARS 1 ! 13: ! 14: int searchup(char *search,int usernum); ! 15: int searchdn(char *search,int usernum); ! 16: ! 17: /****************************************************************************/ ! 18: /* Edits user data. Can only edit users with a Main Security Level less */ ! 19: /* than or equal to the current user's Main Security Level */ ! 20: /* Called from functions waitforcall, main_sec, xfer_sec and inkey */ ! 21: /****************************************************************************/ ! 22: void useredit(int usernumber, int local) ! 23: { ! 24: uchar str[256],tmp2[256],tmp3[256],c,stype=SEARCH_TXT; ! 25: uchar search[256]={""},artxt[128]={""},*ar=NULL; ! 26: int i,j,k; ! 27: long l; ! 28: user_t user; ! 29: ! 30: if(online==ON_REMOTE && console&(CON_R_ECHO|CON_R_INPUT) && !chksyspass(local)) ! 31: return; ! 32: if(online==ON_LOCAL) { ! 33: if(!(sys_misc&SM_L_SYSOP)) ! 34: return; ! 35: if(node_misc&NM_SYSPW && !chksyspass(local)) ! 36: return; } ! 37: if(usernumber) ! 38: user.number=usernumber; ! 39: else ! 40: user.number=useron.number; ! 41: action=NODE_SYSP; ! 42: if(sys_status&SS_INUEDIT) ! 43: return; ! 44: sys_status|=SS_INUEDIT; ! 45: while(online) { ! 46: CLS; ! 47: attr(LIGHTGRAY); ! 48: getuserdat(&user); ! 49: if(!user.number) { ! 50: user.number=1; ! 51: getuserdat(&user); ! 52: if(!user.number) { ! 53: bputs(text[NoUserData]); ! 54: getkey(0); ! 55: sys_status&=~SS_INUEDIT; ! 56: return; } } ! 57: unixtodstr(time(NULL),str); ! 58: unixtodstr(user.laston,tmp); ! 59: if(strcmp(str,tmp) && user.ltoday) { ! 60: user.ltoday=user.ttoday=user.ptoday=user.etoday=user.textra=0; ! 61: user.freecdt=level_freecdtperday[user.level]; ! 62: putuserdat(user); } /* Leave alone */ ! 63: if(user.misc&DELETED) ! 64: bputs(text[Deleted]); ! 65: else if(user.misc&INACTIVE) ! 66: bputs(text[Inactive]); ! 67: bprintf(text[UeditAliasPassword] ! 68: ,user.alias, (user.level>useron.level && console&CON_R_ECHO) ! 69: || !(sys_misc&SM_ECHO_PW) ? "XXXXXXXX" : user.pass ! 70: , unixtodstr(user.pwmod,tmp)); ! 71: bprintf(text[UeditRealNamePhone] ! 72: ,user.level>useron.level && console&CON_R_ECHO ! 73: ? "XXXXXXXX" : user.name ! 74: ,user.level>useron.level && console&CON_R_ECHO ! 75: ? "XXX-XXX-XXXX" : user.phone); ! 76: bprintf(text[UeditAddressBirthday] ! 77: ,user.address,getage(user.birth),user.sex,user.birth); ! 78: bprintf(text[UeditLocationZipcode],user.location,user.zipcode); ! 79: bprintf(text[UeditNoteHandle],user.note,user.handle); ! 80: bprintf(text[UeditComputerModem],user.comp,user.modem); ! 81: sprintf(str,"%sUSER\\%4.4u.MSG",data_dir,user.number); ! 82: i=fexist(str); ! 83: if(user.comment[0] || i) ! 84: bprintf(text[UeditCommentLine],i ? '+' : SP ! 85: ,user.comment); ! 86: else ! 87: CRLF; ! 88: unixtodos(user.laston,&date,&curtime); ! 89: bprintf(text[UserDates] ! 90: ,unixtodstr(user.firston,str),unixtodstr(user.expire,tmp) ! 91: ,unixtodstr(user.laston,tmp2),curtime.ti_hour,curtime.ti_min); ! 92: bprintf(text[UserTimes] ! 93: ,user.timeon,user.ttoday,level_timeperday[user.level] ! 94: ,user.tlast,level_timepercall[user.level],user.textra); ! 95: if(user.posts) ! 96: i=user.logons/user.posts; ! 97: else ! 98: i=0; ! 99: bprintf(text[UserLogons] ! 100: ,user.logons,user.ltoday,level_callsperday[user.level],user.posts ! 101: ,i ? 100/i : user.posts>user.logons ? 100 : 0 ! 102: ,user.ptoday); ! 103: bprintf(text[UserEmails] ! 104: ,user.emails,user.fbacks,getmail(user.number,0),user.etoday); ! 105: if(user.misc&NETMAIL) ! 106: bprintf(text[UserNetMail],user.netmail); ! 107: else ! 108: CRLF; ! 109: bprintf(text[UserUploads],ultoac(user.ulb,tmp),user.uls); ! 110: if(user.leech) ! 111: sprintf(str,text[UserLeech],user.leech); ! 112: else ! 113: str[0]=0; ! 114: bprintf(text[UserDownloads],ultoac(user.dlb,tmp),user.dls,str); ! 115: bprintf(text[UserCredits],ultoac(user.cdt,tmp) ! 116: ,ultoac(user.freecdt,tmp2),ultoac(level_freecdtperday[user.level],str)); ! 117: bprintf(text[UserMinutes],ultoac(user.min,tmp)); ! 118: bprintf(text[UeditSecLevel],user.level); ! 119: bprintf(text[UeditFlags],ltoaf(user.flags1,tmp),ltoaf(user.flags3,tmp2) ! 120: ,ltoaf(user.flags2,tmp3),ltoaf(user.flags4,str)); ! 121: bprintf(text[UeditExempts],ltoaf(user.exempt,tmp),ltoaf(user.rest,tmp2)); ! 122: l=lastuser(); ! 123: ASYNC; ! 124: if(lncntr>=rows-2) ! 125: lncntr=0; ! 126: bprintf(text[UeditPrompt],user.number,l); ! 127: if(user.level>useron.level && console&CON_R_INPUT) ! 128: strcpy(str,"QG[]?/{},"); ! 129: else ! 130: strcpy(str,"ABCDEFGHIJKLMNOPQRSTUVWXYZ+[]?/{}~*$#"); ! 131: l=getkeys(str,l); ! 132: if(l&0x80000000L) { ! 133: user.number=l&~0x80000000L; ! 134: continue; } ! 135: switch(l) { ! 136: case 'A': ! 137: bputs(text[EnterYourAlias]); ! 138: getstr(user.alias,LEN_ALIAS,K_LINE|K_EDIT|K_AUTODEL); ! 139: putuserrec(user.number,U_ALIAS,LEN_ALIAS,user.alias); ! 140: if(!(user.misc&DELETED)) ! 141: putusername(user.number,user.alias); ! 142: bputs(text[EnterYourHandle]); ! 143: getstr(user.handle,LEN_HANDLE,K_LINE|K_EDIT|K_AUTODEL); ! 144: putuserrec(user.number,U_HANDLE,LEN_HANDLE,user.handle); ! 145: break; ! 146: case 'B': ! 147: bputs(text[EnterYourBirthday]); ! 148: gettmplt(user.birth,"nn/nn/nn",K_LINE|K_EDIT|K_AUTODEL); ! 149: putuserrec(user.number,U_BIRTH,LEN_BIRTH,user.birth); ! 150: break; ! 151: case 'C': ! 152: bputs(text[EnterYourComputer]); ! 153: getstr(user.comp,LEN_COMP,K_LINE|K_EDIT|K_AUTODEL); ! 154: putuserrec(user.number,U_COMP,LEN_COMP,user.comp); ! 155: break; ! 156: case 'D': ! 157: if(user.misc&DELETED) { ! 158: if(!noyes(text[UeditRestoreQ])) { ! 159: putuserrec(user.number,U_MISC,8 ! 160: ,ultoa(user.misc&~DELETED,str,16)); ! 161: putusername(user.number,user.alias); } ! 162: break; } ! 163: if(user.misc&INACTIVE) { ! 164: if(!noyes(text[UeditActivateQ])) ! 165: putuserrec(user.number,U_MISC,8 ! 166: ,ultoa(user.misc&~INACTIVE,str,16)); ! 167: break; } ! 168: if(!noyes(text[UeditDeleteQ])) { ! 169: getsmsg(user.number); ! 170: if(getmail(user.number,0)) { ! 171: if(yesno(text[UeditReadUserMailWQ])) ! 172: readmail(user.number,MAIL_YOUR); } ! 173: if(getmail(user.number,1)) { ! 174: if(yesno(text[UeditReadUserMailSQ])) ! 175: readmail(user.number,MAIL_SENT); } ! 176: putuserrec(user.number,U_MISC,8 ! 177: ,ultoa(user.misc|DELETED,str,16)); ! 178: putusername(user.number,nulstr); ! 179: break; } ! 180: if(!noyes(text[UeditDeactivateUserQ])) { ! 181: if(getmail(user.number,0)) { ! 182: if(yesno(text[UeditReadUserMailWQ])) ! 183: readmail(user.number,MAIL_YOUR); } ! 184: if(getmail(user.number,1)) { ! 185: if(yesno(text[UeditReadUserMailSQ])) ! 186: readmail(user.number,MAIL_SENT); } ! 187: putuserrec(user.number,U_MISC,8 ! 188: ,ultoa(user.misc|INACTIVE,str,16)); ! 189: break; } ! 190: break; ! 191: case 'E': ! 192: if(!yesno(text[ChangeExemptionQ])) ! 193: break; ! 194: while(online) { ! 195: bprintf(text[FlagEditing],ltoaf(user.exempt,tmp)); ! 196: c=getkeys("ABCDEFGHIJKLMNOPQRSTUVWXYZ?\r",0); ! 197: if(sys_status&SS_ABORT) ! 198: break; ! 199: if(c==CR) break; ! 200: if(c=='?') { ! 201: menu("EXEMPT"); ! 202: continue; } ! 203: if(!(useron.exempt&FLAG(c)) && console&CON_R_INPUT) ! 204: continue; ! 205: user.exempt^=FLAG(c); ! 206: putuserrec(user.number,U_EXEMPT,8,ultoa(user.exempt,tmp,16)); } ! 207: break; ! 208: case 'F': ! 209: i=1; ! 210: while(online) { ! 211: bprintf("\r\nFlag Set #%d\r\n",i); ! 212: switch(i) { ! 213: case 1: ! 214: bprintf(text[FlagEditing],ltoaf(user.flags1,tmp)); ! 215: break; ! 216: case 2: ! 217: bprintf(text[FlagEditing],ltoaf(user.flags2,tmp)); ! 218: break; ! 219: case 3: ! 220: bprintf(text[FlagEditing],ltoaf(user.flags3,tmp)); ! 221: break; ! 222: case 4: ! 223: bprintf(text[FlagEditing],ltoaf(user.flags4,tmp)); ! 224: break; } ! 225: c=getkeys("ABCDEFGHIJKLMNOPQRSTUVWXYZ?1234\r",0); ! 226: if(sys_status&SS_ABORT) ! 227: break; ! 228: if(c==CR) break; ! 229: if(c=='?') { ! 230: sprintf(str,"FLAGS%d",i); ! 231: menu(str); ! 232: continue; } ! 233: if(isdigit(c)) { ! 234: i=c&0xf; ! 235: continue; } ! 236: if(console & CON_R_INPUT) ! 237: switch(i) { ! 238: case 1: ! 239: if(!(useron.flags1&FLAG(c))) ! 240: continue; ! 241: break; ! 242: case 2: ! 243: if(!(useron.flags2&FLAG(c))) ! 244: continue; ! 245: break; ! 246: case 3: ! 247: if(!(useron.flags3&FLAG(c))) ! 248: continue; ! 249: break; ! 250: case 4: ! 251: if(!(useron.flags4&FLAG(c))) ! 252: continue; ! 253: break; } ! 254: switch(i) { ! 255: case 1: ! 256: user.flags1^=FLAG(c); ! 257: putuserrec(user.number,U_FLAGS1,8 ! 258: ,ultoa(user.flags1,tmp,16)); ! 259: break; ! 260: case 2: ! 261: user.flags2^=FLAG(c); ! 262: putuserrec(user.number,U_FLAGS2,8 ! 263: ,ultoa(user.flags2,tmp,16)); ! 264: break; ! 265: case 3: ! 266: user.flags3^=FLAG(c); ! 267: putuserrec(user.number,U_FLAGS3,8 ! 268: ,ultoa(user.flags3,tmp,16)); ! 269: break; ! 270: case 4: ! 271: user.flags4^=FLAG(c); ! 272: putuserrec(user.number,U_FLAGS4,8 ! 273: ,ultoa(user.flags4,tmp,16)); ! 274: break; } } ! 275: break; ! 276: case 'G': ! 277: bputs(text[GoToUser]); ! 278: if(getstr(str,LEN_ALIAS,K_UPPER|K_LINE)) { ! 279: if(isdigit(str[0])) { ! 280: i=atoi(str); ! 281: if(i>lastuser()) ! 282: break; ! 283: if(i) user.number=i; } ! 284: else { ! 285: i=finduser(str); ! 286: if(i) user.number=i; } } ! 287: break; ! 288: case 'H': /* edit user's information file */ ! 289: attr(LIGHTGRAY); ! 290: sprintf(str,"%sUSER\\%4.4u.MSG",data_dir,user.number); ! 291: editfile(str); ! 292: break; ! 293: case 'I': ! 294: maindflts(user); ! 295: break; ! 296: case 'J': /* Edit Minutes */ ! 297: bputs(text[UeditMinutes]); ! 298: ultoa(user.min,str,10); ! 299: if(getstr(str,10,K_NUMBER|K_LINE)) ! 300: putuserrec(user.number,U_MIN,10,str); ! 301: break; ! 302: case 'K': /* date changes */ ! 303: bputs(text[UeditLastOn]); ! 304: unixtodstr(user.laston,str); ! 305: gettmplt(str,"nn/nn/nn",K_LINE|K_EDIT); ! 306: if(sys_status&SS_ABORT) ! 307: break; ! 308: user.laston=dstrtounix(str); ! 309: putuserrec(user.number,U_LASTON,8,ultoa(user.laston,tmp,16)); ! 310: bputs(text[UeditFirstOn]); ! 311: unixtodstr(user.firston,str); ! 312: gettmplt(str,"nn/nn/nn",K_LINE|K_EDIT); ! 313: if(sys_status&SS_ABORT) ! 314: break; ! 315: user.firston=dstrtounix(str); ! 316: putuserrec(user.number,U_FIRSTON,8,ultoa(user.firston,tmp,16)); ! 317: bputs(text[UeditExpire]); ! 318: unixtodstr(user.expire,str); ! 319: gettmplt(str,"nn/nn/nn",K_LINE|K_EDIT); ! 320: if(sys_status&SS_ABORT) ! 321: break; ! 322: user.expire=dstrtounix(str); ! 323: putuserrec(user.number,U_EXPIRE,8,ultoa(user.expire,tmp,16)); ! 324: bputs(text[UeditPwModDate]); ! 325: unixtodstr(user.pwmod,str); ! 326: gettmplt(str,"nn/nn/nn",K_LINE|K_EDIT); ! 327: if(sys_status&SS_ABORT) ! 328: break; ! 329: user.pwmod=dstrtounix(str); ! 330: putuserrec(user.number,U_PWMOD,8,ultoa(user.pwmod,tmp,16)); ! 331: break; ! 332: case 'L': ! 333: bputs(text[EnterYourAddress]); ! 334: getstr(user.address,LEN_ADDRESS,K_LINE|K_EDIT|K_AUTODEL); ! 335: if(sys_status&SS_ABORT) ! 336: break; ! 337: putuserrec(user.number,U_ADDRESS,LEN_ADDRESS,user.address); ! 338: bputs(text[EnterYourCityState]); ! 339: getstr(user.location,LEN_LOCATION,K_LINE|K_EDIT|K_AUTODEL); ! 340: if(sys_status&SS_ABORT) ! 341: break; ! 342: putuserrec(user.number,U_LOCATION,LEN_LOCATION,user.location); ! 343: bputs(text[EnterYourZipCode]); ! 344: getstr(user.zipcode,LEN_ZIPCODE,K_LINE|K_EDIT|K_AUTODEL|K_UPPER); ! 345: if(sys_status&SS_ABORT) ! 346: break; ! 347: putuserrec(user.number,U_ZIPCODE,LEN_ZIPCODE,user.zipcode); ! 348: break; ! 349: case 'M': ! 350: bputs(text[UeditML]); ! 351: itoa(user.level,str,10); ! 352: if(getstr(str,2,K_NUMBER|K_LINE)) ! 353: if(!(atoi(str)>useron.level && console&CON_R_INPUT)) ! 354: putuserrec(user.number,U_LEVEL,2,str); ! 355: break; ! 356: case 'N': ! 357: bputs(text[UeditNote]); ! 358: getstr(user.note,LEN_NOTE,K_LINE|K_EDIT|K_AUTODEL); ! 359: putuserrec(user.number,U_NOTE,LEN_NOTE,user.note); ! 360: break; ! 361: case 'O': ! 362: bputs(text[UeditComment]); ! 363: getstr(user.comment,60,K_LINE|K_EDIT|K_AUTODEL); ! 364: putuserrec(user.number,U_COMMENT,60,user.comment); ! 365: break; ! 366: case 'P': ! 367: bputs(text[EnterYourPhoneNumber]); ! 368: getstr(user.phone,LEN_PHONE,K_UPPER|K_LINE|K_EDIT|K_AUTODEL); ! 369: putuserrec(user.number,U_PHONE,LEN_PHONE,user.phone); ! 370: break; ! 371: case 'Q': ! 372: CLS; ! 373: sys_status&=~SS_INUEDIT; ! 374: if(ar) ! 375: FREE(ar); ! 376: return; ! 377: case 'R': ! 378: bputs(text[EnterYourRealName]); ! 379: getstr(user.name,LEN_NAME,K_LINE|K_EDIT|K_AUTODEL); ! 380: putuserrec(user.number,U_NAME,LEN_NAME,user.name); ! 381: break; ! 382: case 'S': ! 383: bputs(text[EnterYourSex]); ! 384: if(getstr(str,1,K_UPPER|K_LINE)) ! 385: putuserrec(user.number,U_SEX,1,str); ! 386: break; ! 387: case 'T': /* Text Search */ ! 388: bputs(text[SearchStringPrompt]); ! 389: if(getstr(search,30,K_UPPER|K_LINE)) ! 390: stype=SEARCH_TXT; ! 391: break; ! 392: case 'U': ! 393: bputs(text[UeditUlBytes]); ! 394: ultoa(user.ulb,str,10); ! 395: if(getstr(str,10,K_NUMBER|K_LINE|K_EDIT|K_AUTODEL)) ! 396: putuserrec(user.number,U_ULB,10,str); ! 397: if(sys_status&SS_ABORT) ! 398: break; ! 399: bputs(text[UeditUploads]); ! 400: sprintf(str,"%u",user.uls); ! 401: if(getstr(str,5,K_NUMBER|K_LINE|K_EDIT|K_AUTODEL)) ! 402: putuserrec(user.number,U_ULS,5,str); ! 403: if(sys_status&SS_ABORT) ! 404: break; ! 405: bputs(text[UeditDlBytes]); ! 406: ultoa(user.dlb,str,10); ! 407: if(getstr(str,10,K_NUMBER|K_LINE|K_EDIT|K_AUTODEL)) ! 408: putuserrec(user.number,U_DLB,10,str); ! 409: if(sys_status&SS_ABORT) ! 410: break; ! 411: bputs(text[UeditDownloads]); ! 412: sprintf(str,"%u",user.dls); ! 413: if(getstr(str,5,K_NUMBER|K_LINE|K_EDIT|K_AUTODEL)) ! 414: putuserrec(user.number,U_DLS,5,str); ! 415: break; ! 416: case 'V': ! 417: CLS; ! 418: attr(LIGHTGRAY); ! 419: for(i=0;i<10;i++) { ! 420: bprintf(text[QuickValidateFmt] ! 421: ,i,val_level[i],ltoaf(val_flags1[i],str) ! 422: ,ltoaf(val_exempt[i],tmp) ! 423: ,ltoaf(val_rest[i],tmp3)); } ! 424: ASYNC; ! 425: bputs(text[QuickValidatePrompt]); ! 426: c=getkey(0); ! 427: if(!isdigit(c)) ! 428: break; ! 429: i=c&0xf; ! 430: user.level=val_level[i]; ! 431: user.flags1=val_flags1[i]; ! 432: user.flags2=val_flags2[i]; ! 433: user.flags3=val_flags3[i]; ! 434: user.flags4=val_flags4[i]; ! 435: user.exempt=val_exempt[i]; ! 436: user.rest=val_rest[i]; ! 437: user.cdt+=val_cdt[i]; ! 438: now=time(NULL); ! 439: if(val_expire[i]) { ! 440: if(user.expire<now) ! 441: user.expire=now+((long)val_expire[i]*24L*60L*60L); ! 442: else ! 443: user.expire+=((long)val_expire[i]*24L*60L*60L); } ! 444: putuserdat(user); ! 445: break; ! 446: case 'W': ! 447: bputs(text[UeditPassword]); ! 448: getstr(user.pass,LEN_PASS,K_UPPER|K_LINE|K_EDIT|K_AUTODEL); ! 449: putuserrec(user.number,U_PASS,LEN_PASS,user.pass); ! 450: break; ! 451: case 'X': ! 452: attr(LIGHTGRAY); ! 453: sprintf(str,"%sUSER\\%4.4u.MSG",data_dir,user.number); ! 454: printfile(str,0); ! 455: pause(); ! 456: break; ! 457: case 'Y': ! 458: if(!noyes(text[UeditCopyUserQ])) { ! 459: bputs(text[UeditCopyUserToSlot]); ! 460: i=getnum(lastuser()); ! 461: if(i>0) { ! 462: user.number=i; ! 463: putusername(user.number,user.alias); ! 464: putuserdat(user); } } ! 465: break; ! 466: case 'Z': ! 467: if(!yesno(text[ChangeRestrictsQ])) ! 468: break; ! 469: while(online) { ! 470: bprintf(text[FlagEditing],ltoaf(user.rest,tmp)); ! 471: c=getkeys("ABCDEFGHIJKLMNOPQRSTUVWXYZ?\r",0); ! 472: if(sys_status&SS_ABORT) ! 473: break; ! 474: if(c==CR) break; ! 475: if(c=='?') { ! 476: menu("RESTRICT"); ! 477: continue; } ! 478: user.rest^=FLAG(c); ! 479: putuserrec(user.number,U_REST,8,ultoa(user.rest,tmp,16)); } ! 480: break; ! 481: case '?': ! 482: CLS; ! 483: menu("UEDIT"); /* Sysop Uedit Edit Menu */ ! 484: pause(); ! 485: break; ! 486: case '~': ! 487: bputs(text[UeditLeech]); ! 488: if(getstr(str,2,K_NUMBER|K_LINE)) ! 489: putuserrec(user.number,U_LEECH,2,itoa(atoi(str),tmp,16)); ! 490: break; ! 491: case '+': ! 492: bputs(text[ModifyCredits]); ! 493: getstr(str,10,K_UPPER|K_LINE); ! 494: l=atol(str); ! 495: if(strstr(str,"M")) ! 496: l*=0x100000L; ! 497: else if(strstr(str,"K")) ! 498: l*=1024; ! 499: else if(strstr(str,"$")) ! 500: l*=cdt_per_dollar; ! 501: if(l<0L && l*-1 > user.cdt) ! 502: user.cdt=0L; ! 503: else ! 504: user.cdt+=l; ! 505: putuserrec(user.number,U_CDT,10,ultoa(user.cdt,tmp,10)); ! 506: break; ! 507: case '*': ! 508: bputs(text[ModifyMinutes]); ! 509: getstr(str,10,K_UPPER|K_LINE); ! 510: l=atol(str); ! 511: if(strstr(str,"H")) ! 512: l*=60L; ! 513: if(l<0L && l*-1 > user.min) ! 514: user.min=0L; ! 515: else ! 516: user.min+=l; ! 517: putuserrec(user.number,U_MIN,10,ultoa(user.min,tmp,10)); ! 518: break; ! 519: case '#': /* read new user questionaire */ ! 520: sprintf(str,"%sUSER\\%4.4u.DAT",data_dir,user.number); ! 521: if(!new_sof[0] || !fexist(str)) ! 522: break; ! 523: read_sif_dat(new_sof,str); ! 524: if(!noyes(text[DeleteQuestionaireQ])) ! 525: remove(str); ! 526: break; ! 527: case '$': ! 528: bputs(text[UeditCredits]); ! 529: ultoa(user.cdt,str,10); ! 530: if(getstr(str,10,K_NUMBER|K_LINE)) ! 531: putuserrec(user.number,U_CDT,10,str); ! 532: break; ! 533: case '/': ! 534: bputs(text[SearchStringPrompt]); ! 535: if(getstr(artxt,40,K_UPPER|K_LINE)) ! 536: stype=SEARCH_ARS; ! 537: if(ar && ar[0]) ! 538: FREE(ar); ! 539: ar=arstr(0,artxt); ! 540: break; ! 541: case '{': ! 542: if(stype==SEARCH_TXT) ! 543: user.number=searchdn(search,user.number); ! 544: else { ! 545: if(!ar) ! 546: break; ! 547: k=user.number; ! 548: for(i=k-1;i;i--) { ! 549: user.number=i; ! 550: getuserdat(&user); ! 551: if(chk_ar(ar,user)) { ! 552: outchar(7); ! 553: break; } } ! 554: if(!i) ! 555: user.number=k; } ! 556: break; ! 557: case '}': ! 558: if(stype==SEARCH_TXT) ! 559: user.number=searchup(search,user.number); ! 560: else { ! 561: if(!ar) ! 562: break; ! 563: j=lastuser(); ! 564: k=user.number; ! 565: for(i=k+1;i<=j;i++) { ! 566: user.number=i; ! 567: getuserdat(&user); ! 568: if(chk_ar(ar,user)) { ! 569: outchar(7); ! 570: break; } } ! 571: if(i>j) ! 572: user.number=k; } ! 573: break; ! 574: case ']': ! 575: if(user.number==lastuser()) ! 576: user.number=1; ! 577: else user.number++; ! 578: break; ! 579: case '[': ! 580: if(user.number==1) ! 581: user.number=lastuser(); ! 582: else user.number--; ! 583: break; } } ! 584: sys_status&=~SS_INUEDIT; ! 585: } ! 586: ! 587: /****************************************************************************/ ! 588: /* Seaches forward through the USER.DAT file for the ocurrance of 'search' */ ! 589: /* starting at the offset for usernum+1 and returning the usernumber of the */ ! 590: /* record where the string was found or the original usernumber if the */ ! 591: /* string wasn't found */ ! 592: /* Called from the function useredit */ ! 593: /****************************************************************************/ ! 594: int searchup(char *search,int usernum) ! 595: { ! 596: char userdat[U_LEN+1]; ! 597: int file,count; ! 598: uint i=usernum+1; ! 599: ! 600: if(!search[0]) ! 601: return(usernum); ! 602: sprintf(userdat,"%sUSER\\USER.DAT",data_dir); ! 603: if((file=nopen(userdat,O_RDONLY|O_DENYNONE))==-1) ! 604: return(usernum); ! 605: lseek(file,(long)((long)usernum*U_LEN),0); ! 606: ! 607: while(!eof(file)) { ! 608: count=0; ! 609: while(count<LOOP_NODEDAB ! 610: && lock(file,(long)((long)(i-1)*U_LEN),U_LEN)==-1) { ! 611: if(count>10) ! 612: mswait(55); ! 613: count++; } ! 614: ! 615: if(count>=LOOP_NODEDAB) { ! 616: close(file); ! 617: errormsg(WHERE,ERR_LOCK,"USER.DAT",i); ! 618: return(usernum); } ! 619: ! 620: if(read(file,userdat,U_LEN)!=U_LEN) { ! 621: unlock(file,(long)((long)(i-1)*U_LEN),U_LEN); ! 622: close(file); ! 623: errormsg(WHERE,ERR_READ,"USER.DAT",U_LEN); ! 624: return(usernum); } ! 625: ! 626: unlock(file,(long)((long)(i-1)*U_LEN),U_LEN); ! 627: userdat[U_LEN]=0; ! 628: strupr(userdat); ! 629: if(strstr(userdat,search)) { ! 630: outchar(7); ! 631: close(file); ! 632: return(i); } ! 633: i++; } ! 634: close(file); ! 635: return(usernum); ! 636: } ! 637: ! 638: /****************************************************************************/ ! 639: /* Seaches backward through the USER.DAT file for the ocurrance of 'search' */ ! 640: /* starting at the offset for usernum-1 and returning the usernumber of the */ ! 641: /* record where the string was found or the original usernumber if the */ ! 642: /* string wasn't found */ ! 643: /* Called from the function useredit */ ! 644: /****************************************************************************/ ! 645: int searchdn(char *search,int usernum) ! 646: { ! 647: char userdat[U_LEN+1]; ! 648: int file,count; ! 649: uint i=usernum-1; ! 650: ! 651: if(!search[0]) ! 652: return(usernum); ! 653: sprintf(userdat,"%sUSER\\USER.DAT",data_dir); ! 654: if((file=nopen(userdat,O_RDONLY))==-1) ! 655: return(usernum); ! 656: while(i) { ! 657: lseek(file,(long)((long)(i-1)*U_LEN),0); ! 658: count=0; ! 659: while(count<LOOP_NODEDAB ! 660: && lock(file,(long)((long)(i-1)*U_LEN),U_LEN)==-1) { ! 661: if(count>10) ! 662: mswait(55); ! 663: count++; } ! 664: ! 665: if(count>=LOOP_NODEDAB) { ! 666: close(file); ! 667: errormsg(WHERE,ERR_LOCK,"USER.DAT",i); ! 668: return(usernum); } ! 669: ! 670: if(read(file,userdat,U_LEN)==-1) { ! 671: unlock(file,(long)((long)(i-1)*U_LEN),U_LEN); ! 672: close(file); ! 673: errormsg(WHERE,ERR_READ,"USER.DAT",U_LEN); ! 674: return(usernum); } ! 675: unlock(file,(long)((long)(i-1)*U_LEN),U_LEN); ! 676: userdat[U_LEN]=0; ! 677: strupr(userdat); ! 678: if(strstr(userdat,search)) { ! 679: outchar(7); ! 680: close(file); ! 681: return(i); } ! 682: i--; } ! 683: close(file); ! 684: return(usernum); ! 685: } ! 686: ! 687: /****************************************************************************/ ! 688: /* This function view/edits the users main default settings. */ ! 689: /****************************************************************************/ ! 690: void maindflts(user_t user) ! 691: { ! 692: char str[256],ch; ! 693: int i; ! 694: ! 695: action=NODE_DFLT; ! 696: while(online) { ! 697: CLS; ! 698: /* ! 699: if(user.number==useron.number && useron.rest&FLAG('G')) /* Guest */ ! 700: user=useron; ! 701: else ! 702: */ ! 703: getuserdat(&user); ! 704: if(user.rows) ! 705: rows=user.rows; ! 706: bprintf(text[UserDefaultsHdr],user.alias,user.number); ! 707: sprintf(str,"%s%s%s%s%s" ! 708: ,user.misc&AUTOTERM ? "Auto Detect ":nulstr ! 709: ,user.misc&ANSI ? "ANSI ":"TTY " ! 710: ,user.misc&COLOR ? "(Color) ":"(Mono) " ! 711: ,user.misc&WIP ? "WIP" : user.misc&RIP ? "RIP " ! 712: :nulstr ! 713: ,user.misc&NO_EXASCII ? "ASCII Only":nulstr); ! 714: bprintf(text[UserDefaultsTerminal],str); ! 715: if(total_xedits) ! 716: bprintf(text[UserDefaultsXeditor] ! 717: ,user.xedit ? xedit[user.xedit-1]->name : "None"); ! 718: if(user.rows) ! 719: itoa(user.rows,tmp,10); ! 720: else ! 721: sprintf(tmp,"Auto Detect (%d)",rows); ! 722: bprintf(text[UserDefaultsRows],tmp); ! 723: if(total_shells>1) ! 724: bprintf(text[UserDefaultsCommandSet] ! 725: ,shell[user.shell]->name); ! 726: bprintf(text[UserDefaultsArcType] ! 727: ,user.tmpext); ! 728: bprintf(text[UserDefaultsMenuMode] ! 729: ,user.misc&EXPERT ? text[On] : text[Off]); ! 730: bprintf(text[UserDefaultsPause] ! 731: ,user.misc&UPAUSE ? text[On] : text[Off]); ! 732: bprintf(text[UserDefaultsHotKey] ! 733: ,user.misc&COLDKEYS ? text[Off] : text[On]); ! 734: bprintf(text[UserDefaultsCursor] ! 735: ,user.misc&SPIN ? text[On] : text[Off]); ! 736: bprintf(text[UserDefaultsCLS] ! 737: ,user.misc&CLRSCRN ? text[On] : text[Off]); ! 738: bprintf(text[UserDefaultsAskNScan] ! 739: ,user.misc&ASK_NSCAN ? text[On] : text[Off]); ! 740: bprintf(text[UserDefaultsAskSScan] ! 741: ,user.misc&ASK_SSCAN ? text[On] : text[Off]); ! 742: bprintf(text[UserDefaultsANFS] ! 743: ,user.misc&ANFSCAN ? text[On] : text[Off]); ! 744: bprintf(text[UserDefaultsRemember] ! 745: ,user.misc&CURSUB ? text[On] : text[Off]); ! 746: bprintf(text[UserDefaultsBatFlag] ! 747: ,user.misc&BATCHFLAG ? text[On] : text[Off]); ! 748: if(sys_misc&SM_FWDTONET) ! 749: bprintf(text[UserDefaultsNetMail] ! 750: ,user.misc&NETMAIL ? text[On] : text[Off]); ! 751: if(useron.exempt&FLAG('Q') || user.misc&QUIET) ! 752: bprintf(text[UserDefaultsQuiet] ! 753: ,user.misc&QUIET ? text[On] : text[Off]); ! 754: if(user.prot!=SP) ! 755: sprintf(str,"%c",user.prot); ! 756: else ! 757: strcpy(str,"None"); ! 758: bprintf(text[UserDefaultsProtocol],str ! 759: ,user.misc&AUTOHANG ? "(Hang-up After Xfer)":nulstr); ! 760: if(sys_misc&SM_PWEDIT && !(user.rest&FLAG('G'))) ! 761: bputs(text[UserDefaultsPassword]); ! 762: ! 763: ASYNC; ! 764: bputs(text[UserDefaultsWhich]); ! 765: strcpy(str,"HTBALPRSYFNCQXZ\r"); ! 766: if(sys_misc&SM_PWEDIT && !(user.rest&FLAG('G'))) ! 767: strcat(str,"W"); ! 768: if(useron.exempt&FLAG('Q') || user.misc&QUIET) ! 769: strcat(str,"D"); ! 770: if(total_xedits) ! 771: strcat(str,"E"); ! 772: if(sys_misc&SM_FWDTONET) ! 773: strcat(str,"M"); ! 774: if(total_shells>1) ! 775: strcat(str,"K"); ! 776: ch=getkeys(str,0); ! 777: switch(ch) { ! 778: case 'T': ! 779: if(yesno(text[AutoTerminalQ])) { ! 780: user.misc|=AUTOTERM; ! 781: user.misc&=~(ANSI|RIP|WIP); ! 782: user.misc|=autoterm; } ! 783: else ! 784: user.misc&=~AUTOTERM; ! 785: if(!(user.misc&AUTOTERM)) { ! 786: if(yesno(text[AnsiTerminalQ])) ! 787: user.misc|=ANSI; ! 788: else ! 789: user.misc&=~(ANSI|COLOR); } ! 790: if(user.misc&ANSI) { ! 791: if(yesno(text[ColorTerminalQ])) ! 792: user.misc|=COLOR; ! 793: else ! 794: user.misc&=~COLOR; } ! 795: if(!yesno(text[ExAsciiTerminalQ])) ! 796: user.misc|=NO_EXASCII; ! 797: else ! 798: user.misc&=~NO_EXASCII; ! 799: if(!(user.misc&AUTOTERM)) { ! 800: if(!noyes(text[RipTerminalQ])) ! 801: user.misc|=RIP; ! 802: else ! 803: user.misc&=~RIP; } ! 804: putuserrec(user.number,U_MISC,8,ultoa(user.misc,str,16)); ! 805: break; ! 806: case 'B': ! 807: user.misc^=BATCHFLAG; ! 808: putuserrec(user.number,U_MISC,8,ultoa(user.misc,str,16)); ! 809: break; ! 810: case 'E': ! 811: if(noyes("Use an external editor")) { ! 812: putuserrec(user.number,U_XEDIT,8,nulstr); ! 813: break; } ! 814: if(user.xedit) ! 815: user.xedit--; ! 816: for(i=0;i<total_xedits;i++) ! 817: uselect(1,i,"External Editor",xedit[i]->name,xedit[i]->ar); ! 818: if((i=uselect(0,user.xedit,0,0,0))>=0) ! 819: putuserrec(user.number,U_XEDIT,8,xedit[i]->code); ! 820: break; ! 821: case 'K': /* Command shell */ ! 822: for(i=0;i<total_shells;i++) ! 823: uselect(1,i,"Command Shell",shell[i]->name,shell[i]->ar); ! 824: if((i=uselect(0,user.shell,0,0,0))>=0) ! 825: putuserrec(user.number,U_SHELL,8,shell[i]->code); ! 826: break; ! 827: case 'A': ! 828: for(i=0;i<total_fcomps;i++) ! 829: uselect(1,i,"Archive Type",fcomp[i]->ext,fcomp[i]->ar); ! 830: if((i=uselect(0,0,0,0,0))>=0) ! 831: putuserrec(user.number,U_TMPEXT,3,fcomp[i]->ext); ! 832: break; ! 833: case 'L': ! 834: bputs(text[HowManyRows]); ! 835: if((ch=getnum(99))!=-1) ! 836: putuserrec(user.number,U_ROWS,2,itoa(ch,tmp,10)); ! 837: break; ! 838: case 'P': ! 839: user.misc^=UPAUSE; ! 840: putuserrec(user.number,U_MISC,8,ultoa(user.misc,str,16)); ! 841: break; ! 842: case 'H': ! 843: user.misc^=COLDKEYS; ! 844: putuserrec(user.number,U_MISC,8,ultoa(user.misc,str,16)); ! 845: break; ! 846: case 'S': ! 847: user.misc^=SPIN; ! 848: putuserrec(user.number,U_MISC,8,ultoa(user.misc,str,16)); ! 849: break; ! 850: case 'F': ! 851: user.misc^=ANFSCAN; ! 852: putuserrec(user.number,U_MISC,8,ultoa(user.misc,str,16)); ! 853: break; ! 854: case 'X': ! 855: user.misc^=EXPERT; ! 856: putuserrec(user.number,U_MISC,8,ultoa(user.misc,str,16)); ! 857: break; ! 858: case 'R': /* Remember current sub/dir */ ! 859: user.misc^=CURSUB; ! 860: putuserrec(user.number,U_MISC,8,ultoa(user.misc,str,16)); ! 861: break; ! 862: case 'Y': /* Prompt for scanning message to you */ ! 863: user.misc^=ASK_SSCAN; ! 864: putuserrec(user.number,U_MISC,8,ultoa(user.misc,str,16)); ! 865: break; ! 866: case 'N': /* Prompt for new message/files scanning */ ! 867: user.misc^=ASK_NSCAN; ! 868: putuserrec(user.number,U_MISC,8,ultoa(user.misc,str,16)); ! 869: break; ! 870: case 'M': /* NetMail address */ ! 871: if(noyes(text[ForwardMailQ])) ! 872: user.misc&=~NETMAIL; ! 873: else { ! 874: user.misc|=NETMAIL; ! 875: bputs(text[EnterNetMailAddress]); ! 876: if(!getstr(user.netmail,LEN_NETMAIL,K_EDIT|K_AUTODEL|K_LINE)) ! 877: break; ! 878: putuserrec(user.number,U_NETMAIL,LEN_NETMAIL,user.netmail); } ! 879: putuserrec(user.number,U_MISC,8,ultoa(user.misc,str,16)); ! 880: break; ! 881: case 'C': ! 882: user.misc^=CLRSCRN; ! 883: putuserrec(user.number,U_MISC,8,ultoa(user.misc,str,16)); ! 884: break; ! 885: case 'D': ! 886: user.misc^=QUIET; ! 887: putuserrec(user.number,U_MISC,8,ultoa(user.misc,str,16)); ! 888: break; ! 889: case 'W': ! 890: if(noyes(text[NewPasswordQ])) ! 891: break; ! 892: bputs(text[CurrentPassword]); ! 893: console|=CON_R_ECHOX; ! 894: if(!(sys_misc&SM_ECHO_PW)) ! 895: console|=CON_L_ECHOX; ! 896: ch=getstr(str,LEN_PASS,K_UPPER); ! 897: console&=~(CON_R_ECHOX|CON_L_ECHOX); ! 898: if(strcmp(str,user.pass)) { ! 899: bputs(text[WrongPassword]); ! 900: pause(); ! 901: break; } ! 902: bputs(text[NewPassword]); ! 903: if(!getstr(str,LEN_PASS,K_UPPER|K_LINE)) ! 904: break; ! 905: truncsp(str); ! 906: if(!chkpass(str,user)) { ! 907: CRLF; ! 908: pause(); ! 909: break; } ! 910: bputs(text[VerifyPassword]); ! 911: console|=CON_R_ECHOX; ! 912: if(!(sys_misc&SM_ECHO_PW)) ! 913: console|=CON_L_ECHOX; ! 914: getstr(tmp,LEN_PASS,K_UPPER); ! 915: console&=~(CON_R_ECHOX|CON_L_ECHOX); ! 916: if(strcmp(str,tmp)) { ! 917: bputs(text[WrongPassword]); ! 918: pause(); ! 919: break; } ! 920: if(!online) ! 921: break; ! 922: putuserrec(user.number,U_PASS,LEN_PASS,str); ! 923: now=time(NULL); ! 924: putuserrec(user.number,U_PWMOD,8,ultoa(now,tmp,16)); ! 925: bputs(text[PasswordChanged]); ! 926: logline(nulstr,"Changed password"); ! 927: pause(); ! 928: break; ! 929: case 'Z': ! 930: menu("DLPROT"); ! 931: SYNC; ! 932: mnemonics(text[ProtocolOrQuit]); ! 933: strcpy(str,"Q"); ! 934: for(i=0;i<total_prots;i++) ! 935: if(prot[i]->dlcmd[0] && chk_ar(prot[i]->ar,useron)) { ! 936: sprintf(tmp,"%c",prot[i]->mnemonic); ! 937: strcat(str,tmp); } ! 938: ch=getkeys(str,0); ! 939: if(ch=='Q' || sys_status&SS_ABORT) { ! 940: ch=SP; ! 941: putuserrec(user.number,U_PROT,1,&ch); } ! 942: else ! 943: putuserrec(user.number,U_PROT,1,&ch); ! 944: if(yesno(text[HangUpAfterXferQ])) ! 945: user.misc|=AUTOHANG; ! 946: else ! 947: user.misc&=~AUTOHANG; ! 948: putuserrec(user.number,U_MISC,8,ultoa(user.misc,str,16)); ! 949: break; ! 950: default: ! 951: return; } } ! 952: } ! 953: ! 954: void purgeuser(int usernumber) ! 955: { ! 956: uchar str[128]; ! 957: user_t user; ! 958: ! 959: user.number=usernumber; ! 960: getuserdat(&user); ! 961: sprintf(str,"Purged %s #%u",user.alias,usernumber); ! 962: logentry("!*",str); ! 963: delallmail(usernumber); ! 964: putusername(usernumber,nulstr); ! 965: putuserrec(usernumber,U_MISC,8,ultoa(user.misc|DELETED,str,16)); ! 966: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.