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 2009 Sun Microsystems, Inc. All rights reserved. 23 * Use is subject to license terms. 24 * 25 * Copyright 2012 Nexenta Systems, Inc. All rights reserved. 26 */ 27 28 #include <sys/param.h> 29 #include <sys/types.h> 30 #include <sys/sysmacros.h> 31 #include <sys/inline.h> 32 #include <sys/varargs.h> 33 #include <sys/systm.h> 34 #include <sys/conf.h> 35 #include <sys/cmn_err.h> 36 #include <sys/syslog.h> 37 #include <sys/log.h> 38 #include <sys/proc.h> 39 #include <sys/vnode.h> 40 #include <sys/session.h> 41 #include <sys/stream.h> 42 #include <sys/kmem.h> 43 #include <sys/kobj.h> 44 #include <sys/atomic.h> 45 #include <sys/console.h> 46 #include <sys/cpuvar.h> 47 #include <sys/modctl.h> 48 #include <sys/reboot.h> 49 #include <sys/debug.h> 50 #include <sys/panic.h> 51 #include <sys/spl.h> 52 #include <sys/zone.h> 53 #include <sys/sunddi.h> 54 55 /* 56 * In some debugging situations it's useful to log all messages to panicbuf, 57 * which is persistent across reboots (on most platforms). The range 58 * panicbuf[panicbuf_log..PANICBUFSIZE-1] may be used for this purpose. 59 * By default, panicbuf_log == PANICBUFSIZE and no messages are logged. 60 * To enable panicbuf logging, set panicbuf_log to a small value, say 1K; 61 * this will reserve 1K for panic information and 7K for message logging. 62 */ 63 uint32_t panicbuf_log = PANICBUFSIZE; 64 uint32_t panicbuf_index = PANICBUFSIZE; 65 66 static int aask, aok; 67 static int ce_to_sl[CE_IGNORE] = { SL_NOTE, SL_NOTE, SL_WARN, SL_FATAL }; 68 static char ce_prefix[CE_IGNORE][10] = { "", "NOTICE: ", "WARNING: ", "" }; 69 static char ce_suffix[CE_IGNORE][2] = { "", "\n", "\n", "" }; 70 71 static void 72 cprintf(const char *fmt, va_list adx, int sl, const char *prefix, 73 const char *suffix, void *site, int mid, int sid, int level, 74 zoneid_t zoneid) 75 { 76 uint32_t msgid; 77 size_t bufsize = LOG_MSGSIZE; 78 char buf[LOG_MSGSIZE]; 79 char *bufp = buf; 80 char *body, *msgp, *bufend; 81 mblk_t *mp; 82 int s, on_intr; 83 size_t len; 84 85 s = splhi(); 86 on_intr = CPU_ON_INTR(CPU) || 87 (interrupts_unleashed && (spltoipl(s) > LOCK_LEVEL)); 88 splx(s); 89 90 ASSERT(zoneid == GLOBAL_ZONEID || !on_intr); 91 92 STRLOG_MAKE_MSGID(fmt, msgid); 93 94 if (strchr("^!?", fmt[0]) != NULL) { 95 if (fmt[0] == '^') 96 sl |= SL_CONSONLY; 97 else if (fmt[0] == '!' || 98 (prefix[0] == '\0' && !(boothowto & RB_VERBOSE))) 99 sl = (sl & ~(SL_USER | SL_NOTE)) | SL_LOGONLY; 100 fmt++; 101 } 102 103 if ((sl & SL_USER) && (MUTEX_HELD(&pidlock) || on_intr)) { 104 zoneid = getzoneid(); 105 sl = sl & ~(SL_USER | SL_LOGONLY) | SL_CONSOLE; 106 } 107 108 retry: 109 bufend = bufp + bufsize; 110 msgp = bufp; 111 body = msgp += snprintf(msgp, bufend - msgp, 112 "%s: [ID %u FACILITY_AND_PRIORITY] ", 113 mod_containing_pc(site), msgid); 114 msgp += snprintf(msgp, bufend - msgp, prefix); 115 msgp += vsnprintf(msgp, bufend - msgp, fmt, adx); 116 msgp += snprintf(msgp, bufend - msgp, suffix); 117 len = strlen(body); 118 119 if (((sl & SL_CONSONLY) && panicstr) || 120 (zoneid == GLOBAL_ZONEID && log_global.lz_active == 0)) { 121 console_printf("%s", body); 122 goto out; 123 } 124 125 if (msgp - bufp >= bufsize && !on_intr) { 126 ASSERT(bufp == buf); 127 bufsize = msgp - bufp + 1; 128 bufp = kmem_alloc(bufsize, KM_NOSLEEP); 129 if (bufp != NULL) 130 goto retry; 131 bufsize = LOG_MSGSIZE; 132 bufp = buf; 133 } 134 135 mp = log_makemsg(mid, sid, level, sl, LOG_KERN, bufp, 136 MIN(bufsize, msgp - bufp + 1), on_intr); 137 if (mp == NULL) { 138 if ((sl & (SL_CONSOLE | SL_LOGONLY)) == SL_CONSOLE && !on_intr) 139 console_printf("%s", body); 140 goto out; 141 } 142 143 if (sl & SL_USER) { 144 ssize_t resid; 145 sess_t *sp; 146 147 if ((sp = tty_hold()) != NULL) { 148 if (sp->s_vp != NULL) 149 (void) vn_rdwr(UIO_WRITE, sp->s_vp, body, 150 len, 0LL, UIO_SYSSPACE, FAPPEND, 151 (rlim64_t)LOG_HIWAT, kcred, &resid); 152 tty_rele(sp); 153 } 154 } 155 156 if (on_intr && !panicstr) { 157 (void) putq(log_intrq, mp); 158 softcall((void (*)(void *))log_flushq, log_intrq); 159 } else { 160 log_sendmsg(mp, zoneid); 161 } 162 out: 163 if (panicbuf_log + len < PANICBUFSIZE) { 164 uint32_t old, new; 165 do { 166 old = panicbuf_index; 167 new = old + len; 168 if (new >= PANICBUFSIZE) 169 new = panicbuf_log + len; 170 } while (atomic_cas_32(&panicbuf_index, old, new) != old); 171 bcopy(body, &panicbuf[new - len], len); 172 } 173 if (bufp != buf) 174 kmem_free(bufp, bufsize); 175 } 176 177 void 178 vzprintf(zoneid_t zoneid, const char *fmt, va_list adx) 179 { 180 cprintf(fmt, adx, SL_CONSOLE | SL_NOTE, "", "", caller(), 0, 0, 0, 181 zoneid); 182 } 183 184 void 185 vprintf(const char *fmt, va_list adx) 186 { 187 vzprintf(GLOBAL_ZONEID, fmt, adx); 188 } 189 190 /*PRINTFLIKE1*/ 191 void 192 printf(const char *fmt, ...) 193 { 194 va_list adx; 195 196 va_start(adx, fmt); 197 cprintf(fmt, adx, SL_CONSOLE | SL_NOTE, "", "", caller(), 0, 0, 0, 198 GLOBAL_ZONEID); 199 va_end(adx); 200 } 201 202 /*PRINTFLIKE2*/ 203 void 204 zprintf(zoneid_t zoneid, const char *fmt, ...) 205 { 206 va_list adx; 207 208 va_start(adx, fmt); 209 cprintf(fmt, adx, SL_CONSOLE | SL_NOTE, "", "", caller(), 0, 0, 0, 210 zoneid); 211 va_end(adx); 212 } 213 214 void 215 vuprintf(const char *fmt, va_list adx) 216 { 217 va_list adxcp; 218 va_copy(adxcp, adx); 219 220 /* Message the user tty, if any, and the global zone syslog */ 221 cprintf(fmt, adx, SL_CONSOLE | SL_LOGONLY | SL_USER | SL_NOTE, 222 "", "", caller(), 0, 0, 0, GLOBAL_ZONEID); 223 224 /* Now message the local zone syslog */ 225 if (!INGLOBALZONE(curproc)) 226 cprintf(fmt, adxcp, SL_CONSOLE | SL_LOGONLY | SL_NOTE, 227 "", "", caller(), 0, 0, 0, getzoneid()); 228 229 va_end(adxcp); 230 } 231 232 /*PRINTFLIKE1*/ 233 void 234 uprintf(const char *fmt, ...) 235 { 236 va_list adx; 237 238 va_start(adx, fmt); 239 240 vuprintf(fmt, adx); 241 242 va_end(adx); 243 } 244 245 void 246 vzcmn_err(zoneid_t zoneid, int ce, const char *fmt, va_list adx) 247 { 248 if (ce == CE_PANIC) 249 vpanic(fmt, adx); 250 if ((uint_t)ce < CE_IGNORE) 251 cprintf(fmt, adx, ce_to_sl[ce] | SL_CONSOLE, 252 ce_prefix[ce], ce_suffix[ce], caller(), 0, 0, 0, 253 zoneid); 254 } 255 256 void 257 vcmn_err(int ce, const char *fmt, va_list adx) 258 { 259 vzcmn_err(GLOBAL_ZONEID, ce, fmt, adx); 260 } 261 262 /*PRINTFLIKE2*/ 263 void 264 cmn_err(int ce, const char *fmt, ...) 265 { 266 va_list adx; 267 268 va_start(adx, fmt); 269 if (ce == CE_PANIC) 270 vpanic(fmt, adx); 271 if ((uint_t)ce < CE_IGNORE) 272 cprintf(fmt, adx, ce_to_sl[ce] | SL_CONSOLE, 273 ce_prefix[ce], ce_suffix[ce], caller(), 0, 0, 0, 274 GLOBAL_ZONEID); 275 va_end(adx); 276 } 277 278 /*PRINTFLIKE3*/ 279 void 280 zcmn_err(zoneid_t zoneid, int ce, const char *fmt, ...) 281 { 282 va_list adx; 283 284 va_start(adx, fmt); 285 if (ce == CE_PANIC) 286 vpanic(fmt, adx); 287 if ((uint_t)ce < CE_IGNORE) 288 cprintf(fmt, adx, ce_to_sl[ce] | SL_CONSOLE, ce_prefix[ce], 289 ce_suffix[ce], caller(), 0, 0, 0, zoneid); 290 va_end(adx); 291 } 292 293 /*PRINTFLIKE3*/ 294 void 295 dev_err(dev_info_t *dip, int ce, char *fmt, ...) 296 { 297 va_list ap; 298 char buf[LOG_MSGSIZE]; 299 300 (void) snprintf(buf, sizeof (buf), "%s%d: %s", 301 ddi_driver_name(dip), ddi_get_instance(dip), fmt); 302 303 va_start(ap, fmt); 304 vcmn_err(ce, buf, ap); 305 va_end(ap); 306 } 307 308 int 309 assfail(const char *a, const char *f, int l) 310 { 311 if (aask) { 312 printf("ASSERTION CAUGHT: %s, file: %s, line: %d", a, f, l); 313 debug_enter(NULL); 314 } 315 316 if (!aok && !panicstr) 317 panic("assertion failed: %s, file: %s, line: %d", a, f, l); 318 319 return (0); 320 } 321 322 void 323 assfail3(const char *a, uintmax_t lv, const char *op, uintmax_t rv, 324 const char *f, int l) 325 { 326 if (aask) { 327 printf("ASSERTION CAUGHT: %s (0x%llx %s 0x%llx), file: %s, " 328 "line: %d", a, (u_longlong_t)lv, op, (u_longlong_t)rv, 329 f, l); 330 debug_enter(NULL); 331 } 332 333 if (!aok && !panicstr) 334 panic("assertion failed: %s (0x%llx %s 0x%llx), file: %s, " 335 "line: %d", a, (u_longlong_t)lv, op, (u_longlong_t)rv, 336 f, l); 337 } 338 339 int 340 strlog(short mid, short sid, char level, ushort_t sl, char *fmt, ...) 341 { 342 if (sl & log_global.lz_active) { 343 va_list adx; 344 va_start(adx, fmt); 345 cprintf(fmt, adx, sl, "", "", caller(), mid, sid, level, 346 GLOBAL_ZONEID); 347 va_end(adx); 348 } 349 return (1); 350 } 351 352 int 353 vstrlog(short mid, short sid, char level, ushort_t sl, char *fmt, va_list adx) 354 { 355 if (sl & log_global.lz_active) 356 cprintf(fmt, adx, sl, "", "", caller(), mid, sid, level, 357 GLOBAL_ZONEID); 358 return (1); 359 } 360