1*0Sstevel@tonic-gate /*
2*0Sstevel@tonic-gate * CDDL HEADER START
3*0Sstevel@tonic-gate *
4*0Sstevel@tonic-gate * The contents of this file are subject to the terms of the
5*0Sstevel@tonic-gate * Common Development and Distribution License, Version 1.0 only
6*0Sstevel@tonic-gate * (the "License"). You may not use this file except in compliance
7*0Sstevel@tonic-gate * with the License.
8*0Sstevel@tonic-gate *
9*0Sstevel@tonic-gate * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
10*0Sstevel@tonic-gate * or http://www.opensolaris.org/os/licensing.
11*0Sstevel@tonic-gate * See the License for the specific language governing permissions
12*0Sstevel@tonic-gate * and limitations under the License.
13*0Sstevel@tonic-gate *
14*0Sstevel@tonic-gate * When distributing Covered Code, include this CDDL HEADER in each
15*0Sstevel@tonic-gate * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
16*0Sstevel@tonic-gate * If applicable, add the following below this CDDL HEADER, with the
17*0Sstevel@tonic-gate * fields enclosed by brackets "[]" replaced with your own identifying
18*0Sstevel@tonic-gate * information: Portions Copyright [yyyy] [name of copyright owner]
19*0Sstevel@tonic-gate *
20*0Sstevel@tonic-gate * CDDL HEADER END
21*0Sstevel@tonic-gate */
22*0Sstevel@tonic-gate /* Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T */
23*0Sstevel@tonic-gate /* All Rights Reserved */
24*0Sstevel@tonic-gate
25*0Sstevel@tonic-gate
26*0Sstevel@tonic-gate #ident "%Z%%M% %I% %E% SMI" /* SVr4.0 1.9 */
27*0Sstevel@tonic-gate /* LINTLIBRARY */
28*0Sstevel@tonic-gate
29*0Sstevel@tonic-gate # include <stdarg.h>
30*0Sstevel@tonic-gate # include <string.h>
31*0Sstevel@tonic-gate # include <errno.h>
32*0Sstevel@tonic-gate
33*0Sstevel@tonic-gate # include "msgs.h"
34*0Sstevel@tonic-gate
35*0Sstevel@tonic-gate extern char *_lp_msg_fmts[];
36*0Sstevel@tonic-gate extern int errno;
37*0Sstevel@tonic-gate
38*0Sstevel@tonic-gate /* VARARGS */
39*0Sstevel@tonic-gate #if defined(__STDC__)
_getmessage(char * buf,short rtype,va_list arg)40*0Sstevel@tonic-gate int _getmessage ( char * buf, short rtype, va_list arg )
41*0Sstevel@tonic-gate #else
42*0Sstevel@tonic-gate int _getmessage (buf, rtype, arg)
43*0Sstevel@tonic-gate char *buf;
44*0Sstevel@tonic-gate short rtype;
45*0Sstevel@tonic-gate va_list arg;
46*0Sstevel@tonic-gate #endif
47*0Sstevel@tonic-gate {
48*0Sstevel@tonic-gate char *endbuf;
49*0Sstevel@tonic-gate char *fmt;
50*0Sstevel@tonic-gate char **t_string;
51*0Sstevel@tonic-gate int temp = 0;
52*0Sstevel@tonic-gate long *t_long;
53*0Sstevel@tonic-gate short *t_short;
54*0Sstevel@tonic-gate short etype;
55*0Sstevel@tonic-gate
56*0Sstevel@tonic-gate if (buf == (char *)0)
57*0Sstevel@tonic-gate {
58*0Sstevel@tonic-gate errno = ENOSPC;
59*0Sstevel@tonic-gate return(-1);
60*0Sstevel@tonic-gate }
61*0Sstevel@tonic-gate
62*0Sstevel@tonic-gate /*
63*0Sstevel@tonic-gate * We assume that we're given a buffer big enough to hold
64*0Sstevel@tonic-gate * the header.
65*0Sstevel@tonic-gate */
66*0Sstevel@tonic-gate
67*0Sstevel@tonic-gate endbuf = buf + (long)stoh(buf);
68*0Sstevel@tonic-gate if ((buf + MESG_DATA) > endbuf)
69*0Sstevel@tonic-gate {
70*0Sstevel@tonic-gate errno = ENOMSG;
71*0Sstevel@tonic-gate return(-1);
72*0Sstevel@tonic-gate }
73*0Sstevel@tonic-gate
74*0Sstevel@tonic-gate etype = stoh(buf + MESG_TYPE);
75*0Sstevel@tonic-gate if (etype < 0 || etype > LAST_MESSAGE)
76*0Sstevel@tonic-gate {
77*0Sstevel@tonic-gate errno = EBADMSG;
78*0Sstevel@tonic-gate return(-1);
79*0Sstevel@tonic-gate }
80*0Sstevel@tonic-gate
81*0Sstevel@tonic-gate if (etype != rtype)
82*0Sstevel@tonic-gate {
83*0Sstevel@tonic-gate if (rtype > 0 && rtype <= LAST_MESSAGE)
84*0Sstevel@tonic-gate fmt = _lp_msg_fmts[rtype];
85*0Sstevel@tonic-gate else
86*0Sstevel@tonic-gate {
87*0Sstevel@tonic-gate errno = EINVAL;
88*0Sstevel@tonic-gate return(-1);
89*0Sstevel@tonic-gate }
90*0Sstevel@tonic-gate }
91*0Sstevel@tonic-gate else
92*0Sstevel@tonic-gate fmt = _lp_msg_fmts[etype];
93*0Sstevel@tonic-gate
94*0Sstevel@tonic-gate buf += MESG_LEN;
95*0Sstevel@tonic-gate
96*0Sstevel@tonic-gate while (*fmt != '\0')
97*0Sstevel@tonic-gate switch(*fmt++)
98*0Sstevel@tonic-gate {
99*0Sstevel@tonic-gate case 'H':
100*0Sstevel@tonic-gate if ((buf + 4) > endbuf)
101*0Sstevel@tonic-gate {
102*0Sstevel@tonic-gate errno = ENOMSG;
103*0Sstevel@tonic-gate return(-1);
104*0Sstevel@tonic-gate }
105*0Sstevel@tonic-gate
106*0Sstevel@tonic-gate t_short = va_arg(arg, short *);
107*0Sstevel@tonic-gate *t_short = stoh(buf);
108*0Sstevel@tonic-gate buf += 4;
109*0Sstevel@tonic-gate break;
110*0Sstevel@tonic-gate
111*0Sstevel@tonic-gate case 'L':
112*0Sstevel@tonic-gate if ((buf + 8) > endbuf)
113*0Sstevel@tonic-gate {
114*0Sstevel@tonic-gate errno = ENOMSG;
115*0Sstevel@tonic-gate return(-1);
116*0Sstevel@tonic-gate }
117*0Sstevel@tonic-gate
118*0Sstevel@tonic-gate t_long = va_arg(arg, long *);
119*0Sstevel@tonic-gate *t_long = stol(buf);
120*0Sstevel@tonic-gate buf += 8;
121*0Sstevel@tonic-gate break;
122*0Sstevel@tonic-gate
123*0Sstevel@tonic-gate case 'D':
124*0Sstevel@tonic-gate if ((buf + 4) > endbuf)
125*0Sstevel@tonic-gate {
126*0Sstevel@tonic-gate errno = ENOMSG;
127*0Sstevel@tonic-gate return(-1);
128*0Sstevel@tonic-gate }
129*0Sstevel@tonic-gate
130*0Sstevel@tonic-gate t_short = va_arg(arg, short *);
131*0Sstevel@tonic-gate *t_short = stoh(buf);
132*0Sstevel@tonic-gate buf += 4;
133*0Sstevel@tonic-gate t_string = va_arg(arg, char **);
134*0Sstevel@tonic-gate if ((buf + *t_short) > endbuf)
135*0Sstevel@tonic-gate {
136*0Sstevel@tonic-gate errno = ENOMSG;
137*0Sstevel@tonic-gate return(-1);
138*0Sstevel@tonic-gate }
139*0Sstevel@tonic-gate (*t_short)--; /* Don't mention the null we added */
140*0Sstevel@tonic-gate *t_string = buf;
141*0Sstevel@tonic-gate buf += *t_short;
142*0Sstevel@tonic-gate break;
143*0Sstevel@tonic-gate
144*0Sstevel@tonic-gate case 'S':
145*0Sstevel@tonic-gate if ((buf + 4) > endbuf)
146*0Sstevel@tonic-gate {
147*0Sstevel@tonic-gate errno = ENOMSG;
148*0Sstevel@tonic-gate return(-1);
149*0Sstevel@tonic-gate }
150*0Sstevel@tonic-gate
151*0Sstevel@tonic-gate t_string = va_arg(arg, char **);
152*0Sstevel@tonic-gate temp = stoh(buf);
153*0Sstevel@tonic-gate buf += 4;
154*0Sstevel@tonic-gate if ((buf + temp) > endbuf)
155*0Sstevel@tonic-gate {
156*0Sstevel@tonic-gate errno = ENOMSG;
157*0Sstevel@tonic-gate return(-1);
158*0Sstevel@tonic-gate }
159*0Sstevel@tonic-gate
160*0Sstevel@tonic-gate *t_string = buf;
161*0Sstevel@tonic-gate buf += temp;
162*0Sstevel@tonic-gate break;
163*0Sstevel@tonic-gate }
164*0Sstevel@tonic-gate return(etype);
165*0Sstevel@tonic-gate }
166