1*7c478bd9Sstevel@tonic-gate /* 2*7c478bd9Sstevel@tonic-gate * CDDL HEADER START 3*7c478bd9Sstevel@tonic-gate * 4*7c478bd9Sstevel@tonic-gate * The contents of this file are subject to the terms of the 5*7c478bd9Sstevel@tonic-gate * Common Development and Distribution License, Version 1.0 only 6*7c478bd9Sstevel@tonic-gate * (the "License"). You may not use this file except in compliance 7*7c478bd9Sstevel@tonic-gate * with the License. 8*7c478bd9Sstevel@tonic-gate * 9*7c478bd9Sstevel@tonic-gate * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE 10*7c478bd9Sstevel@tonic-gate * or http://www.opensolaris.org/os/licensing. 11*7c478bd9Sstevel@tonic-gate * See the License for the specific language governing permissions 12*7c478bd9Sstevel@tonic-gate * and limitations under the License. 13*7c478bd9Sstevel@tonic-gate * 14*7c478bd9Sstevel@tonic-gate * When distributing Covered Code, include this CDDL HEADER in each 15*7c478bd9Sstevel@tonic-gate * file and include the License file at usr/src/OPENSOLARIS.LICENSE. 16*7c478bd9Sstevel@tonic-gate * If applicable, add the following below this CDDL HEADER, with the 17*7c478bd9Sstevel@tonic-gate * fields enclosed by brackets "[]" replaced with your own identifying 18*7c478bd9Sstevel@tonic-gate * information: Portions Copyright [yyyy] [name of copyright owner] 19*7c478bd9Sstevel@tonic-gate * 20*7c478bd9Sstevel@tonic-gate * CDDL HEADER END 21*7c478bd9Sstevel@tonic-gate */ 22*7c478bd9Sstevel@tonic-gate /* Copyright (c) 1988 AT&T */ 23*7c478bd9Sstevel@tonic-gate /* All Rights Reserved */ 24*7c478bd9Sstevel@tonic-gate 25*7c478bd9Sstevel@tonic-gate 26*7c478bd9Sstevel@tonic-gate /* 27*7c478bd9Sstevel@tonic-gate * Copyright (c) 1999 by Sun Microsystems, Inc. 28*7c478bd9Sstevel@tonic-gate * All rights reserved. 29*7c478bd9Sstevel@tonic-gate */ 30*7c478bd9Sstevel@tonic-gate 31*7c478bd9Sstevel@tonic-gate #pragma ident "%Z%%M% %I% %E% SMI" 32*7c478bd9Sstevel@tonic-gate 33*7c478bd9Sstevel@tonic-gate /* 34*7c478bd9Sstevel@tonic-gate * cscope - interactive C symbol cross-reference 35*7c478bd9Sstevel@tonic-gate * 36*7c478bd9Sstevel@tonic-gate * keyword look-up routine for the C symbol scanner 37*7c478bd9Sstevel@tonic-gate */ 38*7c478bd9Sstevel@tonic-gate 39*7c478bd9Sstevel@tonic-gate #include "global.h" 40*7c478bd9Sstevel@tonic-gate 41*7c478bd9Sstevel@tonic-gate /* keyword text for fast testing of keywords in the scanner */ 42*7c478bd9Sstevel@tonic-gate char externtext[] = "extern"; 43*7c478bd9Sstevel@tonic-gate char typedeftext[] = "typedef"; 44*7c478bd9Sstevel@tonic-gate 45*7c478bd9Sstevel@tonic-gate /* 46*7c478bd9Sstevel@tonic-gate * This keyword table is also used for keyword text compression. Keywords 47*7c478bd9Sstevel@tonic-gate * with an index less than the numeric value of a space are replaced with the 48*7c478bd9Sstevel@tonic-gate * control character corresponding to the index, so they cannot be moved 49*7c478bd9Sstevel@tonic-gate * without changing the database file version and adding compatibility code 50*7c478bd9Sstevel@tonic-gate * for old databases. 51*7c478bd9Sstevel@tonic-gate */ 52*7c478bd9Sstevel@tonic-gate struct keystruct keyword[] = { 53*7c478bd9Sstevel@tonic-gate { "#define", ' ', MISC, NULL }, /* must be table entry 0 */ 54*7c478bd9Sstevel@tonic-gate /* for old databases */ 55*7c478bd9Sstevel@tonic-gate { "#include", ' ', MISC, NULL }, /* must be table entry 1 */ 56*7c478bd9Sstevel@tonic-gate { "break", '\0', FLOW, NULL }, /* rarely in cross-reference */ 57*7c478bd9Sstevel@tonic-gate { "case", ' ', FLOW, NULL }, 58*7c478bd9Sstevel@tonic-gate { "char", ' ', DECL, NULL }, 59*7c478bd9Sstevel@tonic-gate { "continue", '\0', FLOW, NULL }, /* rarely in cross-reference */ 60*7c478bd9Sstevel@tonic-gate { "default", '\0', FLOW, NULL }, /* rarely in cross-reference */ 61*7c478bd9Sstevel@tonic-gate { "#define", ' ', MISC, NULL }, /* must be table entry 7 */ 62*7c478bd9Sstevel@tonic-gate { "double", ' ', DECL, NULL }, 63*7c478bd9Sstevel@tonic-gate { "\t", '\0', MISC, NULL }, /* must be table entry 9 */ 64*7c478bd9Sstevel@tonic-gate { "\n", '\0', MISC, NULL }, /* must be table entry 10 */ 65*7c478bd9Sstevel@tonic-gate { "else", ' ', FLOW, NULL }, 66*7c478bd9Sstevel@tonic-gate { "enum", ' ', DECL, NULL }, 67*7c478bd9Sstevel@tonic-gate { externtext, ' ', DECL, NULL }, 68*7c478bd9Sstevel@tonic-gate { "float", ' ', DECL, NULL }, 69*7c478bd9Sstevel@tonic-gate { "for", '(', FLOW, NULL }, 70*7c478bd9Sstevel@tonic-gate { "goto", ' ', FLOW, NULL }, 71*7c478bd9Sstevel@tonic-gate { "if", '(', FLOW, NULL }, 72*7c478bd9Sstevel@tonic-gate { "int", ' ', DECL, NULL }, 73*7c478bd9Sstevel@tonic-gate { "long", ' ', DECL, NULL }, 74*7c478bd9Sstevel@tonic-gate { "register", ' ', DECL, NULL }, 75*7c478bd9Sstevel@tonic-gate { "return", '\0', FLOW, NULL }, 76*7c478bd9Sstevel@tonic-gate { "short", ' ', DECL, NULL }, 77*7c478bd9Sstevel@tonic-gate { "sizeof", '\0', MISC, NULL }, 78*7c478bd9Sstevel@tonic-gate { "static", ' ', DECL, NULL }, 79*7c478bd9Sstevel@tonic-gate { "struct", ' ', DECL, NULL }, 80*7c478bd9Sstevel@tonic-gate { "switch", '(', FLOW, NULL }, 81*7c478bd9Sstevel@tonic-gate { typedeftext, ' ', DECL, NULL }, 82*7c478bd9Sstevel@tonic-gate { "union", ' ', DECL, NULL }, 83*7c478bd9Sstevel@tonic-gate { "unsigned", ' ', DECL, NULL }, 84*7c478bd9Sstevel@tonic-gate { "void", ' ', DECL, NULL }, 85*7c478bd9Sstevel@tonic-gate { "while", '(', FLOW, NULL }, 86*7c478bd9Sstevel@tonic-gate 87*7c478bd9Sstevel@tonic-gate /* these keywords are not compressed */ 88*7c478bd9Sstevel@tonic-gate { "auto", ' ', DECL, NULL }, 89*7c478bd9Sstevel@tonic-gate { "do", ' ', FLOW, NULL }, 90*7c478bd9Sstevel@tonic-gate { "fortran", ' ', DECL, NULL }, 91*7c478bd9Sstevel@tonic-gate { "const", ' ', DECL, NULL }, 92*7c478bd9Sstevel@tonic-gate { "signed", ' ', DECL, NULL }, 93*7c478bd9Sstevel@tonic-gate { "volatile", ' ', DECL, NULL }, 94*7c478bd9Sstevel@tonic-gate }; 95*7c478bd9Sstevel@tonic-gate 96*7c478bd9Sstevel@tonic-gate #define KEYWORDS (sizeof (keyword) / sizeof (struct keystruct)) 97*7c478bd9Sstevel@tonic-gate 98*7c478bd9Sstevel@tonic-gate #define HASHMOD (KEYWORDS * 2 + 1) 99*7c478bd9Sstevel@tonic-gate 100*7c478bd9Sstevel@tonic-gate static struct keystruct *hashtab[HASHMOD]; /* pointer table */ 101*7c478bd9Sstevel@tonic-gate 102*7c478bd9Sstevel@tonic-gate /* put the keywords into the symbol table */ 103*7c478bd9Sstevel@tonic-gate 104*7c478bd9Sstevel@tonic-gate void 105*7c478bd9Sstevel@tonic-gate initsymtab(void) 106*7c478bd9Sstevel@tonic-gate { 107*7c478bd9Sstevel@tonic-gate int i, j; 108*7c478bd9Sstevel@tonic-gate struct keystruct *p; 109*7c478bd9Sstevel@tonic-gate 110*7c478bd9Sstevel@tonic-gate for (i = 1; i < KEYWORDS; ++i) { 111*7c478bd9Sstevel@tonic-gate p = &keyword[i]; 112*7c478bd9Sstevel@tonic-gate j = hash(p->text) % HASHMOD; 113*7c478bd9Sstevel@tonic-gate p->next = hashtab[j]; 114*7c478bd9Sstevel@tonic-gate hashtab[j] = p; 115*7c478bd9Sstevel@tonic-gate } 116*7c478bd9Sstevel@tonic-gate } 117*7c478bd9Sstevel@tonic-gate 118*7c478bd9Sstevel@tonic-gate /* see if this identifier is a keyword */ 119*7c478bd9Sstevel@tonic-gate 120*7c478bd9Sstevel@tonic-gate struct keystruct * 121*7c478bd9Sstevel@tonic-gate lookup(char *ident) 122*7c478bd9Sstevel@tonic-gate { 123*7c478bd9Sstevel@tonic-gate struct keystruct *p; 124*7c478bd9Sstevel@tonic-gate int c; 125*7c478bd9Sstevel@tonic-gate 126*7c478bd9Sstevel@tonic-gate /* look up the identifier in the keyword table */ 127*7c478bd9Sstevel@tonic-gate for (p = hashtab[hash(ident) % HASHMOD]; p != NULL; p = p->next) { 128*7c478bd9Sstevel@tonic-gate if (strequal(ident, p->text)) { 129*7c478bd9Sstevel@tonic-gate if (compress == YES && (c = p - keyword) < ' ') { 130*7c478bd9Sstevel@tonic-gate ident[0] = c; /* compress the keyword */ 131*7c478bd9Sstevel@tonic-gate } 132*7c478bd9Sstevel@tonic-gate return (p); 133*7c478bd9Sstevel@tonic-gate } 134*7c478bd9Sstevel@tonic-gate } 135*7c478bd9Sstevel@tonic-gate /* this is an identifier */ 136*7c478bd9Sstevel@tonic-gate return (NULL); 137*7c478bd9Sstevel@tonic-gate } 138*7c478bd9Sstevel@tonic-gate 139*7c478bd9Sstevel@tonic-gate /* form hash value for string */ 140*7c478bd9Sstevel@tonic-gate 141*7c478bd9Sstevel@tonic-gate int 142*7c478bd9Sstevel@tonic-gate hash(char *s) 143*7c478bd9Sstevel@tonic-gate { 144*7c478bd9Sstevel@tonic-gate unsigned i; 145*7c478bd9Sstevel@tonic-gate 146*7c478bd9Sstevel@tonic-gate for (i = 0; *s != '\0'; ) 147*7c478bd9Sstevel@tonic-gate i += *s++; /* += is faster than <<= for cscope */ 148*7c478bd9Sstevel@tonic-gate return (i); 149*7c478bd9Sstevel@tonic-gate } 150