![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to textgen.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Synchronet] / sbbs / src / sbbs3|
Return to textgen.c CVS log | Up to [Synchronet] / sbbs / src / sbbs3 |
1.1 root 1: #include <ctype.h>
2: #include <stdio.h>
3: #include <stdlib.h>
4: #include <string.h>
5: #include "gen_defs.h"
6:
7: /****************************************************************************/
8: /* Converts an ASCII Hex string into an ulong */
9: /* by Steve Deppe (Ille Homine Albe) */
10: /****************************************************************************/
11: /* Copied from str_util.c */
12: ulong ahtoul(char *str)
13: {
14: ulong l,val=0;
15:
16: while((l=(*str++)|0x20)!=0x20)
17: val=(l&0xf)+(l>>6&1)*9+val*16;
18: return(val);
19: }
20:
21: /****************************************************************************/
22: /* Reads special TEXT.DAT printf style text lines, splicing multiple lines, */
23: /* replacing escaped characters, and allocating the memory */
24: /****************************************************************************/
25: /* Copied from load_cfg.c with comment pointer added */
26: char *readtext(FILE *stream, char **comment_ret)
27: {
28: char buf[2048],str[2048],tmp[256],*p,*p2;
29: char comment[2048], *cp;
30: int i,j,k;
31:
32: if(!fgets(buf,256,stream))
33: return(NULL);
34: if(buf[0]=='#')
35: return(NULL);
36: p=strrchr(buf,'"');
37: if(!p) {
38: return(NULL);
39: }
40: comment[0]=0;
41: if(*(p+1)=='\\') { /* merge multiple lines */
42: for(cp=p+2; *cp && isspace(*cp); cp++);
43: strcat(comment, cp);
44: while(strlen(buf)<2000) {
45: if(!fgets(str,255,stream))
46: return(NULL);
47: p2=strchr(str,'"');
48: if(!p2)
49: continue;
50: strcpy(p,p2+1);
51: p=strrchr(p,'"');
52: if(p && *(p+1)=='\\') {
53: for(cp=p+2; *cp && isspace(*cp); cp++);
54: strcat(comment, cp);
55: continue;
56: }
57: break;
58: }
59: }
60: for(cp=p+2; *cp && isspace(*cp); cp++);
61: strcat(comment, cp);
62: cp=strchr(comment, 0);
63: if(cp && cp > comment) {
64: cp--;
65: while(cp > comment && isspace(*cp)) {
66: *(cp--)=0;
67: }
68: }
69:
70: *(p)=0;
71: k=strlen(buf);
72: for(i=1,j=0;i<k;j++) {
73: if(buf[i]=='\\') { /* escape */
74: i++;
75: if(isdigit(buf[i])) {
76: str[j]=atoi(buf+i); /* decimal, NOT octal */
77: if(isdigit(buf[++i])) /* skip up to 3 digits */
78: if(isdigit(buf[++i]))
79: i++;
80: continue;
81: }
82: switch(buf[i++]) {
83: case '\\':
84: str[j]='\\';
85: break;
86: case '?':
87: str[j]='?';
88: break;
89: case 'x':
90: tmp[0]=buf[i++]; /* skip next character */
91: tmp[1]=0;
92: if(isxdigit(buf[i])) { /* if another hex digit, skip too */
93: tmp[1]=buf[i++];
94: tmp[2]=0;
95: }
96: str[j]=(char)ahtoul(tmp);
97: break;
98: case '\'':
99: str[j]='\'';
100: break;
101: case '"':
102: str[j]='"';
103: break;
104: case 'r':
105: str[j]=CR;
106: break;
107: case 'n':
108: str[j]=LF;
109: break;
110: case 't':
111: str[j]=TAB;
112: break;
113: case 'b':
114: str[j]=BS;
115: break;
116: case 'a':
117: str[j]=BEL;
118: break;
119: case 'f':
120: str[j]=FF;
121: break;
122: case 'v':
123: str[j]=11; /* VT */
124: break;
125: default:
126: str[j]=buf[i];
127: break;
128: }
129: continue;
130: }
131: str[j]=buf[i++];
132: }
133: str[j]=0;
134: if((p=(char *)calloc(1,j+2))==NULL) { /* +1 for terminator, +1 for YNQX line */
135: fprintf(stderr,"Error allocating %u bytes of memory from text.dat",j);
136: return(NULL);
137: }
138: strcpy(p,str);
139: if(comment_ret)
140: *comment_ret=strdup(comment);
141: return(p);
142: }
143:
144: char *format_as_cstr(char *orig)
145: {
146: int len=0;
147: char *ret=NULL;
148: char *in;
149: char hex[32];
150: int outpos=0;
151:
152: len=strlen(orig);
153: len += ((len / 32)*2);
154: len *= 6;
155: len += 32; /* Only needs to be three, the extra is for luck ;-) */
156:
157: ret=(char *)malloc(len);
158: if(ret==NULL)
159: return(ret);
160: strcpy(ret,"\"");
161: for(in=orig; *in; in++) {
162: sprintf(hex, "\\x%02x", (unsigned char)*in);
163: strcat(ret,hex);
164: if((++outpos)%32==0)
165: strcat(ret,"\"\n\t\t\"");
166: }
167: strcat(ret, "\"");
168: return(ret);
169: }
170:
171: int main(int argc, char **argv)
172: {
173: FILE *text_dat;
174: char path[MAX_PATH+1];
175: char *p;
176: char *cstr;
177: char *comment;
178: char *macro;
179: unsigned long lno;
180: int i=0;
181: FILE *text_h;
182: FILE *text_js;
183: FILE *text_defaults_c;
184:
185: if((p=getenv("SBBSCTRL"))==NULL)
186: p="/sbbs/ctrl";
187: sprintf(path,"%s/text.dat",p);
188: if((text_dat=fopen(path,"r"))==NULL) {
189: perror(path);
190: return(1);
191: }
192: if((text_h=fopen("text.h", "w"))==NULL) {
193: perror("text.h");
194: return(1);
195: }
196: fputs("/* text.h */\n",text_h);
197: fputs("\n",text_h);
198: fputs("/* Synchronet static text string constants */\n",text_h);
199: fputs("\n",text_h);
200: fputs("/* $Id: textgen.c,v 1.5 2009/10/20 06:52:32 rswindell Exp $ */\n",text_h);
201: fputs("\n",text_h);
202: fputs("/****************************************************************************\n",text_h);
203: fputs(" * @format.tab-size 4 (Plain Text/Source Code File Header) *\n",text_h);
204: fputs(" * @format.use-tabs true (see http://www.synchro.net/ptsc_hdr.html) *\n",text_h);
205: fputs(" * *\n",text_h);
206: fputs(" * Copyright 2009 Rob Swindell - http://www.synchro.net/copyright.html *\n",text_h);
207: fputs(" * *\n",text_h);
208: fputs(" * This program is free software; you can redistribute it and/or *\n",text_h);
209: fputs(" * modify it under the terms of the GNU General Public License *\n",text_h);
210: fputs(" * as published by the Free Software Foundation; either version 2 *\n",text_h);
211: fputs(" * of the License, or (at your option) any later version. *\n",text_h);
212: fputs(" * See the GNU General Public License for more details: gpl.txt or *\n",text_h);
213: fputs(" * http://www.fsf.org/copyleft/gpl.html *\n",text_h);
214: fputs(" * *\n",text_h);
215: fputs(" * Anonymous FTP access to the most recent released source is available at *\n",text_h);
216: fputs(" * ftp://vert.synchro.net, ftp://cvs.synchro.net and ftp://ftp.synchro.net *\n",text_h);
217: fputs(" * *\n",text_h);
218: fputs(" * Anonymous CVS access to the development source and modification history *\n",text_h);
219: fputs(" * is available at cvs.synchro.net:/cvsroot/sbbs, example: *\n",text_h);
220: fputs(" * cvs -d :pserver:[email protected]:/cvsroot/sbbs login *\n",text_h);
221: fputs(" * (just hit return, no password is necessary) *\n",text_h);
222: fputs(" * cvs -d :pserver:[email protected]:/cvsroot/sbbs checkout src *\n",text_h);
223: fputs(" * *\n",text_h);
224: fputs(" * For Synchronet coding style and modification guidelines, see *\n",text_h);
225: fputs(" * http://www.synchro.net/source.html *\n",text_h);
226: fputs(" * *\n",text_h);
227: fputs(" * You are encouraged to submit any modifications (preferably in Unix diff *\n",text_h);
228: fputs(" * format) via e-mail to [email protected] *\n",text_h);
229: fputs(" * *\n",text_h);
230: fputs(" * Note: If this box doesn't appear square, then you need to fix your tabs. *\n",text_h);
231: fputs(" ****************************************************************************/\n",text_h);
232: fputs("\n",text_h);
233: fputs("/****************************************************************************/\n",text_h);
234: fputs("/* Macros for elements of the array of pointers (text[]) to static text */\n",text_h);
235: fputs("/* Auto-generated from CTRL\\TEXT.DAT */\n",text_h);
236: fputs("/****************************************************************************/\n",text_h);
237: fputs("\n",text_h);
238: fputs("#ifndef _TEXT_H\n",text_h);
239: fputs("#define _TEXT_H\n",text_h);
240: fputs("\n",text_h);
241: fputs("enum {\n",text_h);
242:
243: if((p=getenv("SBBSEXEC"))==NULL)
244: p="/sbbs/exec";
245: sprintf(path,"%s/load/text.js",p);
246: if((text_js=fopen(path, "w"))==NULL) {
247: perror(path);
248: return(1);
249: }
250: fputs("/* $Id: textgen.c,v 1.5 2009/10/20 06:52:32 rswindell Exp $ */\n",text_js);
251: fputs("\n",text_js);
252: fputs("/* Synchronet static text string constants */\n",text_js);
253: fputs("\n",text_js);
254: fputs("/* Automatically generated by textgen $ */\n",text_js);
255: fputs("\n",text_js);
256: fputs("/****************************************************************************/\n",text_js);
257: fputs("/* Values for elements of the array of pointers (bbs.text()) to static text */\n",text_js);
258: fputs("/* Auto-generated from ctrl/text.dat */\n",text_js);
259: fputs("/****************************************************************************/\n",text_js);
260: fputs("\n",text_js);
261: if((text_defaults_c=fopen("text_defaults.c","w"))==NULL) {
262: fprintf(stderr,"Can't open text_defaults.c!\n");
263: return(1);
264: }
265: fputs("/* $Id: textgen.c,v 1.5 2009/10/20 06:52:32 rswindell Exp $ */\n",text_defaults_c);
266: fputs("\n",text_defaults_c);
267: fputs("/* Synchronet default text strings */\n",text_defaults_c);
268: fputs("\n",text_defaults_c);
269: fputs("/* Automatically generated by textgen $ */\n",text_defaults_c);
270: fputs("\n",text_defaults_c);
271: fputs("#include \"text_defaults.h\"\n",text_defaults_c);
272: fputs("\n",text_defaults_c);
273: fputs("const char * const text_defaults[TOTAL_TEXT]={\n",text_defaults_c);
274: do {
275: i++;
276: p=readtext(text_dat, &comment);
277: if(p!=NULL) {
278: cstr=format_as_cstr(p);
279: if(cstr==NULL) {
280: fprintf(stderr,"Error creating C string! for %d\n", i+1);
281: }
282: lno=strtoul(comment, ¯o, 10);
283: while(isspace(*macro))
284: macro++;
285: if((int)lno != i) {
286: fprintf(stderr,"Mismatch! %s has %d... should be %d\n", comment, lno, i);
287: }
288: fprintf(text_h, "\t%c%s\n", i==1?' ':',', macro);
289: fprintf(text_js, "var %s=%d;\n", macro, i);
290: fprintf(text_defaults_c, "\t%c%s\n", i==1?' ':',', cstr);
291: }
292: } while(p != NULL);
293: fclose(text_dat);
294:
295: fputs("\n",text_h);
296: fputs("\t,TOTAL_TEXT\n",text_h);
297: fputs("};\n",text_h);
298: fputs("\n",text_h);
299: fputs("#endif\n",text_h);
300: fclose(text_h);
301: fputs("\n",text_h);
302: fprintf(text_h, "var TOTAL_TEXT=%d;\n",i);
303: fclose(text_js);
304: fputs("};\n",text_defaults_c);
305: fclose(text_defaults_c);
306:
307: return 0;
308: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.