Home | History | Annotate | Line # | Download | only in msgc
      1 /*	$NetBSD: msgdb.c,v 1.24 2019/06/20 00:45:18 christos 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.24 2019/06/20 00:45:18 christos 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 
     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 
     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
     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_printf(const char *fmt, ...) __printflike(1, 2);\n"
    166 		"void msg_display(msg msg_no);\n"
    167 		"void msg_fmt_display(msg msg_no, const char *fmt, ...)"
    168 			" __printflike(2, 3);\n"
    169 
    170 		"void msg_display_add(msg msg_no);\n"
    171 		"void msg_fmt_display_add(msg msg_no, const char *fmt, ...);\n"
    172 
    173 		"void msg_prompt(msg msg_no, const char *def,"
    174 			" char *val, size_t max_chars);\n"
    175 		"void msg_fmt_prompt(msg msg_no, const char *def,"
    176 			" char *val, size_t max_chars, const char *fmt, ...)"
    177 			" __printflike(5, 6);\n"
    178 
    179 		"void msg_prompt_add(msg msg_no, const char *def,"
    180 			" char *val, size_t max_chars);\n"
    181 		"void msg_fmt_prompt_add(msg msg_no, const char *def,"
    182 			" char *val, size_t max_chars, const char *fmt, ...)"
    183 			" __printflike(5, 6);\n"
    184 
    185 		"void msg_prompt_noecho(msg msg_no, const char *def,"
    186 			" char *val, size_t max_chars);\n"
    187 		"void msg_fmt_prompt_noecho(msg msg_no, const char *def,"
    188 			" char *val, size_t max_chars, const char *fmt, ...)"
    189 			" __printflike(5, 6);\n"
    190 
    191 		"void msg_prompt_win(msg msg_no, int x, int y, int w,"
    192 			" int h, const char *def, char *val,"
    193 			" size_t max_chars);\n"
    194 		"void msg_fmt_prompt_win(msg msg_no, int x, int y, int w,"
    195 			" int h, const char *def, char *val, size_t max_chars,"
    196 			" const char *fmt, ...)"
    197 			" __printflike(9, 10);\n"
    198 
    199 		"void msg_table_add(msg msg_no);"
    200 		"void msg_fmt_table_add(msg msg_no, const char *fmt, ...)"
    201 			" __printflike(2, 3);\n"
    202 
    203 		"int msg_row(void);\n"
    204 		"\n"
    205 		"/* Message names */\n"
    206 	      );
    207 	(void) fprintf (out_file, "#define MSG_NONE\tNULL\n");
    208 	for (t=head; t != NULL; t = t->next) {
    209 		(void) fprintf (out_file, "#define MSG_%s\t((msg)(long)%d)\n",
    210 				t->id, t->msg_no);
    211 	}
    212 	(void) fprintf (out_file, "\n#endif\n");
    213 
    214 	fclose (out_file);
    215 
    216 	/* Now the C file */
    217 	out_file = fopen (cname, "w");
    218 	if (out_file == NULL) {
    219 		(void) fprintf (stderr, "%s: could not open %s.\n",
    220 				prog_name, cname);
    221 		exit (1);
    222 	}
    223 
    224 	/* hfile include ... */
    225 	(void)fprintf (out_file, "#include \"%s\"\n", hname);
    226 
    227 	/* msg_list */
    228 	(void)fprintf (out_file, "const char *msg_list[] = {\nNULL,\n");
    229 	for (t=head ; t != NULL; t = t->next)
    230 		write_str (out_file, t->msg);
    231 	(void)fprintf (out_file, "NULL};\n");
    232 
    233 	/* sys file out! */
    234 	while ((ch = fgetc(sys_file)) != EOF)
    235 		fputc(ch, out_file);
    236 
    237 	fclose (out_file);
    238 	fclose (sys_file);
    239 }
    240