Home | History | Annotate | Line # | Download | only in csh
      1  1.9  christos /* $NetBSD: char.h,v 1.9 2012/01/19 02:42:53 christos Exp $ */
      2  1.6       cgd 
      3  1.1       cgd /*-
      4  1.5   mycroft  * Copyright (c) 1980, 1991, 1993
      5  1.5   mycroft  *	The Regents of the University of California.  All rights reserved.
      6  1.1       cgd  *
      7  1.1       cgd  * Redistribution and use in source and binary forms, with or without
      8  1.1       cgd  * modification, are permitted provided that the following conditions
      9  1.1       cgd  * are met:
     10  1.1       cgd  * 1. Redistributions of source code must retain the above copyright
     11  1.1       cgd  *    notice, this list of conditions and the following disclaimer.
     12  1.1       cgd  * 2. Redistributions in binary form must reproduce the above copyright
     13  1.1       cgd  *    notice, this list of conditions and the following disclaimer in the
     14  1.1       cgd  *    documentation and/or other materials provided with the distribution.
     15  1.8       agc  * 3. Neither the name of the University nor the names of its contributors
     16  1.1       cgd  *    may be used to endorse or promote products derived from this software
     17  1.1       cgd  *    without specific prior written permission.
     18  1.1       cgd  *
     19  1.1       cgd  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     20  1.1       cgd  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     21  1.1       cgd  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     22  1.1       cgd  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     23  1.1       cgd  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     24  1.1       cgd  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     25  1.1       cgd  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     26  1.1       cgd  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     27  1.1       cgd  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     28  1.1       cgd  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     29  1.1       cgd  * SUCH DAMAGE.
     30  1.1       cgd  *
     31  1.6       cgd  *	@(#)char.h	8.1 (Berkeley) 5/31/93
     32  1.1       cgd  */
     33  1.1       cgd 
     34  1.7       wiz #ifndef _CHAR_H_
     35  1.7       wiz #define _CHAR_H_
     36  1.7       wiz 
     37  1.1       cgd #include <ctype.h>
     38  1.1       cgd 
     39  1.1       cgd extern unsigned short _cmap[];
     40  1.1       cgd 
     41  1.1       cgd #ifndef NLS
     42  1.1       cgd extern unsigned char _cmap_lower[], _cmap_upper[];
     43  1.1       cgd 
     44  1.1       cgd #endif
     45  1.1       cgd 
     46  1.5   mycroft #define	_QF	0x0001		/* '" (Forward quotes) */
     47  1.5   mycroft #define	_QB	0x0002		/* ` (Backquote) */
     48  1.1       cgd #define	_SP	0x0004		/* space and tab */
     49  1.1       cgd #define	_NL	0x0008		/* \n */
     50  1.1       cgd #define	_META	0x0010		/* lex meta characters, sp #'`";&<>()|\t\n */
     51  1.1       cgd #define	_GLOB	0x0020		/* glob characters, *?{[` */
     52  1.1       cgd #define	_ESC	0x0040		/* \ */
     53  1.1       cgd #define	_DOL	0x0080		/* $ */
     54  1.1       cgd #define	_DIG  	0x0100		/* 0-9 */
     55  1.1       cgd #define	_LET  	0x0200		/* a-z, A-Z, _ */
     56  1.1       cgd #define	_UP   	0x0400		/* A-Z */
     57  1.1       cgd #define	_LOW  	0x0800		/* a-z */
     58  1.1       cgd #define	_XD 	0x1000		/* 0-9, a-f, A-F */
     59  1.1       cgd #define	_CMD	0x2000		/* lex end of command chars, ;&(|` */
     60  1.1       cgd #define _CTR	0x4000		/* control */
     61  1.9  christos #define _PUN	0x8000		/* punctuation */
     62  1.1       cgd 
     63  1.1       cgd #define cmap(c, bits)	\
     64  1.1       cgd 	(((c) & QUOTE) ? 0 : (_cmap[(unsigned char)(c)] & (bits)))
     65  1.1       cgd 
     66  1.1       cgd #define isglob(c)	cmap(c, _GLOB)
     67  1.1       cgd #define isspc(c)	cmap(c, _SP)
     68  1.1       cgd #define ismeta(c)	cmap(c, _META)
     69  1.1       cgd #define iscmdmeta(c)	cmap(c, _CMD)
     70  1.1       cgd #define letter(c)	(((c) & QUOTE) ? 0 : \
     71  1.1       cgd 			 (isalpha((unsigned char) (c)) || (c) == '_'))
     72  1.1       cgd #define alnum(c)	(((c) & QUOTE) ? 0 : \
     73  1.1       cgd 		         (isalnum((unsigned char) (c)) || (c) == '_'))
     74  1.1       cgd #ifdef NLS
     75  1.1       cgd #define Isspace(c)	(((c) & QUOTE) ? 0 : isspace((unsigned char) (c)))
     76  1.1       cgd #define Isdigit(c)	(((c) & QUOTE) ? 0 : isdigit((unsigned char) (c)))
     77  1.1       cgd #define Isalpha(c)	(((c) & QUOTE) ? 0 : isalpha((unsigned char) (c)))
     78  1.1       cgd #define Islower(c)	(((c) & QUOTE) ? 0 : islower((unsigned char) (c)))
     79  1.1       cgd #define Isupper(c)	(((c) & QUOTE) ? 0 : isupper((unsigned char) (c)))
     80  1.1       cgd #define Tolower(c) 	(((c) & QUOTE) ? 0 : tolower((unsigned char) (c)))
     81  1.1       cgd #define Toupper(c) 	(((c) & QUOTE) ? 0 : toupper((unsigned char) (c)))
     82  1.1       cgd #define Isxdigit(c)	(((c) & QUOTE) ? 0 : isxdigit((unsigned char) (c)))
     83  1.1       cgd #define Isalnum(c)	(((c) & QUOTE) ? 0 : isalnum((unsigned char) (c)))
     84  1.1       cgd #define Iscntrl(c) 	(((c) & QUOTE) ? 0 : iscntrl((unsigned char) (c)))
     85  1.1       cgd #define Isprint(c) 	(((c) & QUOTE) ? 0 : isprint((unsigned char) (c)))
     86  1.1       cgd #else
     87  1.1       cgd #define Isspace(c)	cmap(c, _SP|_NL)
     88  1.1       cgd #define Isdigit(c)	cmap(c, _DIG)
     89  1.1       cgd #define Isalpha(c)	(cmap(c,_LET) && !(((c) & META) && AsciiOnly))
     90  1.1       cgd #define Islower(c)	(cmap(c,_LOW) && !(((c) & META) && AsciiOnly))
     91  1.1       cgd #define Isupper(c)	(cmap(c, _UP) && !(((c) & META) && AsciiOnly))
     92  1.7       wiz #define Tolower(c)	(_cmap_lower[(unsigned char)(c)])
     93  1.7       wiz #define Toupper(c)	(_cmap_upper[(unsigned char)(c)])
     94  1.1       cgd #define Isxdigit(c)	cmap(c, _XD)
     95  1.1       cgd #define Isalnum(c)	(cmap(c, _DIG|_LET) && !(((c) & META) && AsciiOnly))
     96  1.7       wiz #define Iscntrl(c)	(cmap(c,_CTR) && !(((c) & META) && AsciiOnly))
     97  1.7       wiz #define Isprint(c)	(!cmap(c,_CTR) && !(((c) & META) && AsciiOnly))
     98  1.1       cgd #endif
     99  1.7       wiz 
    100  1.7       wiz #endif /* !_CHAR_H_ */
    101