1 /*-
2 * SPDX-License-Identifier: BSD-2-Clause
3 *
4 * Copyright (c) 2017 Mariusz Zaborski <oshogbo@FreeBSD.org>
5 * All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 *
16 * THIS SOFTWARE IS PROVIDED BY THE AUTHORS AND CONTRIBUTORS ``AS IS'' AND
17 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
18 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
19 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHORS OR CONTRIBUTORS BE LIABLE
20 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
21 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
22 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
23 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
24 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
25 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
26 * SUCH DAMAGE.
27 */
28
29 #include <sys/cdefs.h>
30 #include <sys/dnv.h>
31 #include <sys/nv.h>
32
33 #include <assert.h>
34 #include <errno.h>
35 #include <stdarg.h>
36 #include <stdio.h>
37 #include <stdlib.h>
38 #include <string.h>
39 #include <syslog.h>
40
41 #include <libcasper.h>
42 #include <libcasper_service.h>
43
44 #include "cap_syslog.h"
45
46 #define CAP_SYSLOG_LIMIT 2048
47
48 void
cap_syslog(cap_channel_t * chan,int pri,const char * fmt,...)49 cap_syslog(cap_channel_t *chan, int pri, const char *fmt, ...)
50 {
51 va_list ap;
52
53 va_start(ap, fmt);
54 cap_vsyslog(chan, pri, fmt, ap);
55 va_end(ap);
56 }
57
58 void
cap_vsyslog(cap_channel_t * chan,int priority,const char * fmt,va_list ap)59 cap_vsyslog(cap_channel_t *chan, int priority, const char *fmt, va_list ap)
60 {
61 nvlist_t *nvl;
62 char message[CAP_SYSLOG_LIMIT];
63
64 (void)vsnprintf(message, sizeof(message), fmt, ap);
65
66 nvl = nvlist_create(0);
67 nvlist_add_string(nvl, "cmd", "vsyslog");
68 nvlist_add_number(nvl, "priority", priority);
69 nvlist_add_string(nvl, "message", message);
70 nvl = cap_xfer_nvlist(chan, nvl);
71 if (nvl == NULL) {
72 return;
73 }
74 nvlist_destroy(nvl);
75 }
76
77 void
cap_openlog(cap_channel_t * chan,const char * ident,int logopt,int facility)78 cap_openlog(cap_channel_t *chan, const char *ident, int logopt, int facility)
79 {
80 nvlist_t *nvl;
81
82 nvl = nvlist_create(0);
83 nvlist_add_string(nvl, "cmd", "openlog");
84 if (ident != NULL) {
85 nvlist_add_string(nvl, "ident", ident);
86 }
87 nvlist_add_number(nvl, "logopt", logopt);
88 nvlist_add_number(nvl, "facility", facility);
89 if (logopt & LOG_PERROR) {
90 nvlist_add_descriptor(nvl, "stderr", STDERR_FILENO);
91 }
92 nvl = cap_xfer_nvlist(chan, nvl);
93 if (nvl == NULL) {
94 return;
95 }
96 nvlist_destroy(nvl);
97 }
98
99 void
cap_closelog(cap_channel_t * chan)100 cap_closelog(cap_channel_t *chan)
101 {
102 nvlist_t *nvl;
103
104 nvl = nvlist_create(0);
105 nvlist_add_string(nvl, "cmd", "closelog");
106 nvl = cap_xfer_nvlist(chan, nvl);
107 if (nvl == NULL) {
108 return;
109 }
110 nvlist_destroy(nvl);
111 }
112
113 int
cap_setlogmask(cap_channel_t * chan,int maskpri)114 cap_setlogmask(cap_channel_t *chan, int maskpri)
115 {
116 nvlist_t *nvl;
117 int omask;
118
119 nvl = nvlist_create(0);
120 nvlist_add_string(nvl, "cmd", "setlogmask");
121 nvlist_add_number(nvl, "maskpri", maskpri);
122 nvl = cap_xfer_nvlist(chan, nvl);
123 omask = nvlist_get_number(nvl, "omask");
124
125 nvlist_destroy(nvl);
126
127 return (omask);
128 }
129
130 /*
131 * Service functions.
132 */
133
134 static char *LogTag;
135 static int prev_stderr = -1;
136
137 static void
slog_vsyslog(const nvlist_t * limits __unused,const nvlist_t * nvlin,nvlist_t * nvlout __unused)138 slog_vsyslog(const nvlist_t *limits __unused, const nvlist_t *nvlin,
139 nvlist_t *nvlout __unused)
140 {
141
142 syslog(nvlist_get_number(nvlin, "priority"), "%s",
143 nvlist_get_string(nvlin, "message"));
144 }
145
146 static void
slog_openlog(const nvlist_t * limits __unused,const nvlist_t * nvlin,nvlist_t * nvlout __unused)147 slog_openlog(const nvlist_t *limits __unused, const nvlist_t *nvlin,
148 nvlist_t *nvlout __unused)
149 {
150 const char *ident;
151 uint64_t logopt;
152 int stderr_fd;
153
154 ident = dnvlist_get_string(nvlin, "ident", NULL);
155 if (ident != NULL) {
156 free(LogTag);
157 LogTag = strdup(ident);
158 }
159
160 logopt = nvlist_get_number(nvlin, "logopt");
161 if (logopt & LOG_PERROR) {
162 stderr_fd = dnvlist_get_descriptor(nvlin, "stderr", -1);
163 if (prev_stderr == -1)
164 prev_stderr = dup(STDERR_FILENO);
165 if (prev_stderr != -1)
166 (void)dup2(stderr_fd, STDERR_FILENO);
167 } else if (prev_stderr != -1) {
168 (void)dup2(prev_stderr, STDERR_FILENO);
169 close(prev_stderr);
170 prev_stderr = -1;
171 }
172 openlog(LogTag, logopt, nvlist_get_number(nvlin, "facility"));
173 }
174
175 static void
slog_closelog(const nvlist_t * limits __unused,const nvlist_t * nvlin __unused,nvlist_t * nvlout __unused)176 slog_closelog(const nvlist_t *limits __unused, const nvlist_t *nvlin __unused,
177 nvlist_t *nvlout __unused)
178 {
179
180 closelog();
181
182 free(LogTag);
183 LogTag = NULL;
184
185 if (prev_stderr != -1) {
186 (void)dup2(prev_stderr, STDERR_FILENO);
187 close(prev_stderr);
188 prev_stderr = -1;
189 }
190 }
191
192 static void
slog_setlogmask(const nvlist_t * limits __unused,const nvlist_t * nvlin,nvlist_t * nvlout)193 slog_setlogmask(const nvlist_t *limits __unused, const nvlist_t *nvlin,
194 nvlist_t *nvlout)
195 {
196 int omask;
197
198 omask = setlogmask(nvlist_get_number(nvlin, "maskpri"));
199 nvlist_add_number(nvlout, "omask", omask);
200 }
201
202 static int
syslog_command(const char * cmd,const nvlist_t * limits,nvlist_t * nvlin,nvlist_t * nvlout)203 syslog_command(const char *cmd, const nvlist_t *limits, nvlist_t *nvlin,
204 nvlist_t *nvlout)
205 {
206
207 if (strcmp(cmd, "vsyslog") == 0) {
208 slog_vsyslog(limits, nvlin, nvlout);
209 } else if (strcmp(cmd, "openlog") == 0) {
210 slog_openlog(limits, nvlin, nvlout);
211 } else if (strcmp(cmd, "closelog") == 0) {
212 slog_closelog(limits, nvlin, nvlout);
213 } else if (strcmp(cmd, "setlogmask") == 0) {
214 slog_setlogmask(limits, nvlin, nvlout);
215 } else {
216 return (EINVAL);
217 }
218
219 return (0);
220 }
221
222 CREATE_SERVICE("system.syslog", NULL, syslog_command, 0);
223