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