1 /* $OpenBSD: bss_log.c,v 1.23 2022/01/07 09:02:17 tb Exp $ */ 2 /* ==================================================================== 3 * Copyright (c) 1999 The OpenSSL Project. All rights reserved. 4 * 5 * Redistribution and use in source and binary forms, with or without 6 * modification, are permitted provided that the following conditions 7 * are met: 8 * 9 * 1. Redistributions of source code must retain the above copyright 10 * notice, this list of conditions and the following disclaimer. 11 * 12 * 2. Redistributions in binary form must reproduce the above copyright 13 * notice, this list of conditions and the following disclaimer in 14 * the documentation and/or other materials provided with the 15 * distribution. 16 * 17 * 3. All advertising materials mentioning features or use of this 18 * software must display the following acknowledgment: 19 * "This product includes software developed by the OpenSSL Project 20 * for use in the OpenSSL Toolkit. (http://www.OpenSSL.org/)" 21 * 22 * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to 23 * endorse or promote products derived from this software without 24 * prior written permission. For written permission, please contact 25 * licensing@OpenSSL.org. 26 * 27 * 5. Products derived from this software may not be called "OpenSSL" 28 * nor may "OpenSSL" appear in their names without prior written 29 * permission of the OpenSSL Project. 30 * 31 * 6. Redistributions of any form whatsoever must retain the following 32 * acknowledgment: 33 * "This product includes software developed by the OpenSSL Project 34 * for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)" 35 * 36 * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY 37 * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 38 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 39 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE OpenSSL PROJECT OR 40 * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, 41 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 42 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; 43 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 44 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, 45 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 46 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED 47 * OF THE POSSIBILITY OF SUCH DAMAGE. 48 * ==================================================================== 49 * 50 * This product includes cryptographic software written by Eric Young 51 * (eay@cryptsoft.com). This product includes software written by Tim 52 * Hudson (tjh@cryptsoft.com). 53 * 54 */ 55 56 /* 57 Why BIO_s_log? 58 59 BIO_s_log is useful for system daemons (or services under NT). 60 It is one-way BIO, it sends all stuff to syslogd (on system that 61 commonly use that), or event log (on NT), or OPCOM (on OpenVMS). 62 63 */ 64 65 #include <errno.h> 66 #include <stdio.h> 67 #include <string.h> 68 #include <syslog.h> 69 70 #include <openssl/buffer.h> 71 #include <openssl/err.h> 72 73 #include "bio_local.h" 74 75 #ifndef NO_SYSLOG 76 77 static int slg_write(BIO *h, const char *buf, int num); 78 static int slg_puts(BIO *h, const char *str); 79 static long slg_ctrl(BIO *h, int cmd, long arg1, void *arg2); 80 static int slg_new(BIO *h); 81 static int slg_free(BIO *data); 82 static void xopenlog(BIO* bp, char* name, int level); 83 static void xsyslog(BIO* bp, int priority, const char* string); 84 static void xcloselog(BIO* bp); 85 86 static const BIO_METHOD methods_slg = { 87 .type = BIO_TYPE_MEM, 88 .name = "syslog", 89 .bwrite = slg_write, 90 .bputs = slg_puts, 91 .ctrl = slg_ctrl, 92 .create = slg_new, 93 .destroy = slg_free 94 }; 95 96 const BIO_METHOD * 97 BIO_s_log(void) 98 { 99 return (&methods_slg); 100 } 101 102 static int 103 slg_new(BIO *bi) 104 { 105 bi->init = 1; 106 bi->num = 0; 107 bi->ptr = NULL; 108 xopenlog(bi, "application", LOG_DAEMON); 109 return (1); 110 } 111 112 static int 113 slg_free(BIO *a) 114 { 115 if (a == NULL) 116 return (0); 117 xcloselog(a); 118 return (1); 119 } 120 121 static int 122 slg_write(BIO *b, const char *in, int inl) 123 { 124 int ret = inl; 125 char* buf; 126 char* pp; 127 int priority, i; 128 static const struct { 129 int strl; 130 char str[10]; 131 int log_level; 132 } 133 mapping[] = { 134 { 6, "PANIC ", LOG_EMERG }, 135 { 6, "EMERG ", LOG_EMERG }, 136 { 4, "EMR ", LOG_EMERG }, 137 { 6, "ALERT ", LOG_ALERT }, 138 { 4, "ALR ", LOG_ALERT }, 139 { 5, "CRIT ", LOG_CRIT }, 140 { 4, "CRI ", LOG_CRIT }, 141 { 6, "ERROR ", LOG_ERR }, 142 { 4, "ERR ", LOG_ERR }, 143 { 8, "WARNING ", LOG_WARNING }, 144 { 5, "WARN ", LOG_WARNING }, 145 { 4, "WAR ", LOG_WARNING }, 146 { 7, "NOTICE ", LOG_NOTICE }, 147 { 5, "NOTE ", LOG_NOTICE }, 148 { 4, "NOT ", LOG_NOTICE }, 149 { 5, "INFO ", LOG_INFO }, 150 { 4, "INF ", LOG_INFO }, 151 { 6, "DEBUG ", LOG_DEBUG }, 152 { 4, "DBG ", LOG_DEBUG }, 153 { 0, "", LOG_ERR } /* The default */ 154 }; 155 156 if ((buf = malloc(inl + 1)) == NULL) { 157 return (0); 158 } 159 strlcpy(buf, in, inl + 1); 160 i = 0; 161 while (strncmp(buf, mapping[i].str, mapping[i].strl) != 0) 162 i++; 163 priority = mapping[i].log_level; 164 pp = buf + mapping[i].strl; 165 166 xsyslog(b, priority, pp); 167 168 free(buf); 169 return (ret); 170 } 171 172 static long 173 slg_ctrl(BIO *b, int cmd, long num, void *ptr) 174 { 175 switch (cmd) { 176 case BIO_CTRL_SET: 177 xcloselog(b); 178 xopenlog(b, ptr, num); 179 break; 180 default: 181 break; 182 } 183 return (0); 184 } 185 186 static int 187 slg_puts(BIO *bp, const char *str) 188 { 189 int n, ret; 190 191 n = strlen(str); 192 ret = slg_write(bp, str, n); 193 return (ret); 194 } 195 196 197 static void 198 xopenlog(BIO* bp, char* name, int level) 199 { 200 openlog(name, LOG_PID|LOG_CONS, level); 201 } 202 203 static void 204 xsyslog(BIO *bp, int priority, const char *string) 205 { 206 syslog(priority, "%s", string); 207 } 208 209 static void 210 xcloselog(BIO* bp) 211 { 212 closelog(); 213 } 214 215 #endif /* NO_SYSLOG */ 216