xref: /minix3/usr.bin/msgc/msgdb.c (revision d44a5ed1c177718aebe860f2bd736ea12fb19804)
1 /*	$NetBSD: msgdb.c,v 1.23 2012/03/06 16:26:01 mbalmer Exp $	*/
2 
3 /*
4  * Copyright 1997 Piermont Information Systems Inc.
5  * All rights reserved.
6  *
7  * Written by Philip A. Nelson for Piermont Information Systems Inc.
8  *
9  * Redistribution and use in source and binary forms, with or without
10  * modification, are permitted provided that the following conditions
11  * are met:
12  * 1. Redistributions of source code must retain the above copyright
13  *    notice, this list of conditions and the following disclaimer.
14  * 2. Redistributions in binary form must reproduce the above copyright
15  *    notice, this list of conditions and the following disclaimer in the
16  *    documentation and/or other materials provided with the distribution.
17  * 3. The name of Piermont Information Systems Inc. may not be used to endorse
18  *    or promote products derived from this software without specific prior
19  *    written permission.
20  *
21  * THIS SOFTWARE IS PROVIDED BY PIERMONT INFORMATION SYSTEMS INC. ``AS IS''
22  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24  * ARE DISCLAIMED. IN NO EVENT SHALL PIERMONT INFORMATION SYSTEMS INC. BE
25  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
26  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
27  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
28  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
29  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
30  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF
31  * THE POSSIBILITY OF SUCH DAMAGE.
32  *
33  */
34 
35 /* mdb.c - message database manipulation */
36 
37 #if HAVE_NBTOOL_CONFIG_H
38 #include "nbtool_config.h"
39 #endif
40 
41 #include <sys/cdefs.h>
42 
43 #if defined(__RCSID) && !defined(lint)
44 __RCSID("$NetBSD: msgdb.c,v 1.23 2012/03/06 16:26:01 mbalmer Exp $");
45 #endif
46 
47 
48 #include <stdio.h>
49 #include <stdlib.h>
50 #include <string.h>
51 
52 #include "defs.h"
53 #include "pathnames.h"
54 
55 static struct id_rec *head = NULL, *tail = NULL;
56 static int msg_no = 1;
57 
define_msg(char * name,char * value)58 void define_msg (char *name, char *value)
59 {
60 	struct id_rec *tmp = (struct id_rec *)malloc(sizeof(struct id_rec));
61 
62 	if (find_id (root, name))
63 		yyerror ("%s is defined twice", name);
64 
65 	tmp->id     = name;
66 	tmp->msg    = value;
67 	tmp->msg_no = msg_no++;
68 	tmp->next   = NULL;
69 	if (tail == NULL)
70 		head = tail = tmp;
71 	else {
72 		tail->next = tmp;
73 		tail = tmp;
74 	}
75 
76 	insert_id (&root, tmp);
77 }
78 
write_str(FILE * f,char * str)79 static void write_str (FILE *f, char *str)
80 {
81 	(void)fprintf (f, "\"");
82 	while (*str) {
83 		if (*str == '\n')
84 			(void) fprintf (f, "\\n\"\n\""), str++;
85 		else if (*str == '"')
86 			(void) fprintf (f, "\\\""), str++;
87 		else
88 			(void) fprintf (f, "%c", *str++);
89 	}
90 	(void)fprintf (f, "\",");
91 }
92 
93 /* Write out the msg files. */
94 void
write_msg_file()95 write_msg_file ()
96 {
97 	FILE *out_file;
98 	FILE *sys_file;
99 	char hname[1024];
100 	char cname[1024];
101 	char sname[1024];
102 	char *sys_prefix;
103 
104 	int nlen;
105 	int ch;
106 
107 	struct id_rec *t;
108 
109 	/* Generate file names */
110 	snprintf (hname, 1024, "%s.h", out_name);
111 	nlen = strlen(hname);
112 	if (hname[nlen-2] != '.' || hname[nlen-1] != 'h') {
113 		(void) fprintf (stderr, "%s: name `%s` too long.\n",
114 				prog_name, out_name);
115 		exit(1);
116 	}
117 	snprintf (cname, 1024, "%s.c", out_name);
118 
119 	/* Open the msg_sys file first. */
120 	sys_prefix = getenv ("MSGDEF");
121 	if (sys_prefix == NULL)
122 		sys_prefix = _PATH_DEFSYSPREFIX;
123 	snprintf (sname, 1024, "%s/%s", sys_prefix, sys_name);
124 	sys_file = fopen (sname, "r");
125 	if (sys_file == NULL) {
126 		(void) fprintf (stderr, "%s: could not open %s.\n",
127 				prog_name, sname);
128 		exit (1);
129 	}
130 
131 	/* Output the .h file first. */
132 	out_file = fopen (hname, "w");
133 	if (out_file == NULL) {
134 		(void) fprintf (stderr, "%s: could not open %s.\n",
135 				prog_name, hname);
136 		exit (1);
137 	}
138 
139 	/* Write it */
140 	(void) fprintf (out_file, "%s",
141 		"/* msg system definitions. */\n"
142 		"\n"
143 		"#ifndef MSG_DEFS_H\n"
144 		"#define MSG_DEFS_H\n"
145 		"#include <stdio.h>\n"
146 		"#include <stdlib.h>\n"
147 		"#include <unistd.h>\n"
148 		"#include <fcntl.h>\n"
149 		"#include <string.h>\n"
150 		"#include <ctype.h>\n"
151 		"#include <stdarg.h>\n"
152 		"#include <stdint.h>\n"
153 		"#include <curses.h>\n"
154 		"#include <sys/mman.h>\n"
155 		"\n"
156 		"typedef const char *msg;\n"
157 		"\n"
158 		"/* Prototypes */\n"
159 		"WINDOW *msg_window(WINDOW *window);\n"
160 		"const char *msg_string(msg msg_no);\n"
161 		"int msg_file(const char *);\n"
162 		"void msg_clear(void);\n"
163 		"void msg_standout(void);\n"
164 		"void msg_standend(void);\n"
165 		"void msg_display(msg msg_no,...);\n"
166 		"void msg_display_add(msg msg_no,...);\n"
167 		"void msg_printf(const char *fmt, ...) __printflike(1, 2);\n"
168 		"void msg_prompt (msg msg_no, const char *def,"
169 			" char *val, size_t max_chars, ...);\n"
170 		"void msg_prompt_add (msg msg_no, const char *def,"
171 			" char *val, size_t max_chars, ...);\n"
172 		"void msg_prompt_noecho (msg msg_no, const char *def,"
173 			" char *val, size_t max_chars, ...);\n"
174 		"void msg_prompt_win (msg, int, int, int, int,"
175 			" const char *, char *, size_t, ...);\n"
176 		"void msg_table_add(msg msg_no,...);\n"
177 		"int msg_row(void);\n"
178 		"\n"
179 		"/* Message names */\n"
180 	      );
181 	(void) fprintf (out_file, "#define MSG_NONE\tNULL\n");
182 	for (t=head; t != NULL; t = t->next) {
183 		(void) fprintf (out_file, "#define MSG_%s\t((msg)(long)%d)\n",
184 				t->id, t->msg_no);
185 	}
186 	(void) fprintf (out_file, "\n#endif\n");
187 
188 	fclose (out_file);
189 
190 	/* Now the C file */
191 	out_file = fopen (cname, "w");
192 	if (out_file == NULL) {
193 		(void) fprintf (stderr, "%s: could not open %s.\n",
194 				prog_name, cname);
195 		exit (1);
196 	}
197 
198 	/* hfile include ... */
199 	(void)fprintf (out_file, "#include \"%s\"\n", hname);
200 
201 	/* msg_list */
202 	(void)fprintf (out_file, "const char *msg_list[] = {\nNULL,\n");
203 	for (t=head ; t != NULL; t = t->next)
204 		write_str (out_file, t->msg);
205 	(void)fprintf (out_file, "NULL};\n");
206 
207 	/* sys file out! */
208 	while ((ch = fgetc(sys_file)) != EOF)
209 		fputc(ch, out_file);
210 
211 	fclose (out_file);
212 	fclose (sys_file);
213 }
214