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) 1984, 1986, 1987, 1988, 1989 AT&T */ 24 /* All Rights Reserved */ 25 26 /* 27 * Copyright 2005 Sun Microsystems, Inc. All rights reserved. 28 * Use is subject to license terms. 29 */ 30 31 /* 32 * t_snd.c and t_sndv.c are very similar and contain common code. 33 * Any changes to either of them should be reviewed to see whether they 34 * are applicable to the other file. 35 */ 36 #include "mt.h" 37 #include <unistd.h> 38 #include <stdlib.h> 39 #include <errno.h> 40 #include <stropts.h> 41 #include <sys/stream.h> 42 #define _SUN_TPI_VERSION 2 43 #include <sys/tihdr.h> 44 #include <sys/timod.h> 45 #include <xti.h> 46 #include <syslog.h> 47 #include "tx.h" 48 49 50 int 51 _tx_snd(int fd, char *buf, unsigned nbytes, int flags, int api_semantics) 52 { 53 struct T_data_req datareq; 54 struct strbuf ctlbuf, databuf; 55 unsigned int bytes_sent, bytes_remaining, bytes_to_send; 56 char *curptr; 57 struct _ti_user *tiptr; 58 int band; 59 int retval, lookevent; 60 int sv_errno; 61 int doputmsg = 0; 62 int32_t tsdu_limit; 63 64 if ((tiptr = _t_checkfd(fd, 0, api_semantics)) == NULL) 65 return (-1); 66 sig_mutex_lock(&tiptr->ti_lock); 67 68 if (tiptr->ti_servtype == T_CLTS) { 69 t_errno = TNOTSUPPORT; 70 sig_mutex_unlock(&tiptr->ti_lock); 71 return (-1); 72 } 73 74 if (_T_IS_XTI(api_semantics)) { 75 /* 76 * User level state verification only done for XTI 77 * because doing for TLI may break existing applications 78 */ 79 if (! (tiptr->ti_state == T_DATAXFER || 80 tiptr->ti_state == T_INREL)) { 81 t_errno = TOUTSTATE; 82 sig_mutex_unlock(&tiptr->ti_lock); 83 return (-1); 84 } 85 /* 86 * XXX 87 * Is it OK to do this TBADFLAG check when XTI spec 88 * is being extended with new and interesting flags 89 * everyday ? 90 */ 91 if ((flags & ~(TX_ALL_VALID_FLAGS)) != 0) { 92 t_errno = TBADFLAG; 93 sig_mutex_unlock(&tiptr->ti_lock); 94 return (-1); 95 } 96 if (flags & T_EXPEDITED) 97 tsdu_limit = tiptr->ti_etsdusize; 98 else { 99 /* normal data */ 100 tsdu_limit = tiptr->ti_tsdusize; 101 } 102 103 if ((tsdu_limit > 0) && /* limit meaningful and ... */ 104 (nbytes > (uint32_t)tsdu_limit)) { 105 t_errno = TBADDATA; 106 sig_mutex_unlock(&tiptr->ti_lock); 107 return (-1); 108 } 109 110 /* 111 * Check for incoming disconnect or orderly release 112 * Did anyone say "performance" ? Didn't hear that. 113 */ 114 lookevent = _t_look_locked(fd, tiptr, 0, api_semantics); 115 if (lookevent < 0) { 116 sv_errno = errno; 117 sig_mutex_unlock(&tiptr->ti_lock); 118 errno = sv_errno; 119 return (-1); 120 } 121 /* 122 * XNS 4 required the TLOOK error to be returned if there 123 * is any incoming T_ORDREL. XNS 5 does not require an 124 * error to be returned in such a case. 125 */ 126 if (lookevent == T_DISCONNECT || 127 (api_semantics == TX_XTI_XNS4_API && 128 lookevent == T_ORDREL)) { 129 t_errno = TLOOK; 130 sig_mutex_unlock(&tiptr->ti_lock); 131 return (-1); 132 } 133 } 134 135 /* sending zero length data when not allowed */ 136 if (nbytes == 0 && !(tiptr->ti_prov_flag & (SENDZERO|OLD_SENDZERO))) { 137 t_errno = TBADDATA; 138 sig_mutex_unlock(&tiptr->ti_lock); 139 return (-1); 140 } 141 142 doputmsg = (tiptr->ti_tsdusize != 0) || (flags & T_EXPEDITED); 143 144 if (doputmsg) { 145 /* 146 * Initialize ctlbuf for use in sending/receiving control part 147 * of the message. 148 */ 149 ctlbuf.maxlen = (int)sizeof (struct T_data_req); 150 ctlbuf.len = (int)sizeof (struct T_data_req); 151 ctlbuf.buf = (char *)&datareq; 152 153 band = TI_NORMAL; /* band 0 */ 154 if (flags & T_EXPEDITED) { 155 datareq.PRIM_type = T_EXDATA_REQ; 156 if (! (tiptr->ti_prov_flag & EXPINLINE)) 157 band = TI_EXPEDITED; /* band > 0 */ 158 } else 159 datareq.PRIM_type = T_DATA_REQ; 160 } 161 162 bytes_remaining = nbytes; 163 curptr = buf; 164 165 /* 166 * Calls to send data (write or putmsg) can potentially 167 * block, for MT case, we drop the lock and enable signals here 168 * and acquire it back 169 */ 170 sig_mutex_unlock(&tiptr->ti_lock); 171 do { 172 bytes_to_send = bytes_remaining; 173 if (doputmsg) { 174 /* 175 * transport provider supports TSDU concept 176 * (unlike TCP) or it is expedited data. 177 * In this case do the fragmentation 178 */ 179 if (bytes_to_send > (unsigned int)tiptr->ti_maxpsz) { 180 datareq.MORE_flag = 1; 181 bytes_to_send = (unsigned int)tiptr->ti_maxpsz; 182 } else { 183 if (flags&T_MORE) 184 datareq.MORE_flag = 1; 185 else 186 datareq.MORE_flag = 0; 187 } 188 databuf.maxlen = bytes_to_send; 189 databuf.len = bytes_to_send; 190 databuf.buf = curptr; 191 retval = putpmsg(fd, &ctlbuf, &databuf, band, MSG_BAND); 192 if (retval == 0) 193 bytes_sent = bytes_to_send; 194 } else { 195 /* 196 * transport provider does *not* support TSDU concept 197 * (e.g. TCP) and it is not expedited data. A 198 * perf. optimization is used. Note: the T_MORE 199 * flag is ignored here even if set by the user. 200 */ 201 retval = write(fd, curptr, bytes_to_send); 202 if (retval >= 0) { 203 /* Amount that was actually sent */ 204 bytes_sent = retval; 205 } 206 } 207 208 if (retval < 0) { 209 if (nbytes == bytes_remaining) { 210 /* 211 * Error on *first* putmsg/write attempt. 212 * Return appropriate error 213 */ 214 if (errno == EAGAIN) 215 t_errno = TFLOW; 216 else 217 t_errno = TSYSERR; 218 return (-1); /* return error */ 219 } 220 /* 221 * Not the first putmsg/write 222 * [ partial completion of t_snd() case. 223 * 224 * Error on putmsg/write attempt but 225 * some data was transmitted so don't 226 * return error. Don't attempt to 227 * send more (break from loop) but 228 * return OK. 229 */ 230 break; 231 } 232 bytes_remaining = bytes_remaining - bytes_sent; 233 curptr = curptr + bytes_sent; 234 } while (bytes_remaining != 0); 235 236 _T_TX_NEXTSTATE(T_SND, tiptr, "t_snd: invalid state event T_SND"); 237 return (nbytes - bytes_remaining); 238 } 239