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