prntfile.cpp 5.42 KB
Newer Older
1
2
3
4
5
6
7
8
9
10
11
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
/* 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)		*
 *																			*
 * Copyright 2000 Rob Swindell - http://www.synchro.net/copyright.html		*
 *																			*
 * 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;
49
50
51
52
	int file,wip=0,rip=0;
	long length,savcon=console;
	FILE *stream;

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

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

rswindell's avatar
rswindell committed
77
	if(!tos && !wip && !rip && !html)
78
79
80
		CRLF;

	if((stream=fnopen(&file,str,O_RDONLY))==NULL) {
81
		lprintf("File not found: %s",str);
82
83
84
		bputs(text[FileNotFound]);
		if(SYSOP) bputs(str);
		CRLF;
rswindell's avatar
rswindell committed
85
86
		return; 
	}
87
88
89
90
91
92
93

	if(mode&P_OPENCLOSE) {
		length=filelength(file);
		if((buf=(char*)MALLOC(length+1L))==NULL) {
			close(file);
			console=savcon;
			errormsg(WHERE,ERR_ALLOC,str,length+1L);
rswindell's avatar
rswindell committed
94
95
			return; 
		}
96
97
98
		buf[lread(file,buf,length)]=0;
		fclose(stream);
		putmsg(buf,mode);
rswindell's avatar
rswindell committed
99
100
		FREE((char *)buf); 
	}
101
102
	else {
		putmsg_fp(stream,filelength(file),mode);
rswindell's avatar
rswindell committed
103
104
105
		fclose(stream); 
	}
	if((mode&P_NOABORT || wip || rip || html) && online==ON_REMOTE) {
106
		SYNC;
rswindell's avatar
rswindell committed
107
108
		rioctl(IOSM|ABORT); 
	}
109
110
111
	if(rip)
		ansi_getlines();
	console=savcon;
rswindell's avatar
rswindell committed
112
}
113
114
115
116
117
118
119
120
121
122

void sbbs_t::printtail(char *str, int lines, long mode)
{
	char HUGE16 *buf,HUGE16 *p;
	int file,cur=0;
	ulong length,l;

	if(mode&P_NOABORT) {
		if(online==ON_REMOTE) {
			rioctl(IOCM|ABORT);
rswindell's avatar
rswindell committed
123
124
125
126
			rioctl(IOCS|ABORT); 
		}
		sys_status&=~SS_ABORT; 
	}
127
	if(!tos) {
rswindell's avatar
rswindell committed
128
129
		CRLF; 
	}
130
	if((file=nopen(str,O_RDONLY))==-1) {
131
		lprintf("File not found: %s",str);
132
133
134
		bputs(text[FileNotFound]);
		if(SYSOP) bputs(str);
		CRLF;
rswindell's avatar
rswindell committed
135
136
		return; 
	}
137
138
139
140
	length=filelength(file);
	if((buf=(char*)MALLOC(length+1L))==NULL) {
		close(file);
		errormsg(WHERE,ERR_ALLOC,str,length+1L);
rswindell's avatar
rswindell committed
141
142
		return; 
	}
143
144
145
146
147
148
149
150
151
152
	l=lread(file,buf,length);
	buf[l]=0;
	close(file);
	p=(buf+l)-1;
	if(*p==LF) p--;
	while(*p && p>buf) {
		if(*p==LF)
			cur++;
		if(cur>=lines) {
			p++;
rswindell's avatar
rswindell committed
153
154
155
156
			break; 
		}
		p--; 
	}
157
158
159
	putmsg(p,mode);
	if(mode&P_NOABORT && online==ON_REMOTE) {
		SYNC;
rswindell's avatar
rswindell committed
160
161
		rioctl(IOSM|ABORT); 
	}
162
163
164
165
166
167
168
169
170
171
172
	FREE((char *)buf);
}

/****************************************************************************/
/* 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:                                     */
/****************************************************************************/
void sbbs_t::menu(char *code)
{
173
    char str[MAX_PATH+1],path[MAX_PATH+1];
174
175
176
177
178

	sys_status&=~SS_ABORT;
	if(menu_file[0])
		strcpy(path,menu_file);
	else {
179
		sprintf(str,"%smenu/",cfg.text_dir);
180
181
		if(menu_dir[0]) {
			strcat(str,menu_dir);
rswindell's avatar
rswindell committed
182
183
			strcat(str,"/"); 
		}
184
185
		strcat(str,code);
		strcat(str,".");
rswindell's avatar
rswindell committed
186
187
		sprintf(path,"%s%s",str,useron.misc&WIP ? "wip": useron.misc&RIP ? "rip" : "html");
		if(!(useron.misc&(RIP|WIP|HTML)) || !fexistcase(path)) {
188
			sprintf(path,"%smon",str);
189
			if((useron.misc&(COLOR|ANSI))!=ANSI || !fexistcase(path)) {
190
				sprintf(path,"%sans",str);
191
192
193
194
195
				if(!(useron.misc&ANSI) || !fexistcase(path))
					sprintf(path,"%sasc",str); 
			} 
		} 
	}
196
197
198
199
200

	printfile(path,P_OPENCLOSE);
}