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 /*
23*0Sstevel@tonic-gate * Copyright 1997 Sun Microsystems, Inc. All rights reserved.
24*0Sstevel@tonic-gate * Use is subject to license terms.
25*0Sstevel@tonic-gate */
26*0Sstevel@tonic-gate
27*0Sstevel@tonic-gate /* Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T */
28*0Sstevel@tonic-gate /* All Rights Reserved */
29*0Sstevel@tonic-gate
30*0Sstevel@tonic-gate
31*0Sstevel@tonic-gate #pragma ident "%Z%%M% %I% %E% SMI" /* SVr4.0 1.8 */
32*0Sstevel@tonic-gate /* LINTLIBRARY */
33*0Sstevel@tonic-gate
34*0Sstevel@tonic-gate # include <errno.h>
35*0Sstevel@tonic-gate # include <string.h>
36*0Sstevel@tonic-gate # include <stropts.h>
37*0Sstevel@tonic-gate
38*0Sstevel@tonic-gate # include "lp.h"
39*0Sstevel@tonic-gate # include "msgs.h"
40*0Sstevel@tonic-gate
41*0Sstevel@tonic-gate int Lp_prio_msg = 0;
42*0Sstevel@tonic-gate
43*0Sstevel@tonic-gate static int _mwrite ( MESG * md , char * msgbuf , int );
44*0Sstevel@tonic-gate
45*0Sstevel@tonic-gate /*
46*0Sstevel@tonic-gate * mflush()
47*0Sstevel@tonic-gate * return 0
48*0Sstevel@tonic-gate * if it successfully writes all the queued message(s), or
49*0Sstevel@tonic-gate * if some of them (errno is EAGAIN in this case).
50*0Sstevel@tonic-gate * return -1 (with errno) when it failed.
51*0Sstevel@tonic-gate */
52*0Sstevel@tonic-gate
53*0Sstevel@tonic-gate int
mflush(MESG * md)54*0Sstevel@tonic-gate mflush(MESG *md)
55*0Sstevel@tonic-gate {
56*0Sstevel@tonic-gate MQUE *p;
57*0Sstevel@tonic-gate
58*0Sstevel@tonic-gate errno = 0;
59*0Sstevel@tonic-gate if (md == NULL || md->mque == NULL) {
60*0Sstevel@tonic-gate errno = ENXIO;
61*0Sstevel@tonic-gate return (-1);
62*0Sstevel@tonic-gate }
63*0Sstevel@tonic-gate
64*0Sstevel@tonic-gate while ((p = md->mque) != NULL) {
65*0Sstevel@tonic-gate if (_mwrite(md, p->dat->buf, p->dat->len) != 0)
66*0Sstevel@tonic-gate return (errno == EAGAIN ? 0 : -1);
67*0Sstevel@tonic-gate
68*0Sstevel@tonic-gate /* mwrite successful, get the next and free this entry */
69*0Sstevel@tonic-gate md->mque = p->next;
70*0Sstevel@tonic-gate Free(p->dat->buf);
71*0Sstevel@tonic-gate Free(p->dat);
72*0Sstevel@tonic-gate Free(p);
73*0Sstevel@tonic-gate }
74*0Sstevel@tonic-gate
75*0Sstevel@tonic-gate return (0);
76*0Sstevel@tonic-gate }
77*0Sstevel@tonic-gate
78*0Sstevel@tonic-gate /*
79*0Sstevel@tonic-gate * mwrite()
80*0Sstevel@tonic-gate * return 0
81*0Sstevel@tonic-gate * if it successfully writes the messages, or
82*0Sstevel@tonic-gate * if it has been queued (errno is EAGAIN in this case)
83*0Sstevel@tonic-gate * and md->mque is updated.
84*0Sstevel@tonic-gate * return -1 (with errno) when it failed.
85*0Sstevel@tonic-gate */
86*0Sstevel@tonic-gate
mwrite(MESG * md,char * msgbuf)87*0Sstevel@tonic-gate int mwrite ( MESG * md, char * msgbuf )
88*0Sstevel@tonic-gate {
89*0Sstevel@tonic-gate short size;
90*0Sstevel@tonic-gate MQUE * p;
91*0Sstevel@tonic-gate MQUE * q;
92*0Sstevel@tonic-gate
93*0Sstevel@tonic-gate errno = 0;
94*0Sstevel@tonic-gate if (md == NULL)
95*0Sstevel@tonic-gate {
96*0Sstevel@tonic-gate errno = ENXIO;
97*0Sstevel@tonic-gate return(-1);
98*0Sstevel@tonic-gate }
99*0Sstevel@tonic-gate if (msgbuf == NULL)
100*0Sstevel@tonic-gate {
101*0Sstevel@tonic-gate errno = EINVAL;
102*0Sstevel@tonic-gate return(-1);
103*0Sstevel@tonic-gate }
104*0Sstevel@tonic-gate
105*0Sstevel@tonic-gate size = stoh(msgbuf);
106*0Sstevel@tonic-gate
107*0Sstevel@tonic-gate if (LAST_MESSAGE < stoh(msgbuf + MESG_TYPE))
108*0Sstevel@tonic-gate {
109*0Sstevel@tonic-gate errno = EINVAL;
110*0Sstevel@tonic-gate return (-1);
111*0Sstevel@tonic-gate }
112*0Sstevel@tonic-gate if (md->mque)
113*0Sstevel@tonic-gate goto queue; /* if there is a queue already, try to write all */
114*0Sstevel@tonic-gate
115*0Sstevel@tonic-gate if (_mwrite(md, msgbuf, size) == 0)
116*0Sstevel@tonic-gate return(0);
117*0Sstevel@tonic-gate
118*0Sstevel@tonic-gate if (errno != EAGAIN)
119*0Sstevel@tonic-gate return(-1);
120*0Sstevel@tonic-gate
121*0Sstevel@tonic-gate /*
122*0Sstevel@tonic-gate * fall through to queue the messages that cannot be sent now.
123*0Sstevel@tonic-gate */
124*0Sstevel@tonic-gate
125*0Sstevel@tonic-gate queue:
126*0Sstevel@tonic-gate if ((p = (MQUE *)Malloc(sizeof(MQUE))) == NULL
127*0Sstevel@tonic-gate || (p->dat = (struct strbuf *)Malloc(sizeof(struct strbuf))) == NULL
128*0Sstevel@tonic-gate || (p->dat->buf = (char *)Malloc(size)) == NULL)
129*0Sstevel@tonic-gate {
130*0Sstevel@tonic-gate errno = ENOMEM;
131*0Sstevel@tonic-gate return(-1);
132*0Sstevel@tonic-gate }
133*0Sstevel@tonic-gate (void) memcpy(p->dat->buf, msgbuf, size);
134*0Sstevel@tonic-gate p->dat->len = size;
135*0Sstevel@tonic-gate p->next = 0;
136*0Sstevel@tonic-gate
137*0Sstevel@tonic-gate if ((q = md->mque) != NULL)
138*0Sstevel@tonic-gate {
139*0Sstevel@tonic-gate /* insert the new one to tail */
140*0Sstevel@tonic-gate while (q->next)
141*0Sstevel@tonic-gate q = q->next;
142*0Sstevel@tonic-gate q->next = p;
143*0Sstevel@tonic-gate
144*0Sstevel@tonic-gate while ((p = md->mque) != NULL)
145*0Sstevel@tonic-gate {
146*0Sstevel@tonic-gate if (_mwrite(md, p->dat->buf, p->dat->len) != 0) {
147*0Sstevel@tonic-gate return (errno == EAGAIN ? 0 : -1);
148*0Sstevel@tonic-gate }
149*0Sstevel@tonic-gate
150*0Sstevel@tonic-gate /* mwrite successful, get the next and free this entry */
151*0Sstevel@tonic-gate md->mque = p->next;
152*0Sstevel@tonic-gate Free(p->dat->buf);
153*0Sstevel@tonic-gate Free(p->dat);
154*0Sstevel@tonic-gate Free(p);
155*0Sstevel@tonic-gate }
156*0Sstevel@tonic-gate }
157*0Sstevel@tonic-gate else
158*0Sstevel@tonic-gate md->mque = p;
159*0Sstevel@tonic-gate
160*0Sstevel@tonic-gate return(0);
161*0Sstevel@tonic-gate }
162*0Sstevel@tonic-gate
_mwrite(MESG * md,char * msgbuf,int size)163*0Sstevel@tonic-gate int _mwrite ( MESG * md, char * msgbuf , int size )
164*0Sstevel@tonic-gate {
165*0Sstevel@tonic-gate int flag = 0;
166*0Sstevel@tonic-gate struct strbuf ctl;
167*0Sstevel@tonic-gate struct strbuf dat;
168*0Sstevel@tonic-gate
169*0Sstevel@tonic-gate switch (md->type)
170*0Sstevel@tonic-gate {
171*0Sstevel@tonic-gate case MD_CHILD:
172*0Sstevel@tonic-gate case MD_STREAM:
173*0Sstevel@tonic-gate case MD_BOUND:
174*0Sstevel@tonic-gate if (size <= 0 || size > MSGMAX)
175*0Sstevel@tonic-gate {
176*0Sstevel@tonic-gate errno = EINVAL;
177*0Sstevel@tonic-gate return(-1);
178*0Sstevel@tonic-gate }
179*0Sstevel@tonic-gate
180*0Sstevel@tonic-gate ctl.buf = "xyzzy";
181*0Sstevel@tonic-gate ctl.maxlen = ctl.len = strlen(ctl.buf)+1;
182*0Sstevel@tonic-gate dat.buf = msgbuf;
183*0Sstevel@tonic-gate dat.maxlen = dat.len = size;
184*0Sstevel@tonic-gate flag = Lp_prio_msg;
185*0Sstevel@tonic-gate Lp_prio_msg = 0; /* clean this up so there are no surprises */
186*0Sstevel@tonic-gate
187*0Sstevel@tonic-gate if (Putmsg(md, &ctl, &dat, flag) == 0)
188*0Sstevel@tonic-gate return(0);
189*0Sstevel@tonic-gate return(-1);
190*0Sstevel@tonic-gate
191*0Sstevel@tonic-gate case MD_SYS_FIFO:
192*0Sstevel@tonic-gate case MD_USR_FIFO:
193*0Sstevel@tonic-gate switch (write3_2(md, msgbuf, size))
194*0Sstevel@tonic-gate {
195*0Sstevel@tonic-gate case -1:
196*0Sstevel@tonic-gate return(-1);
197*0Sstevel@tonic-gate case 0:
198*0Sstevel@tonic-gate break;
199*0Sstevel@tonic-gate default:
200*0Sstevel@tonic-gate return(0);
201*0Sstevel@tonic-gate }
202*0Sstevel@tonic-gate break;
203*0Sstevel@tonic-gate
204*0Sstevel@tonic-gate default:
205*0Sstevel@tonic-gate errno = EINVAL;
206*0Sstevel@tonic-gate return(-1);
207*0Sstevel@tonic-gate }
208*0Sstevel@tonic-gate return 0;
209*0Sstevel@tonic-gate }
210