Home | History | Annotate | Line # | Download | only in menuc 
      1  1.6  christos /*	$NetBSD: util.c,v 1.6 2019/06/23 22:46:53 christos Exp $	*/
      2  1.1      phil 
      3  1.1      phil /*
      4  1.1      phil  * Copyright 1997 Piermont Information Systems Inc.
      5  1.1      phil  * All rights reserved.
      6  1.1      phil  *
      7  1.1      phil  * Written by Philip A. Nelson for Piermont Information Systems Inc.
      8  1.1      phil  *
      9  1.1      phil  * Redistribution and use in source and binary forms, with or without
     10  1.1      phil  * modification, are permitted provided that the following conditions
     11  1.1      phil  * are met:
     12  1.1      phil  * 1. Redistributions of source code must retain the above copyright
     13  1.1      phil  *    notice, this list of conditions and the following disclaimer.
     14  1.1      phil  * 2. Redistributions in binary form must reproduce the above copyright
     15  1.1      phil  *    notice, this list of conditions and the following disclaimer in the
     16  1.1      phil  *    documentation and/or other materials provided with the distribution.
     17  1.5   mbalmer  * 3. The name of Piermont Information Systems Inc. may not be used to endorse
     18  1.1      phil  *    or promote products derived from this software without specific prior
     19  1.1      phil  *    written permission.
     20  1.1      phil  *
     21  1.1      phil  * THIS SOFTWARE IS PROVIDED BY PIERMONT INFORMATION SYSTEMS INC. ``AS IS''
     22  1.1      phil  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     23  1.1      phil  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     24  1.1      phil  * ARE DISCLAIMED. IN NO EVENT SHALL PIERMONT INFORMATION SYSTEMS INC. BE
     25  1.1      phil  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     26  1.1      phil  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     27  1.1      phil  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     28  1.1      phil  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     29  1.1      phil  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     30  1.1      phil  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF
     31  1.1      phil  * THE POSSIBILITY OF SUCH DAMAGE.
     32  1.1      phil  *
     33  1.1      phil  */
     34  1.1      phil 
     35  1.1      phil /* util.c - utility routines. */
     36  1.2       agc 
     37  1.4       jmc #if HAVE_NBTOOL_CONFIG_H
     38  1.4       jmc #include "nbtool_config.h"
     39  1.4       jmc #endif
     40  1.4       jmc 
     41  1.2       agc #include <sys/cdefs.h>
     42  1.2       agc 
     43  1.3     lukem #if defined(__RCSID) && !defined(lint)
     44  1.6  christos __RCSID("$NetBSD: util.c,v 1.6 2019/06/23 22:46:53 christos Exp $");
     45  1.2       agc #endif
     46  1.2       agc 
     47  1.1      phil #include <stdio.h>
     48  1.1      phil #include <stdlib.h>
     49  1.1      phil #include <string.h>
     50  1.1      phil #include <stdarg.h>
     51  1.1      phil #include "defs.h"
     52  1.1      phil 
     53  1.1      phil /* Error routine */
     54  1.1      phil void
     55  1.1      phil yyerror(const char *fmt, ...)
     56  1.1      phil {
     57  1.1      phil 	va_list args;
     58  1.1      phil 
     59  1.5   mbalmer 	va_start(args, fmt);
     60  1.5   mbalmer 	printf("%s:%d: ", src_name, line_no);
     61  1.5   mbalmer 	vfprintf(stdout, fmt, args);
     62  1.5   mbalmer 	printf("\n");
     63  1.5   mbalmer 	va_end(args);
     64  1.1      phil 	had_errors = TRUE;
     65  1.1      phil }
     66  1.1      phil 
     67  1.1      phil /* Buffer routines */
     68  1.1      phil static char *mc_buff = NULL;
     69  1.1      phil static int mc_size = 0;
     70  1.1      phil static int mc_loc = 0;
     71  1.1      phil 
     72  1.5   mbalmer void
     73  1.5   mbalmer buff_add_ch(char ch)
     74  1.1      phil {
     75  1.1      phil 	char *t;
     76  1.1      phil 
     77  1.1      phil 	if (mc_loc >= mc_size-1) {
     78  1.1      phil 		if (mc_size == 0)
     79  1.1      phil 			mc_size = 80;
     80  1.1      phil 		else
     81  1.1      phil 			mc_size *= 2;
     82  1.6  christos 		t = malloc(mc_size);
     83  1.1      phil 		if (t == NULL) {
     84  1.5   mbalmer 			(void)fprintf(stderr, "%s:%d: Malloc error\n",
     85  1.1      phil 					 src_name, line_no);
     86  1.5   mbalmer 			exit(1);
     87  1.1      phil 		}
     88  1.1      phil 		if (mc_buff != NULL) {
     89  1.5   mbalmer 			strcpy(t, mc_buff);
     90  1.5   mbalmer 			free(mc_buff);
     91  1.1      phil 		}
     92  1.1      phil 		mc_buff = t;
     93  1.1      phil 	}
     94  1.1      phil 	mc_buff[mc_loc++] = ch;
     95  1.1      phil 	mc_buff[mc_loc] = '\0';
     96  1.1      phil }
     97  1.1      phil 
     98  1.1      phil /* get a copy of the string ! */
     99  1.1      phil char *
    100  1.5   mbalmer buff_copy(void)
    101  1.1      phil {
    102  1.5   mbalmer 	char *res = strdup(mc_buff);
    103  1.5   mbalmer 
    104  1.1      phil 	mc_loc = 0;
    105  1.1      phil 	mc_buff[0] = '\0';
    106  1.5   mbalmer 	return res;
    107  1.1      phil }
    108