1 /* $NetBSD: msg.c,v 1.10 2008/04/26 19:38:30 christos Exp $ */ 2 3 /* 4 * Copyright (c) 1994, 1995 Jochen Pohl 5 * All Rights Reserved. 6 * 7 * Redistribution and use in source and binary forms, with or without 8 * modification, are permitted provided that the following conditions 9 * are met: 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 2. Redistributions in binary form must reproduce the above copyright 13 * notice, this list of conditions and the following disclaimer in the 14 * documentation and/or other materials provided with the distribution. 15 * 3. All advertising materials mentioning features or use of this software 16 * must display the following acknowledgement: 17 * This product includes software developed by Jochen Pohl for 18 * The NetBSD Project. 19 * 4. The name of the author may not be used to endorse or promote products 20 * derived from this software without specific prior written permission. 21 * 22 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 23 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 24 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 25 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 26 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 27 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 28 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 29 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 30 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 31 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 32 */ 33 34 #if HAVE_NBTOOL_CONFIG_H 35 #include "nbtool_config.h" 36 #endif 37 38 #include <sys/cdefs.h> 39 #if defined(__RCSID) && !defined(lint) 40 __RCSID("$NetBSD: msg.c,v 1.10 2008/04/26 19:38:30 christos Exp $"); 41 #endif 42 43 #include <stdio.h> 44 #include <stdarg.h> 45 #include <string.h> 46 47 #include "lint2.h" 48 49 static const char *msgs[] = { 50 "%s used( %s ), but not defined", /* 0 */ 51 "%s defined( %s ), but never used", /* 1 */ 52 "%s declared( %s ), but never used or defined", /* 2 */ 53 "%s multiply defined \t%s :: %s", /* 3 */ 54 "%s value used inconsistently \t%s :: %s", /* 4 */ 55 "%s value declared inconsistently (%s != %s) \t%s :: %s", /* 5 */ 56 "%s, arg %d used inconsistently \t%s[%s] :: %s[%s]", /* 6 */ 57 "%s: variable # of args \t%s :: %s", /* 7 */ 58 "%s returns value which is always ignored", /* 8 */ 59 "%s returns value which is sometimes ignored", /* 9 */ 60 "%s value is used( %s ), but none returned", /* 10 */ 61 "%s, arg %d declared inconsistently (%s != %s)\t%s :: %s", /* 11 */ 62 "%s: variable # of args declared \t%s :: %s", /* 12 */ 63 "%s: malformed format string \t%s", /* 13 */ 64 "%s, arg %d inconsistent with format \t%s", /* 14 */ 65 "%s: too few args for format \t%s", /* 15 */ 66 "%s: too many args for format \t%s", /* 16 */ 67 "%s function value must be declared before use \t%s :: %s",/* 17 */ 68 "%s renamed multiple times \t%s :: %s", /* 18 */ 69 }; 70 71 static const char *lbasename(const char *); 72 73 void 74 msg(int n, ...) 75 { 76 va_list ap; 77 78 va_start(ap, n); 79 80 (void)vprintf(msgs[n], ap); 81 (void)printf("\n"); 82 83 va_end(ap); 84 } 85 86 /* 87 * Return a pointer to the last component of a path. 88 */ 89 static const char * 90 lbasename(const char *path) 91 { 92 const char *cp, *cp1, *cp2; 93 94 if (Fflag) 95 return (path); 96 97 cp = cp1 = cp2 = path; 98 while (*cp != '\0') { 99 if (*cp++ == '/') { 100 cp2 = cp1; 101 cp1 = cp; 102 } 103 } 104 return (*cp1 == '\0' ? cp2 : cp1); 105 } 106 107 /* 108 * Create a string which describes a position in a source file. 109 */ 110 const char * 111 mkpos(pos_t *posp) 112 { 113 size_t len; 114 const char *fn; 115 static char *buf; 116 static size_t blen = 0; 117 int qm, src, line; 118 119 if (Hflag && posp->p_src != posp->p_isrc) { 120 src = posp->p_isrc; 121 line = posp->p_iline; 122 } else { 123 src = posp->p_src; 124 line = posp->p_line; 125 } 126 qm = !Hflag && posp->p_src != posp->p_isrc; 127 128 len = strlen(fn = lbasename(fnames[src])); 129 len += 3 * sizeof (u_short) + 4; 130 131 if (len > blen) 132 buf = xrealloc(buf, blen = len); 133 if (line != 0) { 134 (void)sprintf(buf, "%s%s(%hu)", 135 fn, qm ? "?" : "", line); 136 } else { 137 (void)sprintf(buf, "%s", fn); 138 } 139 140 return (buf); 141 } 142