1 /* 2 * Copyright (c) 1983, 1993 3 * The Regents of the University of California. All rights reserved. 4 * 5 * Redistribution and use in source and binary forms, with or without 6 * modification, are permitted provided that the following conditions 7 * are met: 8 * 1. Redistributions of source code must retain the above copyright 9 * notice, this list of conditions and the following disclaimer. 10 * 2. Redistributions in binary form must reproduce the above copyright 11 * notice, this list of conditions and the following disclaimer in the 12 * documentation and/or other materials provided with the distribution. 13 * 3. All advertising materials mentioning features or use of this software 14 * must display the following acknowledgement: 15 * This product includes software developed by the University of 16 * California, Berkeley and its contributors. 17 * 4. Neither the name of the University nor the names of its contributors 18 * may be used to endorse or promote products derived from this software 19 * without specific prior written permission. 20 * 21 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 22 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 24 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 25 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 26 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 27 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 28 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 29 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 30 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 31 * SUCH DAMAGE. 32 */ 33 34 #ifndef lint 35 static char sccsid[] = "@(#)printlist.c 8.1 (Berkeley) 6/6/93"; 36 #endif /* not lint */ 37 38 #include "gprof.h" 39 40 /* 41 * these are the lists of names: 42 * there is the list head and then the listname 43 * is a pointer to the list head 44 * (for ease of passing to stringlist functions). 45 */ 46 struct stringlist kfromhead = { 0 , 0 }; 47 struct stringlist *kfromlist = &kfromhead; 48 struct stringlist ktohead = { 0 , 0 }; 49 struct stringlist *ktolist = &ktohead; 50 struct stringlist fhead = { 0 , 0 }; 51 struct stringlist *flist = &fhead; 52 struct stringlist Fhead = { 0 , 0 }; 53 struct stringlist *Flist = &Fhead; 54 struct stringlist ehead = { 0 , 0 }; 55 struct stringlist *elist = &ehead; 56 struct stringlist Ehead = { 0 , 0 }; 57 struct stringlist *Elist = &Ehead; 58 59 addlist( listp , funcname ) 60 struct stringlist *listp; 61 char *funcname; 62 { 63 struct stringlist *slp; 64 65 slp = (struct stringlist *) malloc( sizeof(struct stringlist)); 66 if ( slp == (struct stringlist *) 0 ) { 67 fprintf( stderr, "gprof: ran out room for printlist\n" ); 68 done(); 69 } 70 slp -> next = listp -> next; 71 slp -> string = funcname; 72 listp -> next = slp; 73 } 74 75 bool 76 onlist( listp , funcname ) 77 struct stringlist *listp; 78 char *funcname; 79 { 80 struct stringlist *slp; 81 82 for ( slp = listp -> next ; slp ; slp = slp -> next ) { 83 if ( ! strcmp( slp -> string , funcname ) ) { 84 return TRUE; 85 } 86 if ( funcname[0] == '_' && ! strcmp( slp -> string , &funcname[1] ) ) { 87 return TRUE; 88 } 89 } 90 return FALSE; 91 } 92