prntfile.cpp 6.17 KB
Newer Older
1
2
3
4
5
6
7
8
9
10
/* prntfile.cpp */

/* Synchronet file print/display routines */

/* $Id$ */

/****************************************************************************
 * @format.tab-size 4		(Plain Text/Source Code File Header)			*
 * @format.use-tabs true	(see http://www.synchro.net/ptsc_hdr.html)		*
 *																			*
11
 * Copyright Rob Swindell - http://www.synchro.net/copyright.html			*
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
 *																			*
 * 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 2			*
 * of the License, or (at your option) any later version.					*
 * See the GNU General Public License for more details: gpl.txt or			*
 * http://www.fsf.org/copyleft/gpl.html										*
 *																			*
 * Anonymous FTP access to the most recent released source is available at	*
 * ftp://vert.synchro.net, ftp://cvs.synchro.net and ftp://ftp.synchro.net	*
 *																			*
 * Anonymous CVS access to the development source and modification history	*
 * is available at cvs.synchro.net:/cvsroot/sbbs, example:					*
 * cvs -d :pserver:anonymous@cvs.synchro.net:/cvsroot/sbbs login			*
 *     (just hit return, no password is necessary)							*
 * cvs -d :pserver:anonymous@cvs.synchro.net:/cvsroot/sbbs checkout src		*
 *																			*
 * For Synchronet coding style and modification guidelines, see				*
 * http://www.synchro.net/source.html										*
 *																			*
 * You are encouraged to submit any modifications (preferably in Unix diff	*
 * format) via e-mail to mods@synchro.net									*
 *																			*
 * Note: If this box doesn't appear square, then you need to fix your tabs.	*
 ****************************************************************************/

#include "sbbs.h"

/****************************************************************************/
/* Prints a file remotely and locally, interpreting ^A sequences, checks    */
/* for pauses, aborts and ANSI. 'str' is the path of the file to print      */
/* Called from functions menu and text_sec                                  */
/****************************************************************************/
void sbbs_t::printfile(char *str, long mode)
{
47
48
	char* buf;
	char* p;
rswindell's avatar
rswindell committed
49
50
	int file;
	BOOL wip=FALSE,rip=FALSE,html=FALSE;
rswindell's avatar
rswindell committed
51
	long l,length,savcon=console;
52
53
	FILE *stream;

54
55
	p=strrchr(str,'.');
	if(p!=NULL) {
rswindell's avatar
rswindell committed
56
		if(stricmp(p,".wip")==0) {
rswindell's avatar
rswindell committed
57
			wip=TRUE;
rswindell's avatar
rswindell committed
58
59
60
			mode|=P_NOPAUSE;
		}
		else if(stricmp(p,".rip")==0) {
rswindell's avatar
rswindell committed
61
			rip=TRUE;
rswindell's avatar
rswindell committed
62
63
64
			mode|=P_NOPAUSE;
		}
		else if(stricmp(p,".html")==0)  {
rswindell's avatar
rswindell committed
65
			html=TRUE;
rswindell's avatar
rswindell committed
66
67
			mode|=(P_HTML|P_NOPAUSE);
		}
68
	}
69

rswindell's avatar
rswindell committed
70
	if(mode&P_NOABORT || wip || rip || html) {
71
72
		if(online==ON_REMOTE && console&CON_R_ECHO) {
			rioctl(IOCM|ABORT);
rswindell's avatar
rswindell committed
73
74
75
76
			rioctl(IOCS|ABORT); 
		}
		sys_status&=~SS_ABORT; 
	}
77

78
	if(!(mode&P_NOCRLF) && !tos && !wip && !rip && !html) {
79
		CRLF;
80
	}
81

82
	if((stream=fnopen(&file,str,O_RDONLY|O_DENYNONE))==NULL) {
83
84
		lprintf(LOG_NOTICE,"Node %d !Error %d (%s) opening: %s"
			,cfg.node_num,errno,strerror(errno),str);
85
86
87
		bputs(text[FileNotFound]);
		if(SYSOP) bputs(str);
		CRLF;
rswindell's avatar
rswindell committed
88
89
		return; 
	}
90

91
	length=(long)filelength(file);
92
	if(length<0) {
rswindell's avatar
rswindell committed
93
		fclose(stream);
94
95
		errormsg(WHERE,ERR_CHK,str,length);
		return;
rswindell's avatar
rswindell committed
96
	}
deuce's avatar
deuce committed
97
	if((buf=(char*)malloc(length+1L))==NULL) {
rswindell's avatar
rswindell committed
98
		fclose(stream);
99
100
101
102
103
104
105
		errormsg(WHERE,ERR_ALLOC,str,length+1L);
		return; 
	}
	l=lread(file,buf,length);
	fclose(stream);
	if(l!=length)
		errormsg(WHERE,ERR_READ,str,length);
106
	else {
107
108
		buf[l]=0;
		putmsg(buf,mode);
rswindell's avatar
rswindell committed
109
	}
deuce's avatar
deuce committed
110
	free(buf); 
111

rswindell's avatar
rswindell committed
112
	if((mode&P_NOABORT || wip || rip || html) && online==ON_REMOTE) {
113
		SYNC;
rswindell's avatar
rswindell committed
114
115
		rioctl(IOSM|ABORT); 
	}
116
117
118
	if(rip)
		ansi_getlines();
	console=savcon;
rswindell's avatar
rswindell committed
119
}
120
121
122

void sbbs_t::printtail(char *str, int lines, long mode)
{
rswindell's avatar
rswindell committed
123
124
125
126
	char*	buf;
	char*	p;
	int		file,cur=0;
	long	length,l;
127
128
129
130

	if(mode&P_NOABORT) {
		if(online==ON_REMOTE) {
			rioctl(IOCM|ABORT);
rswindell's avatar
rswindell committed
131
132
133
134
			rioctl(IOCS|ABORT); 
		}
		sys_status&=~SS_ABORT; 
	}
135
	if(!tos) {
rswindell's avatar
rswindell committed
136
137
		CRLF; 
	}
138
	if((file=nopen(str,O_RDONLY|O_DENYNONE))==-1) {
139
140
		lprintf(LOG_NOTICE,"Node %d !Error %d (%s) opening: %s"
			,cfg.node_num,errno,strerror(errno),str);
141
142
143
		bputs(text[FileNotFound]);
		if(SYSOP) bputs(str);
		CRLF;
rswindell's avatar
rswindell committed
144
145
		return; 
	}
146
	length=(long)filelength(file);
rswindell's avatar
rswindell committed
147
148
149
150
151
	if(length<0) {
		close(file);
		errormsg(WHERE,ERR_CHK,str,length);
		return;
	}
deuce's avatar
deuce committed
152
	if((buf=(char*)malloc(length+1L))==NULL) {
153
154
		close(file);
		errormsg(WHERE,ERR_ALLOC,str,length+1L);
rswindell's avatar
rswindell committed
155
156
		return; 
	}
157
158
	l=lread(file,buf,length);
	close(file);
rswindell's avatar
rswindell committed
159
160
161
162
163
164
165
166
167
168
169
170
171
172
	if(l!=length)
		errormsg(WHERE,ERR_READ,str,length);
	else {
		buf[l]=0;
		p=(buf+l)-1;
		if(*p==LF) p--;
		while(*p && p>buf) {
			if(*p==LF)
				cur++;
			if(cur>=lines) {
				p++;
				break; 
			}
			p--; 
rswindell's avatar
rswindell committed
173
		}
rswindell's avatar
rswindell committed
174
		putmsg(p,mode);
rswindell's avatar
rswindell committed
175
	}
176
177
	if(mode&P_NOABORT && online==ON_REMOTE) {
		SYNC;
rswindell's avatar
rswindell committed
178
179
		rioctl(IOSM|ABORT); 
	}
deuce's avatar
deuce committed
180
	free(buf);
181
182
183
184
185
186
187
188
}

/****************************************************************************/
/* Prints the menu number 'menunum' from the text directory. Checks for ^A  */
/* ,ANSI sequences, pauses and aborts. Usually accessed by user inputing '?'*/
/* Called from every function that has an available menu.                   */
/* The code definitions are as follows:                                     */
/****************************************************************************/
189
void sbbs_t::menu(const char *code)
190
{
191
    char str[MAX_PATH-5],path[MAX_PATH+1];
192
193
194

	sys_status&=~SS_ABORT;
	if(menu_file[0])
195
		SAFECOPY(path,menu_file);
196
	else {
197
198
199
		if(isfullpath(code))
			SAFECOPY(str, code);
		else {
200
201
			backslash(menu_dir);
			SAFEPRINTF3(str, "%smenu/%s%s", cfg.text_dir, menu_dir, code);
rswindell's avatar
rswindell committed
202
		}
203
		sprintf(path,"%s.%s",str,term_supports(WIP) ? "wip": term_supports(RIP) ? "rip" : "html");
204
		if(!(term_supports()&(RIP|WIP|HTML)) || !fexistcase(path)) {
205
			SAFEPRINTF(path, "%s.mon", str);
206
			if((term_supports()&(COLOR|ANSI))!=ANSI || !fexistcase(path)) {
207
				SAFEPRINTF(path, "%s.ans", str);
208
				if(!term_supports(ANSI) || !fexistcase(path))
209
					SAFEPRINTF(path, "%s.asc", str); 
210
211
212
			} 
		} 
	}
213

214
215
216
217
	long mode = P_OPENCLOSE;
	if(column == 0)
		mode |= P_NOCRLF;
	printfile(path, mode);
218
219
}

220
221
222
223
224
225
bool sbbs_t::menu_exists(const char *code)
{
	char path[MAX_PATH+1];

	if(menu_file[0])
		return fexistcase(menu_file) ? true : false;
226

227
228
229
230
	backslash(menu_dir);
	SAFEPRINTF3(path, "%smenu/%s%s.asc", cfg.text_dir, menu_dir, code);
	return fexistcase(path) ? true : false;
}