![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to putmsg.cpp CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Synchronet] / sbbs / sbbs3|
Return to putmsg.cpp CVS log | Up to [Synchronet] / sbbs / sbbs3 |
1.1 root 1: /* putmsg.cpp */
2:
3: /* Synchronet message/menu display routine */
4:
5: /* $Id: putmsg.cpp,v 1.2 2000/11/07 04:28:59 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: /* Outputs a NULL terminated string locally and remotely (if applicable) */
42: /* checking for message aborts, pauses, ANSI escape and ^A sequences. */
43: /* Changes local text attributes if necessary. Max length of str is 4 gig */
44: /* Returns the last char of the buffer access.. 0 if not aborted. */
45: /* If P_SAVEATR bit is set in mode, the attributes set by the message */
46: /* will be the current attributes after the message is displayed, otherwise */
47: /* the attributes prior to diplaying the message are always restored. */
48: /* Ignores Ctrl-Z's */
49: /****************************************************************************/
50: char sbbs_t::putmsg(char HUGE16 *str, long mode)
51: {
52: char tmpatr,tmp2[256],tmp3[128];
53: uchar exatr=0;
54: int orgcon=console,i;
55: ulong l=0,sys_status_sav=sys_status;
56:
57: tmpatr=curatr; /* was lclatr(-1) */
58: if(!(mode&P_SAVEATR))
59: attr(LIGHTGRAY);
60: while(str[l] && (mode&P_NOABORT || !msgabort()) && online) {
61: if(str[l]==1) { /* Ctrl-Ax sequence */
62: if(str[l+1]=='"' && !(sys_status&SS_NEST_PF)) { /* Quote a file */
63: l+=2;
64: i=0;
65: while(i<12 && isprint(str[l]) && str[l]!='\\' && str[l]!='/')
66: tmp2[i++]=str[l++];
67: tmp2[i]=0;
68: sys_status|=SS_NEST_PF; /* keep it only one message deep! */
69: sprintf(tmp3,"%s%s",cfg.text_dir,tmp2);
70: printfile(tmp3,0);
71: sys_status&=~SS_NEST_PF; }
72: else if(toupper(str[l+1])=='Z') /* Ctrl-AZ==EOF */
73: break;
74: else {
75: ctrl_a(str[l+1]);
76: l+=2; } }
77: else if((str[l]=='`' || str[l]=='�') && str[l+1]=='[') {
78: outchar(ESC); /* Convert `[ and �[ to ESC[ */
79: l++; }
80: else if(cfg.sys_misc&SM_PCBOARD && str[l]=='@' && str[l+1]=='X'
81: && isxdigit(str[l+2]) && isxdigit(str[l+3])) {
82: sprintf(tmp2,"%.2s",str+l+2);
83: attr(ahtoul(tmp2));
84: exatr=1;
85: l+=4; }
86: else if(cfg.sys_misc&SM_WILDCAT && str[l]=='@' && str[l+3]=='@'
87: && isxdigit(str[l+1]) && isxdigit(str[l+2])) {
88: sprintf(tmp2,"%.2s",str+l+1);
89: attr(ahtoul(tmp2));
90: // exatr=1;
91: l+=4; }
92: else if(cfg.sys_misc&SM_RENEGADE && str[l]=='|' && isdigit(str[l+1])
93: && !(useron.misc&(RIP|WIP))) {
94: sprintf(tmp2,"%.2s",str+l+1);
95: i=atoi(tmp2);
96: if(i>=16) { /* setting background */
97: i-=16;
98: i<<=4;
99: i|=(curatr&0x0f); } /* leave foreground alone */
100: else
101: i|=(curatr&0xf0); /* leave background alone */
102: attr(i);
103: exatr=1;
104: l+=2; /* Skip |x */
105: if(isdigit(str[l]))
106: l++; } /* Skip second digit if it exists */
107: else if(cfg.sys_misc&SM_CELERITY && str[l]=='|' && isalpha(str[l+1])
108: && !(useron.misc&(RIP|WIP))) {
109: switch(str[l+1]) {
110: case 'k':
111: attr((curatr&0xf0)|BLACK);
112: break;
113: case 'b':
114: attr((curatr&0xf0)|BLUE);
115: break;
116: case 'g':
117: attr((curatr&0xf0)|GREEN);
118: break;
119: case 'c':
120: attr((curatr&0xf0)|CYAN);
121: break;
122: case 'r':
123: attr((curatr&0xf0)|RED);
124: break;
125: case 'm':
126: attr((curatr&0xf0)|MAGENTA);
127: break;
128: case 'y':
129: attr((curatr&0xf0)|YELLOW);
130: break;
131: case 'w':
132: attr((curatr&0xf0)|LIGHTGRAY);
133: break;
134: case 'd':
135: attr((curatr&0xf0)|BLACK|HIGH);
136: break;
137: case 'B':
138: attr((curatr&0xf0)|BLUE|HIGH);
139: break;
140: case 'G':
141: attr((curatr&0xf0)|GREEN|HIGH);
142: break;
143: case 'C':
144: attr((curatr&0xf0)|CYAN|HIGH);
145: break;
146: case 'R':
147: attr((curatr&0xf0)|RED|HIGH);
148: break;
149: case 'M':
150: attr((curatr&0xf0)|MAGENTA|HIGH);
151: break;
152: case 'Y': /* Yellow */
153: attr((curatr&0xf0)|YELLOW|HIGH);
154: break;
155: case 'W':
156: attr((curatr&0xf0)|LIGHTGRAY|HIGH);
157: break;
158: case 'S': /* swap foreground and background */
159: attr((curatr&0x07)<<4);
160: break; }
161: exatr=1;
162: l+=2; /* Skip |x */
163: } /* Skip second digit if it exists */
164: else if(cfg.sys_misc&SM_WWIV && str[l]==3 && isdigit(str[l+1])) {
165: exatr=1;
166: switch(str[l+1]) {
167: default:
168: attr(LIGHTGRAY);
169: break;
170: case '1':
171: attr(CYAN|HIGH);
172: break;
173: case '2':
174: attr(BROWN|HIGH);
175: break;
176: case '3':
177: attr(MAGENTA);
178: break;
179: case '4':
180: attr(LIGHTGRAY|HIGH|(BLUE<<4));
181: break;
182: case '5':
183: attr(GREEN);
184: break;
185: case '6':
186: attr(RED|HIGH|BLINK);
187: break;
188: case '7':
189: attr(BLUE|HIGH);
190: break;
191: case '8':
192: attr(BLUE);
193: break;
194: case '9':
195: attr(CYAN);
196: break; }
197: l+=2; }
198: else {
199: if(str[l]==LF) {
200: if(exatr) /* clear at newline for extra attr codes */
201: attr(LIGHTGRAY);
202: if(l && str[l-1]!=CR) /* convert sole LF to CR/LF */
203: outchar(CR);
204: }
205:
206: /* ansi escape sequence */
207: if(outchar_esc) {
208: if(str[l]=='A' || str[l]=='B' || str[l]=='H' || str[l]=='J'
209: || str[l]=='f' || str[l]=='u') /* ANSI anim */
210: lncntr=0; /* so defeat pause */
211: if(str[l]=='"') {
212: l++; /* don't pass on keyboard reassignment */
213: continue; } }
214: if(str[l]=='!' && str[l+1]=='|' && useron.misc&(RIP|WIP)) /* RIP */
215: lncntr=0; /* so defeat pause */
216: if(str[l]==ESC && str[l+1]=='$') /* WIP command */
217: lncntr=0;
218: if(str[l]=='@' && !(mode&P_NOATCODES)) {
219: i=atcodes((char *)str+l); /* returns 0 if not valid @ code */
220: l+=i; /* i is length of code string */
221: if(i) /* if valid string, go to top */
222: continue; }
223: if(str[l]!=26)
224: outchar(str[l]);
225: l++; } }
226: //curatr=lclatr(-1); 01/29/96
227: if(!(mode&P_SAVEATR)) {
228: console=orgcon;
229: attr(tmpatr); }
230:
231: /* Restore original settings of Forced Pause On/Off */
232: sys_status&=~(SS_PAUSEOFF|SS_PAUSEON);
233: sys_status|=(sys_status_sav&(SS_PAUSEOFF|SS_PAUSEON));
234: return(str[l]);
235: }
236:
237: /****************************************************************************/
238: /* Displays a text file to the screen, reading/display a block at time */
239: /****************************************************************************/
240: void sbbs_t::putmsg_fp(FILE *fp, long length, long mode)
241: {
242: char *buf,tmpatr;
243: int i,j,b=8192,orgcon=console;
244: long l;
245:
246: tmpatr=curatr; /* was lclatr(-1) */
247: if((buf=(char *)MALLOC(b+1))==NULL) {
248: errormsg(WHERE,ERR_ALLOC,nulstr,b+1L);
249: return; }
250: for(l=0;l<length;l+=b) {
251: if(l+b>length)
252: b=length-l;
253: i=j=fread(buf,1,b,fp);
254: if(!j) break; /* No bytes read */
255: if(l+i<length) /* Not last block */
256: while(i && buf[i-1]!=LF) i--; /* Search for last LF */
257: if(!i) i=j; /* None found */
258: buf[i]=0;
259: if(i<j)
260: fseek(fp,(long)-(j-i),SEEK_CUR);
261: b=i;
262: if(putmsg(buf,mode|P_SAVEATR))
263: break; }
264: if(!(mode&P_SAVEATR)) {
265: console=orgcon;
266: attr(tmpatr); }
267: FREE(buf);
268: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.