1 /* 2 * Copyright (c) 1983, 1993 3 * The Regents of the University of California. 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 * 1. Redistributions of source code must retain the above copyright 9 * notice, this list of conditions and the following disclaimer. 10 * 2. Redistributions in binary form must reproduce the above copyright 11 * notice, this list of conditions and the following disclaimer in the 12 * documentation and/or other materials provided with the distribution. 13 * 3. All advertising materials mentioning features or use of this software 14 * must display the following acknowledgement: 15 * This product includes software developed by the University of 16 * California, Berkeley and its contributors. 17 * 4. Neither the name of the University nor the names of its contributors 18 * may be used to endorse or promote products derived from this software 19 * without specific prior written permission. 20 * 21 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 22 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 24 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 25 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 26 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 27 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 28 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 29 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 30 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 31 * SUCH DAMAGE. 32 */ 33 34 #ifndef lint 35 static const char copyright[] = 36 "@(#) Copyright (c) 1983, 1993\n\ 37 The Regents of the University of California. All rights reserved.\n"; 38 #endif /* not lint */ 39 40 #ifndef lint 41 #if 0 42 static char sccsid[] = "@(#)logger.c 8.1 (Berkeley) 6/6/93"; 43 #endif 44 static const char rcsid[] = 45 "$FreeBSD$"; 46 #endif /* not lint */ 47 48 #include <sys/types.h> 49 #include <sys/socket.h> 50 #include <netinet/in.h> 51 52 #include <ctype.h> 53 #include <err.h> 54 #include <netdb.h> 55 #include <stdio.h> 56 #include <stdlib.h> 57 #include <string.h> 58 #include <unistd.h> 59 60 #define SYSLOG_NAMES 61 #include <syslog.h> 62 63 int decode __P((char *, CODE *)); 64 int pencode __P((char *)); 65 static void logmessage __P((int, char *, char *)); 66 static void usage __P((void)); 67 68 /* 69 * logger -- read and log utility 70 * 71 * Reads from an input and arranges to write the result on the system 72 * log. 73 */ 74 int 75 main(argc, argv) 76 int argc; 77 char *argv[]; 78 { 79 int ch, logflags, pri; 80 char *tag, *host, buf[1024]; 81 82 tag = NULL; 83 host = NULL; 84 pri = LOG_NOTICE; 85 logflags = 0; 86 unsetenv("TZ"); 87 while ((ch = getopt(argc, argv, "f:h:ip:st:")) != -1) 88 switch((char)ch) { 89 case 'f': /* file to log */ 90 if (freopen(optarg, "r", stdin) == NULL) 91 err(1, "%s", optarg); 92 break; 93 case 'h': /* hostname to deliver to */ 94 host = optarg; 95 break; 96 case 'i': /* log process id also */ 97 logflags |= LOG_PID; 98 break; 99 case 'p': /* priority */ 100 pri = pencode(optarg); 101 break; 102 case 's': /* log to standard error */ 103 logflags |= LOG_PERROR; 104 break; 105 case 't': /* tag */ 106 tag = optarg; 107 break; 108 case '?': 109 default: 110 usage(); 111 } 112 argc -= optind; 113 argv += optind; 114 115 /* setup for logging */ 116 openlog(tag ? tag : getlogin(), logflags, 0); 117 (void) fclose(stdout); 118 119 /* log input line if appropriate */ 120 if (argc > 0) { 121 register char *p, *endp; 122 int len; 123 124 for (p = buf, endp = buf + sizeof(buf) - 2; *argv;) { 125 len = strlen(*argv); 126 if (p + len > endp && p > buf) { 127 logmessage(pri, host, buf); 128 p = buf; 129 } 130 if (len > sizeof(buf) - 1) 131 logmessage(pri, host, *argv++); 132 else { 133 if (p != buf) 134 *p++ = ' '; 135 bcopy(*argv++, p, len); 136 *(p += len) = '\0'; 137 } 138 } 139 if (p != buf) 140 logmessage(pri, host, buf); 141 } else 142 while (fgets(buf, sizeof(buf), stdin) != NULL) 143 logmessage(pri, host, buf); 144 exit(0); 145 } 146 147 /* 148 * Send the message to syslog, either on the local host, or on a remote host 149 */ 150 void 151 logmessage(int pri, char *host, char *buf) 152 { 153 static int sock = -1; 154 static struct sockaddr_in sin; 155 char *line; 156 int len; 157 158 if (host == NULL) { 159 syslog(pri, "%s", buf); 160 return; 161 } 162 163 if (sock == -1) { /* set up socket stuff */ 164 struct servent *sp; 165 struct hostent *hp = NULL; 166 167 sin.sin_family = AF_INET; 168 169 if ((sp = getservbyname("syslog", "udp")) == NULL) 170 warnx ("syslog/udp: unknown service"); /* not fatal */ 171 sin.sin_port = (sp == NULL ? htons(514) : sp->s_port); 172 173 /* resolve hostname */ 174 if (!(inet_aton(host, &sin.sin_addr)) && 175 (hp = gethostbyname(host)) == NULL) 176 errx(1, "unknown host: %s", host); 177 if (hp != NULL) 178 memcpy(&sin.sin_addr, hp->h_addr, sizeof(sin.sin_addr)); 179 180 sock = socket(PF_INET, SOCK_DGRAM, 0); 181 if (sock < 0) 182 errx(1, "socket"); 183 } 184 185 if ((len = asprintf(&line, "<%d>%s", pri, buf)) == -1) 186 errx(1, "asprintf"); 187 188 if (sendto(sock, line, len, 0, (struct sockaddr *)&sin, sizeof(sin)) 189 < len) 190 warnx ("sendmsg"); 191 192 free(line); 193 } 194 195 /* 196 * Decode a symbolic name to a numeric value 197 */ 198 int 199 pencode(s) 200 register char *s; 201 { 202 char *save; 203 int fac, lev; 204 205 for (save = s; *s && *s != '.'; ++s); 206 if (*s) { 207 *s = '\0'; 208 fac = decode(save, facilitynames); 209 if (fac < 0) 210 errx(1, "unknown facility name: %s", save); 211 *s++ = '.'; 212 } 213 else { 214 fac = 0; 215 s = save; 216 } 217 lev = decode(s, prioritynames); 218 if (lev < 0) 219 errx(1, "unknown priority name: %s", save); 220 return ((lev & LOG_PRIMASK) | (fac & LOG_FACMASK)); 221 } 222 223 int 224 decode(name, codetab) 225 char *name; 226 CODE *codetab; 227 { 228 register CODE *c; 229 230 if (isdigit(*name)) 231 return (atoi(name)); 232 233 for (c = codetab; c->c_name; c++) 234 if (!strcasecmp(name, c->c_name)) 235 return (c->c_val); 236 237 return (-1); 238 } 239 240 static void 241 usage() 242 { 243 (void)fprintf(stderr, "usage: %s\n", 244 "logger [-is] [-f file] [-h host] [-p pri] [-t tag] [message ...]" 245 ); 246 exit(1); 247 } 248