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