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 (the "License").
6 * You may not use this file except in compliance with the License.
7 *
8 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
9 * or http://www.opensolaris.org/os/licensing.
10 * See the License for the specific language governing permissions
11 * and limitations under the License.
12 *
13 * When distributing Covered Code, include this CDDL HEADER in each
14 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
15 * If applicable, add the following below this CDDL HEADER, with the
16 * fields enclosed by brackets "[]" replaced with your own identifying
17 * information: Portions Copyright [yyyy] [name of copyright owner]
18 *
19 * CDDL HEADER END
20 */
21 /*
22 * Copyright 2006 Sun Microsystems, Inc. All rights reserved.
23 * Use is subject to license terms.
24 */
25
26 #pragma ident "%Z%%M% %I% %E% SMI"
27
28 /*
29 * routines in this module are meant to be called by other libvolmgt
30 * routines only
31 */
32
33 #include <stdio.h>
34 #include <string.h>
35 #include <dirent.h>
36 #include <string.h>
37 #include <libintl.h>
38 #include <limits.h>
39 #include <unistd.h>
40 #include <stdlib.h>
41 #include <sys/types.h>
42 #include <sys/stat.h>
43 #include <sys/param.h>
44 #include <sys/varargs.h>
45 #include "volmgt_private.h"
46
47
48 /*
49 * fix the getfull{raw,blk}name problem for the fd and diskette case
50 *
51 * return value is malloc'ed, and must be free'd
52 *
53 * no match gets a malloc'ed null string
54 */
55
56 char *
volmgt_getfullblkname(char * n)57 volmgt_getfullblkname(char *n)
58 {
59 extern char *getfullblkname(char *);
60 char *rval;
61 char namebuf[MAXPATHLEN+1];
62 char *s;
63 char c;
64 char *res;
65
66
67
68 /* try to get full block-spcl device name */
69 rval = getfullblkname(n);
70 if ((rval != NULL) && (*rval != NULLC)) {
71 /* found it */
72 res = rval;
73 goto dun;
74 }
75
76 /* we have a null-string result */
77 if (rval != NULL) {
78 /* free null string */
79 free(rval);
80 }
81
82 /* ok, so we either have a bad device or a floppy */
83
84 /* try the rfd# or rdiskette forms */
85 if (((s = strstr(n, "/rfd")) != NULL) ||
86 ((s = strstr(n, "/rdiskette")) != NULL) ||
87 ((s = strstr(n, "/rdsk/")) != NULL)) {
88 /*
89 * we do not have to check for room here, since we will
90 * be making the string one shorter
91 */
92 c = *++s; /* save the first char */
93 *s = NULLC; /* replace it with a null */
94 (void) strcpy(namebuf, n); /* save first part of it */
95 *s++ = c; /* give the first char back */
96 (void) strcat(namebuf, s); /* copy the rest */
97 res = strdup(namebuf);
98 goto dun;
99 }
100
101 /* no match found */
102 res = strdup("");
103
104 dun:
105 return (res);
106 }
107
108
109 char *
volmgt_getfullrawname(char * n)110 volmgt_getfullrawname(char *n)
111 {
112 extern char *getfullrawname(char *);
113 char *rval;
114 char namebuf[MAXPATHLEN+1];
115 char *s;
116 char c;
117 char *res;
118
119
120 #ifdef DEBUG
121 denter("volmgt_getfullrawname(%s): entering\n", n);
122 #endif
123 /* try to get full char-spcl device name */
124 rval = getfullrawname(n);
125 if ((rval != NULL) && (*rval != NULLC)) {
126 /* found it */
127 res = rval;
128 goto dun;
129 }
130
131 /* we have a null-string result */
132 if (rval != NULL) {
133 /* free null string */
134 free(rval);
135 }
136
137 /* ok, so we either have a bad device or a floppy */
138
139 /* try the "fd", "diskette", and the "dsk" form */
140 if (((s = strstr(n, "/fd")) != NULL) ||
141 ((s = strstr(n, "/diskette")) != NULL) ||
142 ((s = strstr(n, "/dsk/")) != NULL)) {
143 /*
144 * ensure we have room to add one more char
145 */
146 if (strlen(n) < (MAXPATHLEN - 1)) {
147 c = *++s; /* save the first char */
148 *s = NULLC; /* replace it with a null */
149 (void) strcpy(namebuf, n); /* save first part of str */
150 *s = c; /* put first charback */
151 (void) strcat(namebuf, "r"); /* insert an 'r' */
152 (void) strcat(namebuf, s); /* copy rest of str */
153 res = strdup(namebuf);
154 goto dun;
155 }
156 }
157
158 /* no match found */
159 res = strdup("");
160 dun:
161 #ifdef DEBUG
162 dexit("volmgt_getfullrawname: returning %s\n",
163 res ? res : "<null ptr>");
164 #endif
165 return (res);
166 }
167
168
169 #ifdef DEBUG
170
171 /*
172 * debug print routines -- private to libvolmgt
173 */
174
175 #define DEBUG_INDENT_SPACES " "
176
177 int debug_level = 0;
178
179
180 static void
derrprint(char * fmt,va_list ap)181 derrprint(char *fmt, va_list ap)
182 {
183 int i;
184 int j;
185 char date_buf[256];
186 time_t t;
187 struct tm *tm;
188
189
190 (void) time(&t);
191 tm = localtime(&t);
192 (void) fprintf(stderr, "%02d/%02d/%02d %02d:%02d:%02d ",
193 tm->tm_mon+1, tm->tm_mday, tm->tm_year % 100,
194 tm->tm_hour, tm->tm_min, tm->tm_sec);
195 for (i = 0; i < debug_level; i++) {
196 (void) fprintf(stderr, DEBUG_INDENT_SPACES);
197 }
198 (void) vfprintf(stderr, fmt, ap);
199 }
200
201 /*
202 * denter -- do a derrprint(), then increment debug level
203 */
204 void
denter(char * fmt,...)205 denter(char *fmt, ...)
206 {
207 va_list ap;
208
209 va_start(ap, fmt);
210 derrprint(fmt, ap);
211 va_end(ap);
212 debug_level++;
213 }
214
215 /*
216 * dexit -- decrement debug level then do a derrprint()
217 */
218 void
dexit(char * fmt,...)219 dexit(char *fmt, ...)
220 {
221 va_list ap;
222
223 if (--debug_level < 0) {
224 debug_level = 0;
225 }
226 va_start(ap, fmt);
227 derrprint(fmt, ap);
228 va_end(ap);
229 }
230
231 /*
232 * dprintf -- print debug info, indenting based on debug level
233 */
234 void
dprintf(char * fmt,...)235 dprintf(char *fmt, ...)
236 {
237 va_list ap;
238
239 va_start(ap, fmt);
240 derrprint(fmt, ap);
241 va_end(ap);
242 }
243
244 #endif /* DEBUG */
245