1 /* $NetBSD: msg.c,v 1.7 2002/01/31 19:36:55 tv 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 #include <sys/cdefs.h> 35 #if defined(__RCSID) && !defined(lint) 36 __RCSID("$NetBSD: msg.c,v 1.7 2002/01/31 19:36:55 tv Exp $"); 37 #endif 38 39 #include <stdio.h> 40 #include <stdarg.h> 41 #include <string.h> 42 43 #include "lint2.h" 44 45 static const char *msgs[] = { 46 "%s used( %s ), but not defined", /* 0 */ 47 "%s defined( %s ), but never used", /* 1 */ 48 "%s declared( %s ), but never used or defined", /* 2 */ 49 "%s multiply defined \t%s :: %s", /* 3 */ 50 "%s value used inconsistently \t%s :: %s", /* 4 */ 51 "%s value declared inconsistently \t%s :: %s", /* 5 */ 52 "%s, arg %d used inconsistently \t%s :: %s", /* 6 */ 53 "%s: variable # of args \t%s :: %s", /* 7 */ 54 "%s returns value which is always ignored", /* 8 */ 55 "%s returns value which is sometimes ignored", /* 9 */ 56 "%s value is used( %s ), but none returned", /* 10 */ 57 "%s, arg %d declared inconsistently \t%s :: %s", /* 11 */ 58 "%s: variable # of args declared \t%s :: %s", /* 12 */ 59 "%s: malformed format string \t%s", /* 13 */ 60 "%s, arg %d inconsistent with format \t%s", /* 14 */ 61 "%s: too few args for format \t%s", /* 15 */ 62 "%s: too many args for format \t%s", /* 16 */ 63 "%s function value must be declared before use \t%s :: %s",/* 17 */ 64 "%s renamed multiple times \t%s :: %s", /* 18 */ 65 }; 66 67 static const char *lbasename(const char *); 68 69 void 70 msg(int n, ...) 71 { 72 va_list ap; 73 74 va_start(ap, n); 75 76 (void)vprintf(msgs[n], ap); 77 (void)printf("\n"); 78 79 va_end(ap); 80 } 81 82 /* 83 * Return a pointer to the last component of a path. 84 */ 85 static const char * 86 lbasename(const char *path) 87 { 88 const char *cp, *cp1, *cp2; 89 90 if (Fflag) 91 return (path); 92 93 cp = cp1 = cp2 = path; 94 while (*cp != '\0') { 95 if (*cp++ == '/') { 96 cp2 = cp1; 97 cp1 = cp; 98 } 99 } 100 return (*cp1 == '\0' ? cp2 : cp1); 101 } 102 103 /* 104 * Create a string which describes a position in a source file. 105 */ 106 const char * 107 mkpos(pos_t *posp) 108 { 109 size_t len; 110 const char *fn; 111 static char *buf; 112 static size_t blen = 0; 113 int qm, src, line; 114 115 if (Hflag && posp->p_src != posp->p_isrc) { 116 src = posp->p_isrc; 117 line = posp->p_iline; 118 } else { 119 src = posp->p_src; 120 line = posp->p_line; 121 } 122 qm = !Hflag && posp->p_src != posp->p_isrc; 123 124 len = strlen(fn = lbasename(fnames[src])); 125 len += 3 * sizeof (u_short) + 4; 126 127 if (len > blen) 128 buf = xrealloc(buf, blen = len); 129 if (line != 0) { 130 (void)sprintf(buf, "%s%s(%hu)", 131 fn, qm ? "?" : "", line); 132 } else { 133 (void)sprintf(buf, "%s", fn); 134 } 135 136 return (buf); 137 } 138