1 /* $NetBSD: msg.c,v 1.26 2024/11/30 18:17:12 rillig 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) 40 __RCSID("$NetBSD: msg.c,v 1.26 2024/11/30 18:17:12 rillig Exp $"); 41 #endif 42 43 #include <stdarg.h> 44 #include <stdio.h> 45 #include <string.h> 46 47 #include "lint2.h" 48 49 static const char *msgs[] = { 50 "%s is used in %s but never defined", // 0 51 "%s is defined in %s but never used", // 1 52 "%s is declared in %s but never used or defined", // 2 53 "%s has multiple definitions in %s and %s", // 3 54 "%s has its return value used inconsistently by %s and %s", // 4 55 "%s returns '%s' at %s, versus '%s' at %s", // 5 56 "%s has argument %d with type '%s' at %s, versus '%s' at %s", // 6 57 "%s has %d parameters in %s, versus %d arguments in %s", // 7 58 "%s returns a value that is always ignored", // 8 59 "%s returns a value that is sometimes ignored", // 9 60 "%s has its return value used in %s but doesn't return one", // 10 61 "%s has parameter %d declared as '%s' in %s, versus '%s' in %s", // 11 62 "%s has %d parameters in %s, versus %d in %s", // 12 63 "%s is called with a malformed format string in %s", // 13 64 "%s is called in %s with argument %d being incompatible with format string", // 14 65 "%s is called in %s with too few arguments for format string", // 15 66 "%s is called in %s with too many arguments for format string", // 16 67 "%s's return type in %s must be declared before use in %s", // 17 68 "%s is renamed multiple times in %s and %s", // 18 69 }; 70 71 void 72 msg(int n, ...) 73 { 74 va_list ap; 75 76 va_start(ap, n); 77 78 (void)vprintf(msgs[n], ap); 79 (void)printf(" [lint2:%03d]\n", n); 80 81 va_end(ap); 82 } 83 84 /* 85 * Return a pointer to the last component of a path. 86 */ 87 static const char * 88 lbasename(const char *path) 89 { 90 91 if (Fflag) 92 return path; 93 94 const char *base = path; 95 for (const char *p = path; *p != '\0'; p++) 96 if (*p == '/') 97 base = p + 1; 98 return base; 99 } 100 101 /* 102 * Create a string which describes a position in a source file. 103 */ 104 const char * 105 mkpos(const pos_t *posp) 106 { 107 static struct buffer { 108 char *buf; 109 size_t cap; 110 } buffers[2]; 111 static unsigned int buf_index; 112 113 struct buffer *buf = buffers + buf_index; 114 buf_index ^= 1; 115 116 int filename; 117 int lineno; 118 if (Hflag && posp->p_src != posp->p_isrc) { 119 filename = posp->p_isrc; 120 lineno = posp->p_iline; 121 } else { 122 filename = posp->p_src; 123 lineno = posp->p_line; 124 } 125 126 bool qm = !Hflag && posp->p_src != posp->p_isrc; 127 const char *fn = lbasename(fnames[filename]); 128 size_t len = strlen(fn) + 1 + 1 + 3 * sizeof(int) + 1 + 1; 129 130 if (len > buf->cap) 131 buf->buf = xrealloc(buf->buf, buf->cap = len); 132 if (lineno != 0) 133 (void)snprintf(buf->buf, buf->cap, "%s%s(%d)", 134 fn, qm ? "?" : "", lineno); 135 else 136 (void)snprintf(buf->buf, buf->cap, "%s", fn); 137 138 return buf->buf; 139 } 140