/* * CDDL HEADER START * * The contents of this file are subject to the terms of the * Common Development and Distribution License, Version 1.0 only * (the "License"). You may not use this file except in compliance * with the License. * * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE * or http://www.opensolaris.org/os/licensing. * See the License for the specific language governing permissions * and limitations under the License. * * When distributing Covered Code, include this CDDL HEADER in each * file and include the License file at usr/src/OPENSOLARIS.LICENSE. * If applicable, add the following below this CDDL HEADER, with the * fields enclosed by brackets "[]" replaced with your own identifying * information: Portions Copyright [yyyy] [name of copyright owner] * * CDDL HEADER END */ /* Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T */ /* All Rights Reserved */ /* * Copyright 2006 Sun Microsystems, Inc. All rights reserved. * Use is subject to license terms. */ #include "mt.h" #include #include #include #include #include #include #include #define _SUN_TPI_VERSION 2 #include #include #include #include #include "tx.h" static int __tx_tlitpi_getprotaddr_locked(struct _ti_user *tiptr, struct t_bind *boundaddr, struct t_bind *peer); static int __tx_getname_locked(int fd, struct netbuf *name, int type); int _tx_getname(int fd, struct netbuf *name, int type, int api_semantics) { struct _ti_user *tiptr; int retval, sv_errno; assert(_T_IS_TLI(api_semantics)); /* TLI only interface */ if (!name || ((type != LOCALNAME) && (type != REMOTENAME))) { errno = EINVAL; return (-1); } if ((tiptr = _t_checkfd(fd, 0, api_semantics)) == 0) return (-1); sig_mutex_lock(&tiptr->ti_lock); retval = __tx_getname_locked(fd, name, type); if (retval < 0) { sv_errno = errno; sig_mutex_unlock(&tiptr->ti_lock); errno = sv_errno; return (-1); } sig_mutex_unlock(&tiptr->ti_lock); return (0); } static int __tx_getname_locked(int fd, struct netbuf *name, int type) { int retval; do { retval = ioctl(fd, (type == LOCALNAME) ? TI_GETMYNAME : TI_GETPEERNAME, name); } while (retval < 0 && errno == EINTR); if (retval < 0) { t_errno = TSYSERR; return (-1); } return (0); } int _tx_getprotaddr( int fd, struct t_bind *boundaddr, struct t_bind *peeraddr, int api_semantics) { struct _ti_user *tiptr; int retval, sv_errno; struct T_addr_req *addreqp; struct T_addr_ack *addrackp; int didalloc; struct strbuf ctlbuf; int retlen; if ((tiptr = _t_checkfd(fd, 0, api_semantics)) == 0) return (-1); sig_mutex_lock(&tiptr->ti_lock); if ((tiptr->ti_prov_flag & XPG4_1) == 0) { /* * Provider does not support XTI inspired TPI so we * try to do operation assuming TLI inspired TPI */ retval = __tx_tlitpi_getprotaddr_locked(tiptr, boundaddr, peeraddr); sv_errno = errno; sig_mutex_unlock(&tiptr->ti_lock); errno = sv_errno; return (retval); } /* * Acquire buffer for use in sending/receiving the message. * Note: assumes (correctly) that ti_ctlsize is large enough * to hold sizeof (struct T_addr_req/ack) */ if (_t_acquire_ctlbuf(tiptr, &ctlbuf, &didalloc) < 0) { sv_errno = errno; sig_mutex_unlock(&tiptr->ti_lock); errno = sv_errno; return (-1); } /* LINTED pointer cast */ addreqp = (struct T_addr_req *)ctlbuf.buf; addreqp->PRIM_type = T_ADDR_REQ; do { retval = _t_do_ioctl(fd, ctlbuf.buf, (int)sizeof (struct T_addr_req), TI_GETADDRS, &retlen); } while (retval < 0 && errno == EINTR); /* retval can now be either 0 or -1 */ if (retval < 0) { sv_errno = errno; sig_mutex_unlock(&tiptr->ti_lock); errno = sv_errno; goto err_out; } sig_mutex_unlock(&tiptr->ti_lock); if (retlen < (int)sizeof (struct T_addr_ack)) { t_errno = TSYSERR; errno = EIO; retval = -1; goto err_out; } /* LINTED pointer cast */ addrackp = (struct T_addr_ack *)ctlbuf.buf; /* * We assume null parameters are OK and not errors */ if (boundaddr != NULL && boundaddr->addr.maxlen > 0) { if (TLEN_GT_NLEN(addrackp->LOCADDR_length, boundaddr->addr.maxlen)) { t_errno = TBUFOVFLW; retval = -1; goto err_out; } boundaddr->addr.len = addrackp->LOCADDR_length; (void) memcpy(boundaddr->addr.buf, ctlbuf.buf + addrackp->LOCADDR_offset, (size_t)addrackp->LOCADDR_length); } /* * Note: In states where there is no remote end of the connection * the T_ADDR_REQ primitive does not return a remote address. However, * in protcols such as TCP, the transport connection is established * before the TLI/XTI level association is established. Therefore, * in state T_OUTCON, the transport may return a remote address where * TLI/XTI level thinks there is no remote end and therefore * no remote address should be returned. We therefore do not look at * address returned by transport provider in T_OUTCON state. * Tested by XTI test suite. */ if (tiptr->ti_state != T_OUTCON && peeraddr != NULL && peeraddr->addr.maxlen > 0) { if (TLEN_GT_NLEN(addrackp->REMADDR_length, peeraddr->addr.maxlen)) { t_errno = TBUFOVFLW; retval = -1; goto err_out; } peeraddr->addr.len = addrackp->REMADDR_length; (void) memcpy(peeraddr->addr.buf, ctlbuf.buf + addrackp->REMADDR_offset, (size_t)addrackp->REMADDR_length); } err_out: if (didalloc) free(ctlbuf.buf); else tiptr->ti_ctlbuf = ctlbuf.buf; return (retval); } static int __tx_tlitpi_getprotaddr_locked( struct _ti_user *tiptr, struct t_bind *boundaddr, struct t_bind *peeraddr) { if (boundaddr) { boundaddr->addr.len = 0; if (tiptr->ti_state >= TS_IDLE) { /* * assume bound endpoint . * Note: TI_GETMYNAME can return * a finite length all zeroes address for unbound * endpoint so we avoid relying on it for bound * endpoints for XTI t_getprotaddr() semantics. */ if (__tx_getname_locked(tiptr->ti_fd, &boundaddr->addr, LOCALNAME) < 0) return (-1); } } if (peeraddr) { peeraddr->addr.len = 0; if (tiptr->ti_state >= TS_DATA_XFER) { /* * assume connected endpoint. * The TI_GETPEERNAME call can fail with error * if endpoint is not connected so we don't call it * for XTI t_getprotaddr() semantics */ if (__tx_getname_locked(tiptr->ti_fd, &peeraddr->addr, REMOTENAME) < 0) return (-1); } } return (0); }