xref: /titanic_41/usr/src/cmd/lp/lib/oam/fmtmsg.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 (c) 1999 by Sun Microsystems, Inc.
24  * All rights reserved.
25  */
26 
27 /* Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T */
28 /* All Rights Reserved */
29 
30 #pragma ident	"%Z%%M%	%I%	%E% SMI"
31 
32 /* LINTLIBRARY */
33 
34 #include "stdio.h"
35 #include "string.h"
36 
37 #include "oam.h"
38 #include <stdlib.h>
39 #include <widec.h>
40 #include <libintl.h>
41 #include <locale.h>
42 
43 #define LINE_LEN 70
44 
45 #define SHORT_S 80
46 #define LONG_S  2000
47 
48 static char		*severity_names[MAX_SEVERITY-MIN_SEVERITY+1] = {
49 	"HALT",
50 	"ERROR",
51 	"WARNING",
52 	"INFO"
53 };
54 
55 static const char	*TOFIX	= "TO FIX";
56 
57 static int		wrap(wchar_t *, wchar_t *, int, wchar_t *);
58 
59 /**
60  ** fmtmsg()
61  **/
62 
63 void
fmtmsg(char * label,int severity,char * text,char * action)64 fmtmsg(char *label, int severity, char *text, char *action)
65 {
66 	int	tofix_len, indent_len;
67 	wchar_t	wtofix[SHORT_S], wlabel[SHORT_S], wsev[SHORT_S], wtext[LONG_S],
68 		null[1] = {0};
69 
70 	/*
71 	 * Return if the severity isn't recognized.
72 	 */
73 	if (severity < MIN_SEVERITY || MAX_SEVERITY < severity)
74 		return;
75 
76 	mbstowcs(wtofix, gettext(TOFIX), SHORT_S);
77 	mbstowcs(wlabel, label, SHORT_S);
78 	mbstowcs(wsev, gettext(severity_names[severity]), SHORT_S);
79 	mbstowcs(wtext, text, LONG_S);
80 
81 	tofix_len = wscol(wtofix),
82 	indent_len = wscol(wlabel) + wscol(wsev) + 2;
83 	if (indent_len < tofix_len)
84 		indent_len = tofix_len;
85 
86 	if (wrap(wlabel, wsev, indent_len, wtext) <= 0)
87 		return;
88 
89 	if (action && *action) {
90 		if (fputc('\n', stderr) == EOF)
91 			return;
92 
93 		mbstowcs(wtext, action, LONG_S);
94 		if (wrap(wtofix, null, indent_len, wtext) <= 0)
95 			return;
96 	}
97 
98 	if (fputc('\n', stderr) == EOF)
99 		return;
100 
101 	fflush (stderr);
102 }
103 
104 /**
105  ** wrap() - PUT OUT "STUFF: string", WRAPPING string AS REQUIRED
106  **/
107 
108 static int
wrap(wchar_t * prefix,wchar_t * suffix,int indent_len,wchar_t * str)109 wrap(wchar_t *prefix, wchar_t *suffix, int indent_len, wchar_t *str)
110 {
111 	int	len, n, col;
112 	int	maxlen, tmpcol;
113 	wchar_t	*p, *pw, *ppw;
114 	static const wchar_t	eol[] = {L'\r', L'\n', L'\0'};
115 
116 	/*
117 	 * Display the initial stuff followed by a colon.
118 	 */
119 	if ((len = wscol(suffix)))
120 		n = fprintf(stderr, gettext("%*ws: %ws: "),
121 			indent_len - len - 2, prefix, suffix);
122 	else
123 		n = fprintf(stderr, gettext("%*ws: "), indent_len, prefix);
124 	if (n <= 0)
125 		return (-1);
126 
127 	maxlen = LINE_LEN - indent_len - 1;
128 
129 	/* Check for bogus indent_len */
130 	if (maxlen < 1) {
131 		return (-1);
132 	}
133 
134 	/*
135 	 * Loop once for each line of the string to display.
136 	 */
137 	for (p = str; *p; ) {
138 
139 		/*
140 		 * Display the next "len" bytes of the string, where
141 		 * "len" is the smallest of:
142 		 *
143 		 *	- LINE_LEN
144 		 *	- # bytes before control character
145 		 *	- # bytes left in string
146 		 *
147 		 */
148 
149 		len = wcscspn(p, eol);
150 		/* calc how many columns the string will take */
151 		col = wcswidth(p, len);
152 		if (col > maxlen) {
153 			/*
154 			 * How many characters fit into our desired line length
155 			 */
156 			pw = p;
157 			tmpcol = 0;
158 			while (*pw) {
159 				if (iswprint(*pw))
160 					tmpcol += wcwidth(*pw);
161 				if (tmpcol > maxlen)
162 					break;
163 				else
164 					pw++;
165 			}
166 			/*
167 			 * At this point, pw may point to:
168 			 * A null character:  EOL found (should never happen, though)
169 			 * The character that just overruns the maxlen.
170 			 */
171 			if (!*pw) {
172 				/*
173 				 * Found a EOL.
174 				 * This should never happen.
175 				 */
176 				len = pw - p;
177 				goto printline;
178 			}
179 			ppw = pw;
180 			/*
181 			 * Don't split words
182 			 *
183 			 * Bugid 4202307 - liblpoam in lp internal library doesn't
184 			 * handle multibyte character.
185 			 */
186 			while (pw > p) {
187 				if (iswspace(*pw) ||
188 				    (wdbindf(*(pw - 1), *pw, 1) < 5)) {
189 					break;
190 				} else {
191 					pw--;
192 				}
193 			}
194 			if (pw != p) {
195 				len = pw - p;
196 			} else {
197 				/*
198 				 * Failed to find the best place to fold.
199 				 * So, prints as much characters as maxlen allows
200 				 */
201 				len = ppw - p;
202 			}
203 		}
204 
205 printline:
206 		for (n = 0; n < len; n++, p++) {
207 			if (iswprint(*p)) {
208 				if (fputwc(*p, stderr) == WEOF) {
209 					return (-1);
210 				}
211 			}
212 		}
213 
214 		/*
215 		 * If we displayed up to a control character,
216 		 * put out the control character now; otherwise,
217 		 * put out a newline unless we've put out all
218 		 * the text.
219 		 */
220 
221 		if (*p == L'\r' || *p == L'\n') {
222 			while (*p == L'\r' || *p == L'\n') {
223 				if (fputwc(*p, stderr) == WEOF)
224 					return (-1);
225 				p++;
226 			}
227 		} else if (*p) {
228 			if (fputwc(L'\n', stderr) == WEOF)
229 				return (-1);
230 		}
231 
232 		while (iswspace(*p))
233 			p++;
234 
235 		/*
236 		 * If the loop won't end this time (because we
237 		 * have more stuff to display) put out leading
238 		 * blanks to align the next line with the previous
239 		 * lines.
240 		 */
241 		if (*p) {
242 			for (n = 0; n < indent_len + 2; n++)
243 				(void) fputwc(L' ', stderr);
244 		}
245 	}
246 
247 	return (1);
248 }
249