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
msg(int n,...)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 *
lbasename(const char * path)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 *
mkpos(const pos_t * posp)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