subr_log.c revision 1.59.4.1
1 /* $NetBSD: subr_log.c,v 1.59.4.1 2025/04/12 12:18:43 martin Exp $ */ 2 3 /*- 4 * Copyright (c) 2007, 2008 The NetBSD Foundation, Inc. 5 * All rights reserved. 6 * 7 * This code is derived from software contributed to The NetBSD Foundation 8 * by Andrew Doran. 9 * 10 * Redistribution and use in source and binary forms, with or without 11 * modification, are permitted provided that the following conditions 12 * are met: 13 * 1. Redistributions of source code must retain the above copyright 14 * notice, this list of conditions and the following disclaimer. 15 * 2. Redistributions in binary form must reproduce the above copyright 16 * notice, this list of conditions and the following disclaimer in the 17 * documentation and/or other materials provided with the distribution. 18 * 19 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 20 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 21 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 22 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 23 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 24 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 25 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 26 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 27 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 28 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 29 * POSSIBILITY OF SUCH DAMAGE. 30 */ 31 32 /* 33 * Copyright (c) 1982, 1986, 1993 34 * The Regents of the University of California. All rights reserved. 35 * 36 * Redistribution and use in source and binary forms, with or without 37 * modification, are permitted provided that the following conditions 38 * are met: 39 * 1. Redistributions of source code must retain the above copyright 40 * notice, this list of conditions and the following disclaimer. 41 * 2. Redistributions in binary form must reproduce the above copyright 42 * notice, this list of conditions and the following disclaimer in the 43 * documentation and/or other materials provided with the distribution. 44 * 3. Neither the name of the University nor the names of its contributors 45 * may be used to endorse or promote products derived from this software 46 * without specific prior written permission. 47 * 48 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 49 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 50 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 51 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 52 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 53 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 54 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 55 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 56 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 57 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 58 * SUCH DAMAGE. 59 * 60 * @(#)subr_log.c 8.3 (Berkeley) 2/14/95 61 */ 62 63 /* 64 * Error log buffer for kernel printf's. 65 */ 66 67 #include <sys/cdefs.h> 68 __KERNEL_RCSID(0, "$NetBSD: subr_log.c,v 1.59.4.1 2025/04/12 12:18:43 martin Exp $"); 69 70 #include <sys/param.h> 71 #include <sys/systm.h> 72 #include <sys/kernel.h> 73 #include <sys/proc.h> 74 #include <sys/vnode.h> 75 #include <sys/ioctl.h> 76 #include <sys/msgbuf.h> 77 #include <sys/file.h> 78 #include <sys/syslog.h> 79 #include <sys/conf.h> 80 #include <sys/select.h> 81 #include <sys/poll.h> 82 #include <sys/intr.h> 83 #include <sys/sysctl.h> 84 #include <sys/ktrace.h> 85 86 static int sysctl_msgbuf(SYSCTLFN_PROTO); 87 88 static void logsoftintr(void *); 89 90 static bool log_async; 91 static struct selinfo log_selp; /* process waiting on select call */ 92 static pid_t log_pgid; /* process/group for async I/O */ 93 static kcondvar_t log_cv; 94 static void *log_sih; 95 96 kmutex_t log_lock; 97 int log_open; /* also used in log() */ 98 int msgbufmapped; /* is the message buffer mapped */ 99 int msgbufenabled; /* is logging to the buffer enabled */ 100 struct kern_msgbuf *msgbufp; /* the mapped buffer, itself. */ 101 102 void 103 initmsgbuf(void *bf, size_t bufsize) 104 { 105 struct kern_msgbuf *mbp; 106 long new_bufs; 107 108 /* Sanity-check the given size. */ 109 if (bufsize < sizeof(struct kern_msgbuf)) 110 return; 111 112 mbp = msgbufp = (struct kern_msgbuf *)bf; 113 114 new_bufs = bufsize - offsetof(struct kern_msgbuf, msg_bufc); 115 if ((mbp->msg_magic != MSG_MAGIC) || (mbp->msg_bufs != new_bufs) || 116 (mbp->msg_bufr < 0) || (mbp->msg_bufr >= mbp->msg_bufs) || 117 (mbp->msg_bufx < 0) || (mbp->msg_bufx >= mbp->msg_bufs)) { 118 /* 119 * If the buffer magic number is wrong, has changed 120 * size (which shouldn't happen often), or is 121 * internally inconsistent, initialize it. 122 */ 123 124 memset(bf, 0, bufsize); 125 mbp->msg_magic = MSG_MAGIC; 126 mbp->msg_bufs = new_bufs; 127 } 128 129 /* mark it as ready for use. */ 130 msgbufmapped = msgbufenabled = 1; 131 } 132 133 void 134 loginit(void) 135 { 136 137 mutex_init(&log_lock, MUTEX_DEFAULT, IPL_VM); 138 selinit(&log_selp); 139 cv_init(&log_cv, "klog"); 140 log_sih = softint_establish(SOFTINT_CLOCK | SOFTINT_MPSAFE, 141 logsoftintr, NULL); 142 143 sysctl_createv(NULL, 0, NULL, NULL, 144 CTLFLAG_PERMANENT, 145 CTLTYPE_INT, "msgbufsize", 146 SYSCTL_DESCR("Size of the kernel message buffer"), 147 sysctl_msgbuf, 0, NULL, 0, 148 CTL_KERN, KERN_MSGBUFSIZE, CTL_EOL); 149 sysctl_createv(NULL, 0, NULL, NULL, 150 CTLFLAG_PERMANENT, 151 CTLTYPE_INT, "msgbuf", 152 SYSCTL_DESCR("Kernel message buffer"), 153 sysctl_msgbuf, 0, NULL, 0, 154 CTL_KERN, KERN_MSGBUF, CTL_EOL); 155 } 156 157 /*ARGSUSED*/ 158 static int 159 logopen(dev_t dev, int flags, int mode, struct lwp *l) 160 { 161 struct kern_msgbuf *mbp = msgbufp; 162 int error = 0; 163 164 mutex_spin_enter(&log_lock); 165 if (log_open) { 166 error = EBUSY; 167 } else { 168 log_open = 1; 169 log_pgid = l->l_proc->p_pid; /* signal process only */ 170 /* 171 * The message buffer is initialized during system 172 * configuration. If it's been clobbered, note that 173 * and return an error. (This allows a user to read 174 * the buffer via /dev/kmem, and try to figure out 175 * what clobbered it. 176 */ 177 if (mbp->msg_magic != MSG_MAGIC) { 178 msgbufenabled = 0; 179 error = ENXIO; 180 } 181 } 182 mutex_spin_exit(&log_lock); 183 184 return error; 185 } 186 187 /*ARGSUSED*/ 188 static int 189 logclose(dev_t dev, int flag, int mode, struct lwp *l) 190 { 191 192 mutex_spin_enter(&log_lock); 193 log_pgid = 0; 194 log_open = 0; 195 log_async = 0; 196 mutex_spin_exit(&log_lock); 197 198 return 0; 199 } 200 201 /*ARGSUSED*/ 202 static int 203 logread(dev_t dev, struct uio *uio, int flag) 204 { 205 struct kern_msgbuf *mbp = msgbufp; 206 long l; 207 int error = 0; 208 209 mutex_spin_enter(&log_lock); 210 while (mbp->msg_bufr == mbp->msg_bufx) { 211 if (flag & IO_NDELAY) { 212 mutex_spin_exit(&log_lock); 213 return EWOULDBLOCK; 214 } 215 error = cv_wait_sig(&log_cv, &log_lock); 216 if (error) { 217 mutex_spin_exit(&log_lock); 218 return error; 219 } 220 } 221 while (uio->uio_resid > 0) { 222 char buf[128]; /* taken from FreeBSD */ 223 224 l = mbp->msg_bufx - mbp->msg_bufr; 225 if (l < 0) 226 l = mbp->msg_bufs - mbp->msg_bufr; 227 l = ulmin(l, uio->uio_resid); 228 if (l == 0) 229 break; 230 231 l = ulmin(l, sizeof(buf)); 232 memcpy(buf, &mbp->msg_bufc[mbp->msg_bufr], l); 233 mbp->msg_bufr += l; 234 if (mbp->msg_bufr < 0 || mbp->msg_bufr >= mbp->msg_bufs) 235 mbp->msg_bufr = 0; 236 mutex_spin_exit(&log_lock); 237 error = uiomove(buf, l, uio); 238 mutex_spin_enter(&log_lock); 239 if (error) 240 break; 241 } 242 mutex_spin_exit(&log_lock); 243 244 return error; 245 } 246 247 /*ARGSUSED*/ 248 static int 249 logpoll(dev_t dev, int events, struct lwp *l) 250 { 251 int revents = 0; 252 253 if (events & (POLLIN | POLLRDNORM)) { 254 mutex_spin_enter(&log_lock); 255 if (msgbufp->msg_bufr != msgbufp->msg_bufx) 256 revents |= events & (POLLIN | POLLRDNORM); 257 else 258 selrecord(l, &log_selp); 259 mutex_spin_exit(&log_lock); 260 } 261 262 return revents; 263 } 264 265 static void 266 filt_logrdetach(struct knote *kn) 267 { 268 269 mutex_spin_enter(&log_lock); 270 SLIST_REMOVE(&log_selp.sel_klist, kn, knote, kn_selnext); 271 mutex_spin_exit(&log_lock); 272 } 273 274 static int 275 filt_logread(struct knote *kn, long hint) 276 { 277 int rv; 278 279 if ((hint & NOTE_SUBMIT) == 0) 280 mutex_spin_enter(&log_lock); 281 if (msgbufp->msg_bufr == msgbufp->msg_bufx) { 282 rv = 0; 283 } else if (msgbufp->msg_bufr < msgbufp->msg_bufx) { 284 kn->kn_data = msgbufp->msg_bufx - msgbufp->msg_bufr; 285 rv = 1; 286 } else { 287 kn->kn_data = (msgbufp->msg_bufs - msgbufp->msg_bufr) + 288 msgbufp->msg_bufx; 289 rv = 1; 290 } 291 if ((hint & NOTE_SUBMIT) == 0) 292 mutex_spin_exit(&log_lock); 293 294 return rv; 295 } 296 297 static const struct filterops logread_filtops = { 298 .f_isfd = 1, 299 .f_attach = NULL, 300 .f_detach = filt_logrdetach, 301 .f_event = filt_logread, 302 }; 303 304 static int 305 logkqfilter(dev_t dev, struct knote *kn) 306 { 307 struct klist *klist; 308 309 switch (kn->kn_filter) { 310 case EVFILT_READ: 311 klist = &log_selp.sel_klist; 312 kn->kn_fop = &logread_filtops; 313 break; 314 315 default: 316 return (EINVAL); 317 } 318 319 mutex_spin_enter(&log_lock); 320 kn->kn_hook = NULL; 321 SLIST_INSERT_HEAD(klist, kn, kn_selnext); 322 mutex_spin_exit(&log_lock); 323 324 return (0); 325 } 326 327 void 328 logwakeup(void) 329 { 330 331 if (!cold && log_open) { 332 mutex_spin_enter(&log_lock); 333 selnotify(&log_selp, 0, NOTE_SUBMIT); 334 if (log_async) 335 softint_schedule(log_sih); 336 cv_broadcast(&log_cv); 337 mutex_spin_exit(&log_lock); 338 } 339 } 340 341 static void 342 logsoftintr(void *cookie) 343 { 344 pid_t pid; 345 346 if ((pid = log_pgid) != 0) 347 fownsignal(pid, SIGIO, 0, 0, NULL); 348 } 349 350 /*ARGSUSED*/ 351 static int 352 logioctl(dev_t dev, u_long com, void *data, int flag, struct lwp *lwp) 353 { 354 long l; 355 356 switch (com) { 357 358 /* return number of characters immediately available */ 359 case FIONREAD: 360 mutex_spin_enter(&log_lock); 361 l = msgbufp->msg_bufx - msgbufp->msg_bufr; 362 if (l < 0) 363 l += msgbufp->msg_bufs; 364 mutex_spin_exit(&log_lock); 365 *(int *)data = l; 366 break; 367 368 case FIONBIO: 369 break; 370 371 case FIOASYNC: 372 /* No locking needed, 'thread private'. */ 373 log_async = (*((int *)data) != 0); 374 break; 375 376 case TIOCSPGRP: 377 case FIOSETOWN: 378 return fsetown(&log_pgid, com, data); 379 380 case TIOCGPGRP: 381 case FIOGETOWN: 382 return fgetown(log_pgid, com, data); 383 384 default: 385 return (EPASSTHROUGH); 386 } 387 return (0); 388 } 389 390 static void 391 logskip(struct kern_msgbuf *mbp) 392 { 393 /* 394 * Move forward read pointer to the next line 395 * in the buffer. Note that the buffer is 396 * a ring buffer so we should reset msg_bufr 397 * to 0 when msg_bufr exceeds msg_bufs. 398 * 399 * To prevent to loop forever, give up if we 400 * cannot find a newline in mbp->msg_bufs 401 * characters (the max size of the buffer). 402 */ 403 for (int i = 0; i < mbp->msg_bufs; i++) { 404 char c0 = mbp->msg_bufc[mbp->msg_bufr]; 405 if (++mbp->msg_bufr >= mbp->msg_bufs) 406 mbp->msg_bufr = 0; 407 if (c0 == '\n') 408 break; 409 } 410 } 411 412 static void 413 logaddchar(struct kern_msgbuf *mbp, int c) 414 { 415 mbp->msg_bufc[mbp->msg_bufx++] = c; 416 if (mbp->msg_bufx < 0 || mbp->msg_bufx >= mbp->msg_bufs) 417 mbp->msg_bufx = 0; 418 419 /* If the buffer is full, keep the most recent data. */ 420 if (mbp->msg_bufr == mbp->msg_bufx) 421 logskip(mbp); 422 } 423 424 void 425 logputchar(int c) 426 { 427 struct kern_msgbuf *mbp; 428 429 if (!cold) 430 mutex_spin_enter(&log_lock); 431 432 if (!msgbufenabled) 433 goto out; 434 435 mbp = msgbufp; 436 if (mbp->msg_magic != MSG_MAGIC) { 437 /* 438 * Arguably should panic or somehow notify the 439 * user... but how? Panic may be too drastic, 440 * and would obliterate the message being kicked 441 * out (maybe a panic itself), and printf 442 * would invoke us recursively. Silently punt 443 * for now. If syslog is running, it should 444 * notice. 445 */ 446 msgbufenabled = 0; 447 goto out; 448 449 } 450 451 logaddchar(mbp, c); 452 453 out: 454 if (!cold) 455 mutex_spin_exit(&log_lock); 456 } 457 458 /* 459 * sysctl helper routine for kern.msgbufsize and kern.msgbuf. For the 460 * former it merely checks the message buffer is set up. For the latter, 461 * it also copies out the data if necessary. 462 */ 463 static int 464 sysctl_msgbuf(SYSCTLFN_ARGS) 465 { 466 char *where = oldp; 467 size_t len, maxlen; 468 long beg, end; 469 extern kmutex_t log_lock; 470 int error; 471 472 if (!logenabled(msgbufp)) { 473 msgbufenabled = 0; 474 return (ENXIO); 475 } 476 477 switch (rnode->sysctl_num) { 478 case KERN_MSGBUFSIZE: { 479 struct sysctlnode node = *rnode; 480 int msg_bufs = (int)msgbufp->msg_bufs; 481 node.sysctl_data = &msg_bufs; 482 return (sysctl_lookup(SYSCTLFN_CALL(&node))); 483 } 484 case KERN_MSGBUF: 485 break; 486 default: 487 return (EOPNOTSUPP); 488 } 489 490 if (newp != NULL) 491 return (EPERM); 492 493 if (oldp == NULL) { 494 /* always return full buffer size */ 495 *oldlenp = msgbufp->msg_bufs; 496 return (0); 497 } 498 499 sysctl_unlock(); 500 501 /* 502 * First, copy from the write pointer to the end of 503 * message buffer. 504 */ 505 error = 0; 506 mutex_spin_enter(&log_lock); 507 maxlen = MIN(msgbufp->msg_bufs, *oldlenp); 508 beg = msgbufp->msg_bufx; 509 end = msgbufp->msg_bufs; 510 mutex_spin_exit(&log_lock); 511 512 while (maxlen > 0) { 513 len = MIN(end - beg, maxlen); 514 if (len == 0) 515 break; 516 /* XXX unlocked, but hardly matters. */ 517 error = copyout(&msgbufp->msg_bufc[beg], where, len); 518 ktrmibio(-1, UIO_READ, where, len, error); 519 if (error) 520 break; 521 where += len; 522 maxlen -= len; 523 524 /* 525 * ... then, copy from the beginning of message buffer to 526 * the write pointer. 527 */ 528 beg = 0; 529 end = msgbufp->msg_bufx; 530 } 531 532 sysctl_relock(); 533 return (error); 534 } 535 536 const struct cdevsw log_cdevsw = { 537 .d_open = logopen, 538 .d_close = logclose, 539 .d_read = logread, 540 .d_write = nowrite, 541 .d_ioctl = logioctl, 542 .d_stop = nostop, 543 .d_tty = notty, 544 .d_poll = logpoll, 545 .d_mmap = nommap, 546 .d_kqfilter = logkqfilter, 547 .d_discard = nodiscard, 548 .d_flag = D_OTHER | D_MPSAFE 549 }; 550
Indexes created Mon Sep 29 21:09:56 GMT 2025