prntfile.cpp 6.53 KB
Newer Older
1
/* prntfile.cpp */
2
// vi: tabstop=4
3
4
5
6
7
8
9
10
11

/* 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)		*
 *																			*
12
 * Copyright Rob Swindell - http://www.synchro.net/copyright.html			*
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
 *																			*
 * 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                                  */
/****************************************************************************/
46
bool sbbs_t::printfile(const char* fname, long mode)
47
{
48
	char* buf;
49
	char fpath[MAX_PATH+1];
50
	char* p;
rswindell's avatar
rswindell committed
51
	int file;
52
	BOOL rip=FALSE;
rswindell's avatar
rswindell committed
53
	long l,length,savcon=console;
54
55
	FILE *stream;

56
57
58
	SAFECOPY(fpath, fname);
	fexistcase(fpath);
	p=getfext(fpath);
59
	if(p!=NULL) {
60
		if(stricmp(p,".rip")==0) {
rswindell's avatar
rswindell committed
61
			rip=TRUE;
rswindell's avatar
rswindell committed
62
			mode|=P_NOPAUSE;
63
64
		} else if(stricmp(p, ".seq") == 0) {
			mode |= P_PETSCII;
rswindell's avatar
rswindell committed
65
		}
66
	}
67

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

76
	if(!(mode&P_NOCRLF) && !tos && !rip) {
77
		CRLF;
78
	}
79

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

91
	length=(long)filelength(file);
92
	if(length<0) {
rswindell's avatar
rswindell committed
93
		fclose(stream);
94
		errormsg(WHERE,ERR_CHK,fpath,length);
95
		return false;
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
		errormsg(WHERE,ERR_ALLOC,fpath,length+1L);
100
		return false; 
101
102
103
104
	}
	l=lread(file,buf,length);
	fclose(stream);
	if(l!=length)
105
		errormsg(WHERE,ERR_READ,fpath,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

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

122
bool sbbs_t::printtail(const char* fname, int lines, long mode)
123
{
rswindell's avatar
rswindell committed
124
	char*	buf;
125
	char	fpath[MAX_PATH+1];
rswindell's avatar
rswindell committed
126
127
128
	char*	p;
	int		file,cur=0;
	long	length,l;
129

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

/****************************************************************************/
191
/* Displays a menu file (e.g. from the text/menu directory)                 */
192
/****************************************************************************/
193
bool sbbs_t::menu(const char *code, long mode)
194
{
195
196
197
    char path[MAX_PATH+1];
	const char *next= "msg";
	const char *last = "asc";
198
199
200

	sys_status&=~SS_ABORT;
	if(menu_file[0])
201
		SAFECOPY(path,menu_file);
202
	else {
rswindell's avatar
rswindell committed
203
		long term = term_supports();
204
205
206
207
208
209
210
211
212
213
214
215
		do {
			if((term&RIP) && menu_exists(code, "rip", path))
				break;
			if((term&(ANSI|COLOR)) == ANSI && menu_exists(code, "mon", path))
				break;
			if((term&ANSI) && menu_exists(code, "ans", path))
				break;
			if((term&PETSCII) && menu_exists(code, "seq", path))
				break;
			if(term&NO_EXASCII) {
				next = "asc";
				last = "msg";
rswindell's avatar
rswindell committed
216
			}
217
218
219
220
			if(menu_exists(code, next, path))
				break;
			menu_exists(code, last, path);
		} while(0);
221
	}
222

223
	mode |= P_OPENCLOSE | P_CPM_EOF;
224
225
	if(column == 0)
		mode |= P_NOCRLF;
226
	return printfile(path, mode);
227
228
}

229
bool sbbs_t::menu_exists(const char *code, const char* ext, char* path)
230
{
231
232
233
	char pathbuf[MAX_PATH+1];
	if(path == NULL)
		path = pathbuf;
234

235
236
237
238
239
240
241
242
243
	if(menu_file[0]) {
		strncpy(path, menu_file, MAX_PATH);
		return fexistcase(path) ? true : false;
	}

	/* Either <menu>.asc or <menu>.msg is required */
	if(ext == NULL)
		return menu_exists(code, "asc", path)
			|| menu_exists(code, "msg", path);
244

245
246
247
248
249
250
251
252
	char prefix[MAX_PATH];
	if(isfullpath(code))
		SAFECOPY(prefix, code);
	else {
		backslash(menu_dir);
		SAFEPRINTF3(prefix, "%smenu/%s%s", cfg.text_dir, menu_dir, code);
	}
	safe_snprintf(path, MAX_PATH, "%s.%ucol.%s", prefix, cols, ext);
rswindell's avatar
rswindell committed
253
254
	if(fexistcase(path))
		return true;
255
	safe_snprintf(path, MAX_PATH, "%s.%s", prefix, ext);
deuce's avatar
deuce committed
256
257
	return fexistcase(path) ? true : false;
}