xref: /freebsd-src/sys/contrib/openzfs/module/os/linux/zfs/zfs_debug.c (revision eda14cbc264d6969b02f2b1994cef11148e914f1)
1 /*
2  * CDDL HEADER START
3  *
4  * The contents of this file are subject to the terms of the
5  * Common Development and Distribution License (the "License").
6  * You may not use this file except in compliance with the License.
7  *
8  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
9  * or http://www.opensolaris.org/os/licensing.
10  * See the License for the specific language governing permissions
11  * and limitations under the License.
12  *
13  * When distributing Covered Code, include this CDDL HEADER in each
14  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
15  * If applicable, add the following below this CDDL HEADER, with the
16  * fields enclosed by brackets "[]" replaced with your own identifying
17  * information: Portions Copyright [yyyy] [name of copyright owner]
18  *
19  * CDDL HEADER END
20  */
21 /*
22  * Copyright (c) 2010, Oracle and/or its affiliates. All rights reserved.
23  * Copyright (c) 2012, 2014 by Delphix. All rights reserved.
24  */
25 
26 #include <sys/zfs_context.h>
27 #include <sys/trace_zfs.h>
28 
29 typedef struct zfs_dbgmsg {
30 	procfs_list_node_t	zdm_node;
31 	uint64_t		zdm_timestamp;
32 	int			zdm_size;
33 	char			zdm_msg[1]; /* variable length allocation */
34 } zfs_dbgmsg_t;
35 
36 procfs_list_t zfs_dbgmsgs;
37 int zfs_dbgmsg_size = 0;
38 int zfs_dbgmsg_maxsize = 4<<20; /* 4MB */
39 
40 /*
41  * Internal ZFS debug messages are enabled by default.
42  *
43  * # Print debug messages
44  * cat /proc/spl/kstat/zfs/dbgmsg
45  *
46  * # Disable the kernel debug message log.
47  * echo 0 > /sys/module/zfs/parameters/zfs_dbgmsg_enable
48  *
49  * # Clear the kernel debug message log.
50  * echo 0 >/proc/spl/kstat/zfs/dbgmsg
51  */
52 int zfs_dbgmsg_enable = 1;
53 
54 static int
55 zfs_dbgmsg_show_header(struct seq_file *f)
56 {
57 	seq_printf(f, "%-12s %-8s\n", "timestamp", "message");
58 	return (0);
59 }
60 
61 static int
62 zfs_dbgmsg_show(struct seq_file *f, void *p)
63 {
64 	zfs_dbgmsg_t *zdm = (zfs_dbgmsg_t *)p;
65 	seq_printf(f, "%-12llu %-s\n",
66 	    (u_longlong_t)zdm->zdm_timestamp, zdm->zdm_msg);
67 	return (0);
68 }
69 
70 static void
71 zfs_dbgmsg_purge(int max_size)
72 {
73 	while (zfs_dbgmsg_size > max_size) {
74 		zfs_dbgmsg_t *zdm = list_remove_head(&zfs_dbgmsgs.pl_list);
75 		if (zdm == NULL)
76 			return;
77 
78 		int size = zdm->zdm_size;
79 		kmem_free(zdm, size);
80 		zfs_dbgmsg_size -= size;
81 	}
82 }
83 
84 static int
85 zfs_dbgmsg_clear(procfs_list_t *procfs_list)
86 {
87 	mutex_enter(&zfs_dbgmsgs.pl_lock);
88 	zfs_dbgmsg_purge(0);
89 	mutex_exit(&zfs_dbgmsgs.pl_lock);
90 	return (0);
91 }
92 
93 void
94 zfs_dbgmsg_init(void)
95 {
96 	procfs_list_install("zfs",
97 	    "dbgmsg",
98 	    0600,
99 	    &zfs_dbgmsgs,
100 	    zfs_dbgmsg_show,
101 	    zfs_dbgmsg_show_header,
102 	    zfs_dbgmsg_clear,
103 	    offsetof(zfs_dbgmsg_t, zdm_node));
104 }
105 
106 void
107 zfs_dbgmsg_fini(void)
108 {
109 	procfs_list_uninstall(&zfs_dbgmsgs);
110 	zfs_dbgmsg_purge(0);
111 
112 	/*
113 	 * TODO - decide how to make this permanent
114 	 */
115 #ifdef _KERNEL
116 	procfs_list_destroy(&zfs_dbgmsgs);
117 #endif
118 }
119 
120 void
121 __set_error(const char *file, const char *func, int line, int err)
122 {
123 	/*
124 	 * To enable this:
125 	 *
126 	 * $ echo 512 >/sys/module/zfs/parameters/zfs_flags
127 	 */
128 	if (zfs_flags & ZFS_DEBUG_SET_ERROR)
129 		__dprintf(B_FALSE, file, func, line, "error %lu", err);
130 }
131 
132 void
133 __zfs_dbgmsg(char *buf)
134 {
135 	int size = sizeof (zfs_dbgmsg_t) + strlen(buf);
136 	zfs_dbgmsg_t *zdm = kmem_zalloc(size, KM_SLEEP);
137 	zdm->zdm_size = size;
138 	zdm->zdm_timestamp = gethrestime_sec();
139 	strcpy(zdm->zdm_msg, buf);
140 
141 	mutex_enter(&zfs_dbgmsgs.pl_lock);
142 	procfs_list_add(&zfs_dbgmsgs, zdm);
143 	zfs_dbgmsg_size += size;
144 	zfs_dbgmsg_purge(MAX(zfs_dbgmsg_maxsize, 0));
145 	mutex_exit(&zfs_dbgmsgs.pl_lock);
146 }
147 
148 #ifdef _KERNEL
149 
150 void
151 __dprintf(boolean_t dprint, const char *file, const char *func,
152     int line, const char *fmt, ...)
153 {
154 	const char *newfile;
155 	va_list adx;
156 	size_t size;
157 	char *buf;
158 	char *nl;
159 	int i;
160 	char *prefix = (dprint) ? "dprintf: " : "";
161 
162 	size = 1024;
163 	buf = kmem_alloc(size, KM_SLEEP);
164 
165 	/*
166 	 * Get rid of annoying prefix to filename.
167 	 */
168 	newfile = strrchr(file, '/');
169 	if (newfile != NULL) {
170 		newfile = newfile + 1; /* Get rid of leading / */
171 	} else {
172 		newfile = file;
173 	}
174 
175 	i = snprintf(buf, size, "%s%s:%d:%s(): ", prefix, newfile, line, func);
176 
177 	if (i < size) {
178 		va_start(adx, fmt);
179 		(void) vsnprintf(buf + i, size - i, fmt, adx);
180 		va_end(adx);
181 	}
182 
183 	/*
184 	 * Get rid of trailing newline for dprintf logs.
185 	 */
186 	if (dprint && buf[0] != '\0') {
187 		nl = &buf[strlen(buf) - 1];
188 		if (*nl == '\n')
189 			*nl = '\0';
190 	}
191 
192 	/*
193 	 * To get this data enable the zfs__dprintf trace point as shown:
194 	 *
195 	 * # Enable zfs__dprintf tracepoint, clear the tracepoint ring buffer
196 	 * $ echo 1 > /sys/kernel/debug/tracing/events/zfs/enable
197 	 * $ echo 0 > /sys/kernel/debug/tracing/trace
198 	 *
199 	 * # Dump the ring buffer.
200 	 * $ cat /sys/kernel/debug/tracing/trace
201 	 */
202 	DTRACE_PROBE1(zfs__dprintf, char *, buf);
203 
204 	/*
205 	 * To get this data:
206 	 *
207 	 * $ cat /proc/spl/kstat/zfs/dbgmsg
208 	 *
209 	 * To clear the buffer:
210 	 * $ echo 0 > /proc/spl/kstat/zfs/dbgmsg
211 	 */
212 	__zfs_dbgmsg(buf);
213 
214 	kmem_free(buf, size);
215 }
216 
217 #else
218 
219 void
220 zfs_dbgmsg_print(const char *tag)
221 {
222 	ssize_t ret __attribute__((unused));
223 
224 	/*
225 	 * We use write() in this function instead of printf()
226 	 * so it is safe to call from a signal handler.
227 	 */
228 	ret = write(STDOUT_FILENO, "ZFS_DBGMSG(", 11);
229 	ret = write(STDOUT_FILENO, tag, strlen(tag));
230 	ret = write(STDOUT_FILENO, ") START:\n", 9);
231 
232 	mutex_enter(&zfs_dbgmsgs.pl_lock);
233 	for (zfs_dbgmsg_t *zdm = list_head(&zfs_dbgmsgs.pl_list); zdm != NULL;
234 	    zdm = list_next(&zfs_dbgmsgs.pl_list, zdm)) {
235 		ret = write(STDOUT_FILENO, zdm->zdm_msg,
236 		    strlen(zdm->zdm_msg));
237 		ret = write(STDOUT_FILENO, "\n", 1);
238 	}
239 
240 	ret = write(STDOUT_FILENO, "ZFS_DBGMSG(", 11);
241 	ret = write(STDOUT_FILENO, tag, strlen(tag));
242 	ret = write(STDOUT_FILENO, ") END\n", 6);
243 
244 	mutex_exit(&zfs_dbgmsgs.pl_lock);
245 }
246 #endif /* _KERNEL */
247 
248 #ifdef _KERNEL
249 module_param(zfs_dbgmsg_enable, int, 0644);
250 MODULE_PARM_DESC(zfs_dbgmsg_enable, "Enable ZFS debug message log");
251 
252 module_param(zfs_dbgmsg_maxsize, int, 0644);
253 MODULE_PARM_DESC(zfs_dbgmsg_maxsize, "Maximum ZFS debug log size");
254 #endif
255