26ad533edb
xstrdup. There is a crash() function that do cleaning before exiting the program. The new functions are wrappers that make use of crash() in case of allocation failure. warn, exit -> err. Reviewed by: alfred
137 lines
3.1 KiB
C
137 lines
3.1 KiB
C
/*
|
|
* $FreeBSD$
|
|
*/
|
|
/*
|
|
* Sun RPC is a product of Sun Microsystems, Inc. and is provided for
|
|
* unrestricted use provided that this legend is included on all tape
|
|
* media and as a part of the software program in whole or part. Users
|
|
* may copy or modify Sun RPC without charge, but are not authorized
|
|
* to license or distribute it to anyone else except as part of a product or
|
|
* program developed by the user.
|
|
*
|
|
* SUN RPC IS PROVIDED AS IS WITH NO WARRANTIES OF ANY KIND INCLUDING THE
|
|
* WARRANTIES OF DESIGN, MERCHANTIBILITY AND FITNESS FOR A PARTICULAR
|
|
* PURPOSE, OR ARISING FROM A COURSE OF DEALING, USAGE OR TRADE PRACTICE.
|
|
*
|
|
* Sun RPC is provided with no support and without any obligation on the
|
|
* part of Sun Microsystems, Inc. to assist in its use, correction,
|
|
* modification or enhancement.
|
|
*
|
|
* SUN MICROSYSTEMS, INC. SHALL HAVE NO LIABILITY WITH RESPECT TO THE
|
|
* INFRINGEMENT OF COPYRIGHTS, TRADE SECRETS OR ANY PATENTS BY SUN RPC
|
|
* OR ANY PART THEREOF.
|
|
*
|
|
* In no event will Sun Microsystems, Inc. be liable for any lost revenue
|
|
* or profits or other special, indirect and consequential damages, even if
|
|
* Sun has been advised of the possibility of such damages.
|
|
*
|
|
* Sun Microsystems, Inc.
|
|
* 2550 Garcia Avenue
|
|
* Mountain View, California 94043
|
|
*/
|
|
/* #pragma ident "@(#)rpc_scan.h 1.11 94/05/15 SMI" */
|
|
|
|
/* Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T */
|
|
/* All Rights Reserved */
|
|
|
|
/* THIS IS UNPUBLISHED PROPRIETARY SOURCE CODE OF AT&T */
|
|
/* The copyright notice above does not evidence any */
|
|
/* actual or intended publication of such source code. */
|
|
|
|
|
|
|
|
/*+++++++++++++++++++++++++++++++++++++++++++++++++++++++++
|
|
* PROPRIETARY NOTICE (Combined)
|
|
*
|
|
* This source code is unpublished proprietary information
|
|
* constituting, or derived under license from AT&T's UNIX(r) System V.
|
|
* In addition, portions of such source code were derived from Berkeley
|
|
* 4.3 BSD under license from the Regents of the University of
|
|
* California.
|
|
*
|
|
*
|
|
*
|
|
* Copyright Notice
|
|
*
|
|
* Notice of copyright on this source code product does not indicate
|
|
* publication.
|
|
*
|
|
* (c) 1986,1987,1988.1989 Sun Microsystems, Inc
|
|
* (c) 1983,1984,1985,1986,1987,1988,1989 AT&T.
|
|
* All rights reserved.
|
|
*/
|
|
|
|
/* @(#)rpc_scan.h 1.3 90/08/29 (C) 1987 SMI */
|
|
|
|
/*
|
|
* rpc_scan.h, Definitions for the RPCL scanner
|
|
*/
|
|
|
|
/*
|
|
* kinds of tokens
|
|
*/
|
|
enum tok_kind {
|
|
TOK_IDENT,
|
|
TOK_CHARCONST,
|
|
TOK_STRCONST,
|
|
TOK_LPAREN,
|
|
TOK_RPAREN,
|
|
TOK_LBRACE,
|
|
TOK_RBRACE,
|
|
TOK_LBRACKET,
|
|
TOK_RBRACKET,
|
|
TOK_LANGLE,
|
|
TOK_RANGLE,
|
|
TOK_STAR,
|
|
TOK_COMMA,
|
|
TOK_EQUAL,
|
|
TOK_COLON,
|
|
TOK_SEMICOLON,
|
|
TOK_CONST,
|
|
TOK_STRUCT,
|
|
TOK_UNION,
|
|
TOK_SWITCH,
|
|
TOK_CASE,
|
|
TOK_DEFAULT,
|
|
TOK_ENUM,
|
|
TOK_TYPEDEF,
|
|
TOK_INT,
|
|
TOK_SHORT,
|
|
TOK_LONG,
|
|
TOK_HYPER,
|
|
TOK_UNSIGNED,
|
|
TOK_FLOAT,
|
|
TOK_DOUBLE,
|
|
TOK_QUAD,
|
|
TOK_OPAQUE,
|
|
TOK_CHAR,
|
|
TOK_STRING,
|
|
TOK_BOOL,
|
|
TOK_VOID,
|
|
TOK_PROGRAM,
|
|
TOK_VERSION,
|
|
TOK_EOF
|
|
};
|
|
typedef enum tok_kind tok_kind;
|
|
|
|
/*
|
|
* a token
|
|
*/
|
|
struct token {
|
|
tok_kind kind;
|
|
char *str;
|
|
};
|
|
typedef struct token token;
|
|
|
|
|
|
/*
|
|
* routine interface
|
|
*/
|
|
void scan();
|
|
void scan2();
|
|
void scan3();
|
|
void scan_num();
|
|
void peek();
|
|
int peekscan();
|
|
void get_token();
|