![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to execmsg.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Synchronet] / sbbs / sbbs2|
Return to execmsg.c CVS log | Up to [Synchronet] / sbbs / sbbs2 |
1.1 root 1: #line 1 "EXECMSG.C"
2:
3: /* Developed 1990-1997 by Rob Swindell; PO Box 501, Yorba Linda, CA 92885 */
4:
5: #include "sbbs.h"
6: #include "cmdshell.h"
7:
8: int execmsg(csi_t *csi)
9: {
10: uchar str[256],tmp2[128],*path,ch,*p;
11: int s,file,x,y;
12: long i,j,k; // Changes from ints - 03/25/96
13: long l;
14: stats_t stats;
15: node_t node;
16: file_t f;
17: time_t t;
18: csi_t bin;
19:
20:
21: switch(*(csi->ip++)) {
22:
23: case CS_MSG_SELECT_AREA:
24: csi->logic=LOGIC_FALSE;
25: if(!usrgrps) return(0);
26: while(online) {
27: j=0;
28: if(usrgrps>1) {
29: sprintf(str,"%sMENU\\GRPS.*",text_dir);
30: if(fexist(str))
31: menu("GRPS");
32: else {
33: bputs(text[CfgGrpLstHdr]);
34: for(i=0;i<usrgrps && !msgabort();i++) {
35: if(i==curgrp)
36: outchar('*');
37: else outchar(SP);
38: if(i<9) outchar(SP);
39: if(i<99) outchar(SP);
40: bprintf(text[CfgGrpLstFmt]
41: ,i+1,grp[usrgrp[i]]->lname); } }
42: sprintf(str,text[JoinWhichGrp],curgrp+1);
43: mnemonics(str);
44: j=getnum(usrgrps);
45: if((int)j==-1)
46: return(0);
47: if(!j)
48: j=curgrp;
49: else
50: j--; }
51: sprintf(str,"%sMENU\\SUBS%u.*",text_dir,usrgrp[j]+1);
52: if(fexist(str)) {
53: sprintf(str,"SUBS%u",usrgrp[j]+1);
54: menu(str); }
55: else {
56: CLS;
57: bprintf(text[SubLstHdr],grp[usrgrp[j]]->lname);
58: for(i=0;i<usrsubs[j] && !msgabort();i++) {
59: if(i==cursub[j]) outchar('*');
60: else outchar(SP);
61: sprintf(str,text[SubLstFmt],i+1
62: ,sub[usrsub[j][i]]->lname,nulstr
63: ,getposts(usrsub[j][i]));
64: if(i<9) outchar(SP);
65: if(i<99) outchar(SP);
66: bputs(str); } }
67: sprintf(str,text[JoinWhichSub],cursub[j]+1);
68: mnemonics(str);
69: i=getnum(usrsubs[j]);
70: if((int)i==-1) {
71: if(usrgrps==1)
72: return(0);
73: continue; }
74: if(!i)
75: i=cursub[j];
76: else
77: i--;
78: curgrp=j;
79: cursub[curgrp]=i;
80: csi->logic=LOGIC_TRUE;
81: return(0); }
82: return(0);
83:
84: case CS_MSG_GET_SUB_NUM:
85:
86: if(useron.misc&COLDKEYS) {
87: i=atoi(csi->str);
88: if(i && usrgrps && i<=usrsubs[curgrp])
89: cursub[curgrp]=i-1;
90: return(0); }
91:
92: ch=getkey(K_UPPER);
93: outchar(ch);
94: if(usrgrps && (ch&0xf)*10<=usrsubs[curgrp] && (ch&0xf)) {
95: i=(ch&0xf)*10;
96: ch=getkey(K_UPPER);
97: if(!isdigit(ch) && ch!=CR) {
98: ungetkey(ch);
99: cursub[curgrp]=(i/10)-1;
100: return(0); }
101: outchar(ch);
102: if(ch==CR) {
103: cursub[curgrp]=(i/10)-1;
104: return(0); }
105: logch(ch,0);
106: i+=ch&0xf;
107: if(i*10<=usrsubs[curgrp]) { /* 100+ subs */
108: i*=10;
109: ch=getkey(K_UPPER);
110: if(!isdigit(ch) && ch!=CR) {
111: ungetkey(ch);
112: cursub[curgrp]=(i/10)-1;
113: return(0); }
114: outchar(ch);
115: if(ch==CR) {
116: cursub[curgrp]=(i/10)-1;
117: return(0); }
118: logch(ch,0);
119: i+=ch&0xf; }
120: if(i<=usrsubs[curgrp])
121: cursub[curgrp]=i-1;
122: return(0); }
123: if((ch&0xf)<=usrsubs[curgrp] && (ch&0xf) && usrgrps)
124: cursub[curgrp]=(ch&0xf)-1;
125: return(0);
126:
127: case CS_MSG_GET_GRP_NUM:
128:
129: if(useron.misc&COLDKEYS) {
130: i=atoi(csi->str);
131: if(i && i<=usrgrps)
132: curgrp=i-1;
133: return(0); }
134:
135: ch=getkey(K_UPPER);
136: outchar(ch);
137: if((ch&0xf)*10<=usrgrps && (ch&0xf)) {
138: i=(ch&0xf)*10;
139: ch=getkey(K_UPPER);
140: if(!isdigit(ch) && ch!=CR) {
141: ungetkey(ch);
142: curgrp=(i/10)-1;
143: return(0); }
144: outchar(ch);
145: if(ch==CR) {
146: curgrp=(i/10)-1;
147: return(0); }
148: logch(ch,0);
149: i+=ch&0xf;
150: if(i<=usrgrps)
151: curgrp=i-1;
152: return(0); }
153: if((ch&0xf)<=usrgrps && (ch&0xf))
154: curgrp=(ch&0xf)-1;
155: return(0);
156:
157: case CS_MSG_SET_GROUP:
158: csi->logic=LOGIC_TRUE;
159: for(i=0;i<usrgrps;i++)
160: if(!stricmp(grp[usrgrp[i]]->sname,csi->str))
161: break;
162: if(i<usrgrps)
163: curgrp=i;
164: else
165: csi->logic=LOGIC_FALSE;
166: return(0);
167:
168: case CS_MSG_SHOW_GROUPS:
169: if(!usrgrps) return(0);
170: sprintf(str,"%sMENU\\GRPS.*",text_dir);
171: if(fexist(str)) {
172: menu("GRPS");
173: return(0); }
174: bputs(text[GrpLstHdr]);
175: for(i=0;i<usrgrps && !msgabort();i++) {
176: if(i==curgrp)
177: outchar('*');
178: else outchar(SP);
179: if(i<9) outchar(SP);
180: bprintf(text[GrpLstFmt],i+1
181: ,grp[usrgrp[i]]->lname,nulstr,usrsubs[i]); }
182: return(0);
183:
184: case CS_MSG_SHOW_SUBBOARDS:
185: if(!usrgrps) return(0);
186: sprintf(str,"%sMENU\\SUBS%u.*",text_dir,usrgrp[curgrp]+1);
187: if(fexist(str)) {
188: sprintf(str,"SUBS%u",usrgrp[curgrp]+1);
189: menu(str);
190: return(0); }
191: CRLF;
192: bprintf(text[SubLstHdr],grp[usrgrp[curgrp]]->lname);
193: for(i=0;i<usrsubs[curgrp] && !msgabort();i++) {
194: if(i==cursub[curgrp]) outchar('*');
195: else outchar(SP);
196: sprintf(str,text[SubLstFmt],i+1
197: ,sub[usrsub[curgrp][i]]->lname,nulstr
198: ,getposts(usrsub[curgrp][i]));
199: if(i<9) outchar(SP);
200: if(i<99) outchar(SP);
201: bputs(str); }
202: return(0);
203:
204: case CS_MSG_GROUP_UP:
205: curgrp++;
206: if(curgrp>=usrgrps)
207: curgrp=0;
208: return(0);
209: case CS_MSG_GROUP_DOWN:
210: if(!curgrp)
211: curgrp=usrgrps-1;
212: else curgrp--;
213: return(0);
214: case CS_MSG_SUBBOARD_UP:
215: if(!usrgrps) return(0);
216: cursub[curgrp]++;
217: if(cursub[curgrp]>=usrsubs[curgrp])
218: cursub[curgrp]=0;
219: return(0);
220: case CS_MSG_SUBBOARD_DOWN:
221: if(!usrgrps) return(0);
222: if(!cursub[curgrp])
223: cursub[curgrp]=usrsubs[curgrp]-1;
224: else cursub[curgrp]--;
225: return(0);
226: case CS_MSG_SET_AREA:
227: csi->logic=LOGIC_TRUE;
228: for(i=0;i<usrgrps;i++)
229: for(j=0;j<usrsubs[i];j++)
230: if(!stricmp(csi->str,sub[usrsub[i][j]]->code)) {
231: curgrp=i;
232: cursub[i]=j;
233: return(0); }
234: csi->logic=LOGIC_FALSE;
235: return(0);
236: case CS_MSG_READ:
237: if(!usrgrps) return(0);
238: csi->logic=scanposts(usrsub[curgrp][cursub[curgrp]],0,nulstr);
239: return(0);
240: case CS_MSG_POST:
241: if(!usrgrps) return(0);
242: csi->logic=LOGIC_FALSE;
243: if(!chk_ar(sub[usrsub[curgrp][cursub[curgrp]]]->post_ar,useron)) {
244: bputs(text[CantPostOnSub]);
245: return(0); }
246: csi->logic=!postmsg(usrsub[curgrp][cursub[curgrp]],0,0);
247: return(0);
248: case CS_MSG_QWK:
249: qwk_sec();
250: return(0);
251: case CS_MSG_PTRS_CFG:
252: new_scan_ptr_cfg();
253: return(0);
254: case CS_MSG_PTRS_REINIT:
255: for(i=0;i<total_subs;i++) {
256: sub[i]->ptr=sub_ptr[i];
257: sub[i]->last=sub_last[i]; }
258: bputs(text[MsgPtrsInitialized]);
259: return(0);
260: case CS_MSG_NEW_SCAN_CFG:
261: new_scan_cfg(SUB_NSCAN);
262: return(0);
263: case CS_MSG_NEW_SCAN:
264: scansubs(SCAN_NEW);
265: return(0);
266: case CS_MSG_NEW_SCAN_SUB:
267: csi->logic=scanposts(usrsub[curgrp][cursub[curgrp]],SCAN_NEW,nulstr);
268: return(0);
269: case CS_MSG_NEW_SCAN_ALL:
270: scanallsubs(SCAN_NEW);
271: return(0);
272: case CS_MSG_CONT_SCAN:
273: scansubs(SCAN_NEW|SCAN_CONST);
274: return(0);
275: case CS_MSG_CONT_SCAN_ALL:
276: scanallsubs(SCAN_NEW|SCAN_CONST);
277: return(0);
278: case CS_MSG_BROWSE_SCAN:
279: scansubs(SCAN_NEW|SCAN_BACK);
280: return(0);
281: case CS_MSG_BROWSE_SCAN_ALL:
282: scanallsubs(SCAN_BACK|SCAN_NEW);
283: return(0);
284: case CS_MSG_FIND_TEXT:
285: scansubs(SCAN_FIND);
286: return(0);
287: case CS_MSG_FIND_TEXT_ALL:
288: scanallsubs(SCAN_FIND);
289: return(0);
290: case CS_MSG_YOUR_SCAN_CFG:
291: new_scan_cfg(SUB_SSCAN);
292: return(0);
293: case CS_MSG_YOUR_SCAN:
294: scansubs(SCAN_TOYOU);
295: return(0);
296: case CS_MSG_YOUR_SCAN_ALL:
297: scanallsubs(SCAN_TOYOU);
298: return(0); }
299: errormsg(WHERE,ERR_CHK,"shell function",*(csi->ip-1));
300: return(0);
301: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.