xref: /illumos-gate/usr/src/cmd/ttymon/tmutil.c (revision 7c478bd95313f5f23a4c958a745db2134aa03244)
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, Version 1.0 only
6  * (the "License").  You may not use this file except in compliance
7  * with the License.
8  *
9  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
10  * or http://www.opensolaris.org/os/licensing.
11  * See the License for the specific language governing permissions
12  * and limitations under the License.
13  *
14  * When distributing Covered Code, include this CDDL HEADER in each
15  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
16  * If applicable, add the following below this CDDL HEADER, with the
17  * fields enclosed by brackets "[]" replaced with your own identifying
18  * information: Portions Copyright [yyyy] [name of copyright owner]
19  *
20  * CDDL HEADER END
21  */
22 /*
23  * Copyright 2004 Sun Microsystems, Inc.  All rights reserved.
24  * Use is subject to license terms.
25  */
26 
27 /*	Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T	*/
28 /*	  All Rights Reserved  	*/
29 
30 
31 #pragma ident	"%Z%%M%	%I%	%E% SMI"
32 
33 #include <unistd.h>
34 #include <stdarg.h>
35 #include <stdlib.h>
36 #include <stdio.h>
37 #include <errno.h>
38 #include <sys/types.h>
39 #include <ctype.h>
40 #include <string.h>
41 #include <sys/stat.h>
42 #include <fcntl.h>
43 #include <sys/stropts.h>
44 #include <sys/sad.h>
45 #include "ttymon.h"
46 #include "tmstruct.h"
47 #include "tmextern.h"
48 
49 #define	NSTRPUSH	9	/* should agree with the tunable in	*/
50 				/* 		/etc/master.d/kernel	*/
51 
52 /*
53  *	check_device - check to see if the device exists,
54  *		     - and if it is a character device
55  *		     - return 0 if everything is ok. Otherwise, return -1
56  */
57 int
58 check_device(char *device)
59 {
60 	struct stat statbuf;
61 
62 	if ((device == NULL) || (*device == '\0')) {
63 		log("error -- device field is missing");
64 		return(-1);
65 	}
66 	if (*device != '/') {
67 		log("error -- must specify full path name for \"%s\".", device);
68 		return(-1);
69 	}
70 	if (access(device, 0) == 0) {
71 		if (stat(device,&statbuf) < 0) {
72 			log("stat(%s) failed: %s", device, strerror(errno));
73 			return(-1);
74 		}
75 		if ((statbuf.st_mode & S_IFMT) != S_IFCHR) {
76 			log("error -- \"%s\" not character special device",
77 			    device);
78 			return(-1);
79 		}
80 	}
81 	else {
82 		log("error -- device \"%s\" does not exist", device);
83 		return(-1);
84 	}
85 	return(0);
86 }
87 
88 /*
89  *	check_cmd - check to see if the cmd file exists,
90  *		  - and if it is executable
91  *		  - return 0 if everything is ok. Otherwise, return -1
92  */
93 int
94 check_cmd(char *cmd)
95 {
96 	struct stat statbuf;
97 	char	tbuf[BUFSIZ];
98 	char	*tp = tbuf;
99 
100 	if ((cmd == NULL) || (*cmd == '\0')) {
101 		log("error -- server command is missing");
102 		return(-1);
103 	}
104 	(void)strcpy(tp,cmd);
105 	(void)strtok(tp, " \t");
106 	if (*tp != '/') {
107 		log("error -- must specify full path name for \"%s\".", tp);
108 		return(-1);
109 	}
110 	if (access(tp, 0) == 0) {
111 		if (stat(tp,&statbuf) < 0) {
112 			log("stat(%s) failed.", tp);
113 			return(-1);
114 		}
115 		if (!(statbuf.st_mode & 0111)) {
116 			log("error -- \"%s\" not executable\n", tp);
117 			return(-1);
118 		}
119 		if ((statbuf.st_mode & S_IFMT) != S_IFREG) {
120 			log("error -- \"%s\" not a regular file", tp);
121 			return(-1);
122 		}
123 	}
124 	else {
125 		log("error -- \"%s\" does not exist", tp);
126 		return(-1);
127 	}
128 	return(0);
129 }
130 
131 /*
132  * strcheck(sp, flag)	- check string
133  *				- if flag == ALNUM, all char. are expected to
134  *				  be alphanumeric
135  *				- if flag == NUM, all char. are expected to
136  *				  be digits and the number must be >= 0
137  *				- return 0 if successful, -1 if failed.
138  */
139 int
140 strcheck(sp, flag)
141 char	*sp;		/* string ptr		*/
142 int	flag;		/* either NUM or ALNUM	*/
143 {
144 	register	char	*cp;
145 	if (flag == NUM) {
146 		for (cp = sp; *cp; cp++) {
147 			if (!isdigit(*cp)) {
148 				return(-1);
149 			}
150 		}
151 	}
152 	else {	/* (flag == ALNUM) */
153 		for (cp = sp; *cp; cp++) {
154 			if (!isalnum(*cp)) {
155 				return(-1);
156 			}
157 		}
158 	}
159 	return(0);
160 }
161 
162 /*
163  * vml(modules)	- validate a list of modules
164  *		- return 0 if successful, -1 if failed
165  */
166 int
167 vml(modules)
168 char	*modules;
169 {
170 	char	*modp, *svmodp;
171 	int	i, fd;
172 	struct str_mlist newmods[NSTRPUSH];	/* modlist for newlist	*/
173 	struct str_list	newlist;		/* modules to be pushed	*/
174 
175 	if ((modules == NULL) || (*modules == '\0'))
176 		return(0);
177 
178 	newlist.sl_modlist = newmods;
179 	newlist.sl_nmods = NSTRPUSH;
180 	if ((modp = malloc(strlen(modules) + 1)) == NULL) {
181 		log("vml: malloc failed");
182 		return (-1);
183 	};
184 	svmodp = modp;
185 	(void)strcpy(modp, modules);
186 	/*
187 	 * pull mod names out of comma-separated list
188 	 */
189 	for ( i = 0, modp = strtok(modp, ",");
190 	modp != NULL; i++, modp = strtok(NULL, ",") ) {
191 		if ( i >= NSTRPUSH) {
192 			log("too many modules in <%s>", modules);
193 			i = -1;
194 			break;
195 		}
196 		(void)strncpy(newlist.sl_modlist[i].l_name,
197 					modp, FMNAMESZ);
198 		newlist.sl_modlist[i].l_name[FMNAMESZ] = '\0';
199 	}
200 	free(svmodp);
201 	if (i == -1)
202 		return (-1);
203 	newlist.sl_nmods = i;
204 
205 	/*
206 	 * Is it a valid list of modules?
207 	 */
208 	if ((fd = open(USERDEV, O_RDWR)) == -1) {
209 		if (errno == EBUSY) {
210 			log("Warning - can't validate module list, /dev/sad/user busy");
211 			return(0);
212 		}
213 		log("open /dev/sad/user failed: %s", strerror(errno));
214 		return(-1);
215 	}
216 	if ( (i = ioctl(fd, SAD_VML, &newlist)) < 0 ) {
217 		log("Validate modules ioctl failed, modules = <%s>: %s",
218 		    modules, strerror(errno));
219 		(void)close(fd);
220 		return(-1);
221 	}
222 	if ( i != 0 ) {
223 		log("Error - invalid STREAMS module list <%s>.", modules);
224 		(void)close(fd);
225 		return(-1);
226 	}
227 	(void)close(fd);
228 	return(0);
229 }
230 
231 /*
232  * copystr(s1, s2) - copy string s2 to string s1
233  *		   - also put '\' in front of ':'
234  */
235 void
236 copystr(s1,s2)
237 char	*s1, *s2;
238 {
239 	while (*s2) {
240 		if (*s2 == ':') {
241 			*s1++ = '\\';
242 		}
243 		*s1++ = *s2++;
244 	}
245 	*s1 = '\0';
246 }
247 
248 /*PRINTFLIKE1*/
249 void
250 cons_printf(const char *fmt, ...)
251 {
252 	char buf[MAXPATHLEN * 2]; /* enough space for msg including a path */
253 	int fd;
254 	va_list ap;
255 
256 	va_start(ap, fmt);
257 	(void) vsnprintf(buf, sizeof (buf), fmt, ap);
258 	va_end(ap);
259 
260 	if ((fd = open(CONSOLE, O_WRONLY|O_NOCTTY)) != -1)
261 		(void) write(fd, buf, strlen(buf) + 1);
262 	(void) close(fd);
263 }
264