1 /*        $NetBSD: util.c,v 1.6 2019/06/23 22:46:53 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 /* util.c - utility routines. */
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: util.c,v 1.6 2019/06/23 22:46:53 christos Exp $");
45 #endif
46 
47 #include <stdio.h>
48 #include <stdlib.h>
49 #include <string.h>
50 #include <stdarg.h>
51 #include "defs.h"
52 
53 /* Error routine */
54 void
yyerror(const char * fmt,...)55 yyerror(const char *fmt, ...)
56 {
57           va_list args;
58 
59           va_start(args, fmt);
60           printf("%s:%d: ", src_name, line_no);
61           vfprintf(stdout, fmt, args);
62           printf("\n");
63           va_end(args);
64           had_errors = TRUE;
65 }
66 
67 /* Buffer routines */
68 static char *mc_buff = NULL;
69 static int mc_size = 0;
70 static int mc_loc = 0;
71 
72 void
buff_add_ch(char ch)73 buff_add_ch(char ch)
74 {
75           char *t;
76 
77           if (mc_loc >= mc_size-1) {
78                     if (mc_size == 0)
79                               mc_size = 80;
80                     else
81                               mc_size *= 2;
82                     t = malloc(mc_size);
83                     if (t == NULL) {
84                               (void)fprintf(stderr, "%s:%d: Malloc error\n",
85                                                    src_name, line_no);
86                               exit(1);
87                     }
88                     if (mc_buff != NULL) {
89                               strcpy(t, mc_buff);
90                               free(mc_buff);
91                     }
92                     mc_buff = t;
93           }
94           mc_buff[mc_loc++] = ch;
95           mc_buff[mc_loc] = '\0';
96 }
97 
98 /* get a copy of the string ! */
99 char *
buff_copy(void)100 buff_copy(void)
101 {
102           char *res = strdup(mc_buff);
103 
104           mc_loc = 0;
105           mc_buff[0] = '\0';
106           return res;
107 }
108