]>
Commit | Line | Data |
---|---|---|
52fd3d6f ZB |
1 | /* -*- mode: c; c-basic-offset: 8; -*- |
2 | * vim: noexpandtab sw=8 ts=8 sts=0: | |
3 | * | |
4 | * Copyright (C) 2005 Oracle. All rights reserved. | |
5 | * | |
6 | * This program is free software; you can redistribute it and/or | |
7 | * modify it under the terms of the GNU General Public | |
8 | * License as published by the Free Software Foundation; either | |
9 | * version 2 of the License, or (at your option) any later version. | |
10 | * | |
11 | * This program is distributed in the hope that it will be useful, | |
12 | * but WITHOUT ANY WARRANTY; without even the implied warranty of | |
13 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU | |
14 | * General Public License for more details. | |
15 | * | |
16 | * You should have received a copy of the GNU General Public | |
17 | * License along with this program; if not, write to the | |
18 | * Free Software Foundation, Inc., 59 Temple Place - Suite 330, | |
19 | * Boston, MA 021110-1307, USA. | |
20 | */ | |
21 | ||
22 | #ifndef O2CLUSTER_MASKLOG_H | |
23 | #define O2CLUSTER_MASKLOG_H | |
24 | ||
25 | /* | |
26 | * For now this is a trivial wrapper around printk() that gives the critical | |
27 | * ability to enable sets of debugging output at run-time. In the future this | |
28 | * will almost certainly be redirected to relayfs so that it can pay a | |
29 | * substantially lower heisenberg tax. | |
30 | * | |
31 | * Callers associate the message with a bitmask and a global bitmask is | |
32 | * maintained with help from /proc. If any of the bits match the message is | |
33 | * output. | |
34 | * | |
35 | * We must have efficient bit tests on i386 and it seems gcc still emits crazy | |
36 | * code for the 64bit compare. It emits very good code for the dual unsigned | |
37 | * long tests, though, completely avoiding tests that can never pass if the | |
38 | * caller gives a constant bitmask that fills one of the longs with all 0s. So | |
39 | * the desire is to have almost all of the calls decided on by comparing just | |
40 | * one of the longs. This leads to having infrequently given bits that are | |
41 | * frequently matched in the high bits. | |
42 | * | |
43 | * _ERROR and _NOTICE are used for messages that always go to the console and | |
44 | * have appropriate KERN_ prefixes. We wrap these in our function instead of | |
45 | * just calling printk() so that this can eventually make its way through | |
46 | * relayfs along with the debugging messages. Everything else gets KERN_DEBUG. | |
47 | * The inline tests and macro dance give GCC the opportunity to quite cleverly | |
48 | * only emit the appropriage printk() when the caller passes in a constant | |
49 | * mask, as is almost always the case. | |
50 | * | |
51 | * All this bitmask nonsense is hidden from the /proc interface so that Joel | |
52 | * doesn't have an aneurism. Reading the file gives a straight forward | |
53 | * indication of which bits are on or off: | |
54 | * ENTRY off | |
55 | * EXIT off | |
56 | * TCP off | |
57 | * MSG off | |
58 | * SOCKET off | |
59 | * ERROR off | |
60 | * NOTICE on | |
61 | * | |
62 | * Writing changes the state of a given bit and requires a strictly formatted | |
63 | * single write() call: | |
64 | * | |
65 | * write(fd, "ENTRY on", 8); | |
66 | * | |
67 | * would turn the entry bit on. "1" is also accepted in the place of "on", and | |
68 | * "off" and "0" behave as expected. | |
69 | * | |
70 | * Some trivial shell can flip all the bits on or off: | |
71 | * | |
72 | * log_mask="/proc/fs/ocfs2_nodemanager/log_mask" | |
73 | * cat $log_mask | ( | |
74 | * while read bit status; do | |
75 | * # $1 is "on" or "off", say | |
76 | * echo "$bit $1" > $log_mask | |
77 | * done | |
78 | * ) | |
79 | */ | |
80 | ||
81 | /* for task_struct */ | |
82 | #include <linux/sched.h> | |
83 | ||
84 | /* bits that are frequently given and infrequently matched in the low word */ | |
85 | /* NOTE: If you add a flag, you need to also update mlog.c! */ | |
86 | #define ML_ENTRY 0x0000000000000001ULL /* func call entry */ | |
87 | #define ML_EXIT 0x0000000000000002ULL /* func call exit */ | |
88 | #define ML_TCP 0x0000000000000004ULL /* net cluster/tcp.c */ | |
89 | #define ML_MSG 0x0000000000000008ULL /* net network messages */ | |
90 | #define ML_SOCKET 0x0000000000000010ULL /* net socket lifetime */ | |
91 | #define ML_HEARTBEAT 0x0000000000000020ULL /* hb all heartbeat tracking */ | |
92 | #define ML_HB_BIO 0x0000000000000040ULL /* hb io tracing */ | |
93 | #define ML_DLMFS 0x0000000000000080ULL /* dlm user dlmfs */ | |
94 | #define ML_DLM 0x0000000000000100ULL /* dlm general debugging */ | |
95 | #define ML_DLM_DOMAIN 0x0000000000000200ULL /* dlm domain debugging */ | |
96 | #define ML_DLM_THREAD 0x0000000000000400ULL /* dlm domain thread */ | |
97 | #define ML_DLM_MASTER 0x0000000000000800ULL /* dlm master functions */ | |
98 | #define ML_DLM_RECOVERY 0x0000000000001000ULL /* dlm master functions */ | |
99 | #define ML_AIO 0x0000000000002000ULL /* ocfs2 aio read and write */ | |
100 | #define ML_JOURNAL 0x0000000000004000ULL /* ocfs2 journalling functions */ | |
101 | #define ML_DISK_ALLOC 0x0000000000008000ULL /* ocfs2 disk allocation */ | |
102 | #define ML_SUPER 0x0000000000010000ULL /* ocfs2 mount / umount */ | |
103 | #define ML_FILE_IO 0x0000000000020000ULL /* ocfs2 file I/O */ | |
104 | #define ML_EXTENT_MAP 0x0000000000040000ULL /* ocfs2 extent map caching */ | |
105 | #define ML_DLM_GLUE 0x0000000000080000ULL /* ocfs2 dlm glue layer */ | |
106 | #define ML_BH_IO 0x0000000000100000ULL /* ocfs2 buffer I/O */ | |
107 | #define ML_UPTODATE 0x0000000000200000ULL /* ocfs2 caching sequence #'s */ | |
108 | #define ML_NAMEI 0x0000000000400000ULL /* ocfs2 directory / namespace */ | |
109 | #define ML_INODE 0x0000000000800000ULL /* ocfs2 inode manipulation */ | |
110 | #define ML_VOTE 0x0000000001000000ULL /* ocfs2 node messaging */ | |
111 | #define ML_DCACHE 0x0000000002000000ULL /* ocfs2 dcache operations */ | |
112 | #define ML_CONN 0x0000000004000000ULL /* net connection management */ | |
113 | #define ML_QUORUM 0x0000000008000000ULL /* net connection quorum */ | |
114 | #define ML_EXPORT 0x0000000010000000ULL /* ocfs2 export operations */ | |
115 | /* bits that are infrequently given and frequently matched in the high word */ | |
116 | #define ML_ERROR 0x0000000100000000ULL /* sent to KERN_ERR */ | |
117 | #define ML_NOTICE 0x0000000200000000ULL /* setn to KERN_NOTICE */ | |
118 | #define ML_KTHREAD 0x0000000400000000ULL /* kernel thread activity */ | |
119 | ||
120 | #define MLOG_INITIAL_AND_MASK (ML_ERROR|ML_NOTICE) | |
121 | #define MLOG_INITIAL_NOT_MASK (ML_ENTRY|ML_EXIT) | |
122 | #ifndef MLOG_MASK_PREFIX | |
123 | #define MLOG_MASK_PREFIX 0 | |
124 | #endif | |
125 | ||
126 | #define MLOG_MAX_BITS 64 | |
127 | ||
128 | struct mlog_bits { | |
129 | unsigned long words[MLOG_MAX_BITS / BITS_PER_LONG]; | |
130 | }; | |
131 | ||
132 | extern struct mlog_bits mlog_and_bits, mlog_not_bits; | |
133 | ||
134 | #if BITS_PER_LONG == 32 | |
135 | ||
136 | #define __mlog_test_u64(mask, bits) \ | |
137 | ( (u32)(mask & 0xffffffff) & bits.words[0] || \ | |
138 | ((u64)(mask) >> 32) & bits.words[1] ) | |
139 | #define __mlog_set_u64(mask, bits) do { \ | |
140 | bits.words[0] |= (u32)(mask & 0xffffffff); \ | |
141 | bits.words[1] |= (u64)(mask) >> 32; \ | |
142 | } while (0) | |
143 | #define __mlog_clear_u64(mask, bits) do { \ | |
144 | bits.words[0] &= ~((u32)(mask & 0xffffffff)); \ | |
145 | bits.words[1] &= ~((u64)(mask) >> 32); \ | |
146 | } while (0) | |
147 | #define MLOG_BITS_RHS(mask) { \ | |
148 | { \ | |
149 | [0] = (u32)(mask & 0xffffffff), \ | |
150 | [1] = (u64)(mask) >> 32, \ | |
151 | } \ | |
152 | } | |
153 | ||
154 | #else /* 32bit long above, 64bit long below */ | |
155 | ||
156 | #define __mlog_test_u64(mask, bits) ((mask) & bits.words[0]) | |
157 | #define __mlog_set_u64(mask, bits) do { \ | |
158 | bits.words[0] |= (mask); \ | |
159 | } while (0) | |
160 | #define __mlog_clear_u64(mask, bits) do { \ | |
161 | bits.words[0] &= ~(mask); \ | |
162 | } while (0) | |
163 | #define MLOG_BITS_RHS(mask) { { (mask) } } | |
164 | ||
165 | #endif | |
166 | ||
167 | /* | |
168 | * smp_processor_id() "helpfully" screams when called outside preemptible | |
169 | * regions in current kernels. sles doesn't have the variants that don't | |
170 | * scream. just do this instead of trying to guess which we're building | |
171 | * against.. *sigh*. | |
172 | */ | |
173 | #define __mlog_cpu_guess ({ \ | |
174 | unsigned long _cpu = get_cpu(); \ | |
175 | put_cpu(); \ | |
176 | _cpu; \ | |
177 | }) | |
178 | ||
179 | /* In the following two macros, the whitespace after the ',' just | |
180 | * before ##args is intentional. Otherwise, gcc 2.95 will eat the | |
181 | * previous token if args expands to nothing. | |
182 | */ | |
183 | #define __mlog_printk(level, fmt, args...) \ | |
184 | printk(level "(%u,%lu):%s:%d " fmt, current->pid, \ | |
185 | __mlog_cpu_guess, __PRETTY_FUNCTION__, __LINE__ , \ | |
186 | ##args) | |
187 | ||
188 | #define mlog(mask, fmt, args...) do { \ | |
189 | u64 __m = MLOG_MASK_PREFIX | (mask); \ | |
190 | if (__mlog_test_u64(__m, mlog_and_bits) && \ | |
191 | !__mlog_test_u64(__m, mlog_not_bits)) { \ | |
192 | if (__m & ML_ERROR) \ | |
193 | __mlog_printk(KERN_ERR, "ERROR: "fmt , ##args); \ | |
194 | else if (__m & ML_NOTICE) \ | |
195 | __mlog_printk(KERN_NOTICE, fmt , ##args); \ | |
196 | else __mlog_printk(KERN_INFO, fmt , ##args); \ | |
197 | } \ | |
198 | } while (0) | |
199 | ||
200 | #define mlog_errno(st) do { \ | |
201 | int _st = (st); \ | |
202 | if (_st != -ERESTARTSYS && _st != -EINTR && \ | |
203 | _st != AOP_TRUNCATED_PAGE) \ | |
204 | mlog(ML_ERROR, "status = %lld\n", (long long)_st); \ | |
205 | } while (0) | |
206 | ||
207 | #define mlog_entry(fmt, args...) do { \ | |
208 | mlog(ML_ENTRY, "ENTRY:" fmt , ##args); \ | |
209 | } while (0) | |
210 | ||
211 | #define mlog_entry_void() do { \ | |
212 | mlog(ML_ENTRY, "ENTRY:\n"); \ | |
213 | } while (0) | |
214 | ||
a1365647 AM |
215 | /* |
216 | * We disable this for sparse. | |
52fd3d6f | 217 | */ |
a1365647 | 218 | #if !defined(__CHECKER__) |
52fd3d6f ZB |
219 | #define mlog_exit(st) do { \ |
220 | if (__builtin_types_compatible_p(typeof(st), unsigned long)) \ | |
221 | mlog(ML_EXIT, "EXIT: %lu\n", (unsigned long) (st)); \ | |
222 | else if (__builtin_types_compatible_p(typeof(st), signed long)) \ | |
223 | mlog(ML_EXIT, "EXIT: %ld\n", (signed long) (st)); \ | |
224 | else if (__builtin_types_compatible_p(typeof(st), unsigned int) \ | |
225 | || __builtin_types_compatible_p(typeof(st), unsigned short) \ | |
226 | || __builtin_types_compatible_p(typeof(st), unsigned char)) \ | |
227 | mlog(ML_EXIT, "EXIT: %u\n", (unsigned int) (st)); \ | |
228 | else if (__builtin_types_compatible_p(typeof(st), signed int) \ | |
229 | || __builtin_types_compatible_p(typeof(st), signed short) \ | |
230 | || __builtin_types_compatible_p(typeof(st), signed char)) \ | |
231 | mlog(ML_EXIT, "EXIT: %d\n", (signed int) (st)); \ | |
232 | else if (__builtin_types_compatible_p(typeof(st), long long)) \ | |
233 | mlog(ML_EXIT, "EXIT: %lld\n", (long long) (st)); \ | |
234 | else \ | |
235 | mlog(ML_EXIT, "EXIT: %llu\n", (unsigned long long) (st)); \ | |
236 | } while (0) | |
237 | #else | |
238 | #define mlog_exit(st) do { \ | |
239 | mlog(ML_EXIT, "EXIT: %lld\n", (long long) (st)); \ | |
240 | } while (0) | |
241 | #endif | |
242 | ||
243 | #define mlog_exit_ptr(ptr) do { \ | |
244 | mlog(ML_EXIT, "EXIT: %p\n", ptr); \ | |
245 | } while (0) | |
246 | ||
247 | #define mlog_exit_void() do { \ | |
248 | mlog(ML_EXIT, "EXIT\n"); \ | |
249 | } while (0) | |
250 | ||
251 | #define mlog_bug_on_msg(cond, fmt, args...) do { \ | |
252 | if (cond) { \ | |
253 | mlog(ML_ERROR, "bug expression: " #cond "\n"); \ | |
254 | mlog(ML_ERROR, fmt, ##args); \ | |
255 | BUG(); \ | |
256 | } \ | |
257 | } while (0) | |
258 | ||
259 | #if (BITS_PER_LONG == 32) || defined(CONFIG_X86_64) | |
260 | #define MLFi64 "lld" | |
261 | #define MLFu64 "llu" | |
262 | #define MLFx64 "llx" | |
263 | #else | |
264 | #define MLFi64 "ld" | |
265 | #define MLFu64 "lu" | |
266 | #define MLFx64 "lx" | |
267 | #endif | |
268 | ||
269 | #include <linux/kobject.h> | |
270 | #include <linux/sysfs.h> | |
271 | int mlog_sys_init(struct subsystem *o2cb_subsys); | |
272 | void mlog_sys_shutdown(void); | |
273 | ||
274 | #endif /* O2CLUSTER_MASKLOG_H */ |