[apple/xnu.git] / bsd / netat / atp_misc.c

/*
 * Copyright (c) 2000 Apple Computer, Inc. All rights reserved.
 *
 * @APPLE_OSREFERENCE_LICENSE_HEADER_START@
 * 
 * This file contains Original Code and/or Modifications of Original Code
 * as defined in and that are subject to the Apple Public Source License
 * Version 2.0 (the 'License'). You may not use this file except in
 * compliance with the License. The rights granted to you under the License
 * may not be used to create, or enable the creation or redistribution of,
 * unlawful or unlicensed copies of an Apple operating system, or to
 * circumvent, violate, or enable the circumvention or violation of, any
 * terms of an Apple operating system software license agreement.
 * 
 * Please obtain a copy of the License at
 * http://www.opensource.apple.com/apsl/ and read it before using this file.
 * 
 * The Original Code and all software distributed under the License are
 * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
 * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
 * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
 * FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
 * Please see the License for the specific language governing rights and
 * limitations under the License.
 * 
 * @APPLE_OSREFERENCE_LICENSE_HEADER_END@
 */
/*
 *	Copyright (c) 1996-1998 Apple Computer, Inc.
 *	All Rights Reserved.
 */

/*    Modified for MP, 1996 by Tuyen Nguyen
 *   Modified, March 17, 1997 by Tuyen Nguyen for MacOSX.
 */
#include <sys/errno.h>
#include <sys/types.h>
#include <sys/param.h>
#include <machine/spl.h>
#include <sys/systm.h>
#include <sys/kernel.h>
#include <sys/proc.h>
#include <sys/filedesc.h>
#include <sys/fcntl.h>
#include <sys/mbuf.h>
#include <sys/ioctl.h>
#include <sys/malloc.h>
#include <sys/socket.h>

#include <netat/sysglue.h>
#include <netat/appletalk.h>
#include <netat/ddp.h>
#include <netat/at_pcb.h>
#include <netat/atp.h>
#include <netat/asp.h>
#include <netat/debug.h>

extern   struct atp_rcb_qhead atp_need_rel;
extern struct atp_trans *trp_tmo_rcb;

/*
 *	The request timer retries a request, if all retries are used up
 *		it returns a NAK
 */

void
atp_req_timeout(trp)
register struct atp_trans *trp;
{
	register gbuf_t *m;
	gref_t *gref;
	struct atp_state *atp;
	struct atp_trans *ctrp;

	if ((atp = trp->tr_queue) == 0)
		return;
	if (atp->atp_flags & ATP_CLOSING)
		return;
	
	for (ctrp = atp->atp_trans_wait.head; ctrp; ctrp = ctrp->tr_list.next) {
		if (ctrp == trp)
			break;
	}
	if (ctrp != trp)
		return;

	if ((m = gbuf_cont(trp->tr_xmt)) == NULL)
	        m = trp->tr_xmt;               /* issued via the new interface */

	if (trp->tr_retry == 0) {
		trp->tr_state = TRANS_FAILED;
		if (m == trp->tr_xmt) {
			trp->tr_xmt = NULL;
l_notify:
				gbuf_wset(m,1);
				*gbuf_rptr(m) = 99;
				gbuf_set_type(m, MSG_DATA);
				gref = trp->tr_queue->atp_gref;
				atalk_putnext(gref, m);

			return;
		}
		dPrintf(D_M_ATP_LOW,D_L_INFO, ("atp_req_timeout: skt=%d\n",
			trp->tr_local_socket));
		m = trp->tr_xmt;
		switch(((ioc_t *)(gbuf_rptr(trp->tr_xmt)))->ioc_cmd) {
		case AT_ATP_ISSUE_REQUEST:
			trp->tr_xmt = NULL;
			if (trp->tr_queue->dflag)
				((ioc_t *)gbuf_rptr(m))->ioc_cmd = AT_ATP_REQUEST_COMPLETE;
			else if (trp->tr_bdsp == NULL) {
				gbuf_freem(m);
				if (trp->tr_rsp_wait)
					wakeup(&trp->tr_event);
				break;
			}
			atp_iocnak(trp->tr_queue, m, ETIMEDOUT);
			atp_free(trp);
			return;

		case AT_ATP_ISSUE_REQUEST_NOTE:
		case AT_ATP_ISSUE_REQUEST_TICKLE:
			trp->tr_xmt = gbuf_cont(m);
			gbuf_cont(m) = NULL;
			goto l_notify;
		}
	} else {
		(AT_ATP_HDR(m))->bitmap = trp->tr_bitmap;

		if (trp->tr_retry != (unsigned int) ATP_INFINITE_RETRIES)
			trp->tr_retry--;
		atp_send(trp);
	}
}


/*
 *	atp_free frees up a request, cleaning up the queues and freeing
 *		the request packet
 *      always called at 'lock'
 */

void atp_free(trp)
register struct atp_trans *trp;
{	
	register struct atp_state *atp;
	register int i;
	
	dPrintf(D_M_ATP_LOW, D_L_TRACE,
		("atp_free: freeing trp 0x%x\n", (u_int) trp));


	if (trp->tr_state == TRANS_ABORTING) {
		ATP_Q_REMOVE(atp_trans_abort, trp, tr_list);
		trp->tr_state = TRANS_DONE;
	}
	else {
		if (trp->tr_tmo_func)
	        atp_untimout(atp_req_timeout, trp);

		atp = trp->tr_queue;
		ATP_Q_REMOVE(atp->atp_trans_wait, trp, tr_list);
	
		if (trp->tr_xmt) {
		  	gbuf_freem(trp->tr_xmt);
			trp->tr_xmt = NULL;
		}
		for (i = 0; i < 8; i++) {
		        if (trp->tr_rcv[i]) {
			        gbuf_freem(trp->tr_rcv[i]);
				trp->tr_rcv[i] = NULL;
			}
		}
		if (trp->tr_bdsp) {
			gbuf_freem(trp->tr_bdsp);
			trp->tr_bdsp = NULL;
		}
		
		if (trp->tr_rsp_wait) {
			trp->tr_state = TRANS_ABORTING;
			ATP_Q_APPEND(atp_trans_abort, trp, tr_list);
			wakeup(&trp->tr_event);
			return;
		}
	}
	
	atp_trans_free(trp);
} /* atp_free */


/*
 *	atp_send transmits a request packet by queuing it (if it isn't already) and
 *		scheduling the queue
 */

void atp_send(trp)
register struct atp_trans *trp;
{
	gbuf_t *m;
	struct atp_state *atp;

	dPrintf(D_M_ATP_LOW, D_L_OUTPUT, ("atp_send: trp=0x%x, loc=%d\n",
		(u_int) trp->tr_queue, trp->tr_local_socket));

	if ((atp = trp->tr_queue) != 0) {
	  if (trp->tr_state == TRANS_TIMEOUT) {
	    if ((m = gbuf_cont(trp->tr_xmt)) == NULL)
	        m = trp->tr_xmt;

	    /*
	     *	Now either release the transaction or start the timer
	     */
	    if (!trp->tr_retry && !trp->tr_bitmap && !trp->tr_xo) {
		m = (gbuf_t *)gbuf_copym(m);
		atp_x_done(trp);
	    } else {
		m = (gbuf_t *)gbuf_dupm(m);

		atp_timout(atp_req_timeout, trp, trp->tr_timeout);
	    }

	    if (m) {	
	        trace_mbufs(D_M_ATP_LOW, "  m", m);
		DDP_OUTPUT(m);
	    }
	}
  }
}


/*
 *	atp_reply sends all the available messages in the bitmap again
 *		by queueing us to the write service routine
 */

void atp_reply(rcbp)
register struct atp_rcb *rcbp;
{
	register struct atp_state *atp;
	register int i;

  if ((atp = rcbp->rc_queue) != 0) {
	for (i = 0; i < rcbp->rc_pktcnt; i++) {
		if (rcbp->rc_bitmap&atp_mask[i])
			rcbp->rc_snd[i] = 1;
		else
			rcbp->rc_snd[i] = 0;
	}
        if (rcbp->rc_rep_waiting == 0) {
	        rcbp->rc_state = RCB_SENDING;
	        rcbp->rc_rep_waiting = 1;
	        atp_send_replies(atp, rcbp);
	}
  }
}


/*
 *	The rcb timer just frees the rcb, this happens when we missed a release for XO
 */

void atp_rcb_timer(__unused struct atp_trans *junk)
{  
    register struct atp_rcb *rcbp;
	register struct atp_rcb *next_rcbp;
	struct timeval timenow;

l_again:
	getmicrouptime(&timenow);
	for (rcbp = atp_need_rel.head; rcbp; rcbp = next_rcbp) {
	        next_rcbp = rcbp->rc_tlist.next;

	        if ((timenow.tv_sec - rcbp->rc_timestamp) > 30) {
		        atp_rcb_free(rcbp);
		        goto l_again;
		}
	}
	atp_timout(atp_rcb_timer, trp_tmo_rcb, 10 * HZ);
}

void atp_iocack(atp, m)
struct   atp_state *atp;
register gbuf_t *m;
{
	if (gbuf_type(m) == MSG_IOCTL)
		gbuf_set_type(m, MSG_IOCACK);
	if (gbuf_cont(m))
		((ioc_t *)gbuf_rptr(m))->ioc_count = gbuf_msgsize(gbuf_cont(m));
	else
		((ioc_t *)gbuf_rptr(m))->ioc_count = 0;

	if (atp->dflag)
		asp_ack_reply(atp->atp_gref, m);
	else
		atalk_putnext(atp->atp_gref, m);
}

void atp_iocnak(atp, m, err)
struct   atp_state *atp;
register gbuf_t *m;
register int err;
{
	if (gbuf_type(m) == MSG_IOCTL)
		gbuf_set_type(m, MSG_IOCNAK);
	((ioc_t *)gbuf_rptr(m))->ioc_count = 0;
	((ioc_t *)gbuf_rptr(m))->ioc_error = err ? err : ENXIO;
	((ioc_t *)gbuf_rptr(m))->ioc_rval = -1;
	if (gbuf_cont(m)) {
		gbuf_freem(gbuf_cont(m));
		gbuf_cont(m) = NULL;
	}

	if (atp->dflag)
		asp_nak_reply(atp->atp_gref, m);
	else
		atalk_putnext(atp->atp_gref, m);
}

/*
 *	Generate a transaction id for a socket
 */
static int lasttid;
int atp_tid(atp)
register struct atp_state *atp;
{
	register int i;
	register struct atp_trans *trp;

	for (i = lasttid;;) {
		i = (i+1)&0xffff;

		for (trp = atp->atp_trans_wait.head; trp; trp = trp->tr_list.next) {
		        if (trp->tr_tid == i)
			        break;
		}
		if (trp == NULL) {
			lasttid = i;
			return(i);
		}
	}
}
Commit	Line	Data
1c79356b	1	/*
5d5c5d0d A	2	* Copyright (c) 2000 Apple Computer, Inc. All rights reserved.
5d5c5d0d A	3	*
2d21ac55	4	* @APPLE_OSREFERENCE_LICENSE_HEADER_START@
1c79356b	5	*
2d21ac55 A	6	* This file contains Original Code and/or Modifications of Original Code
	7	* as defined in and that are subject to the Apple Public Source License
	8	* Version 2.0 (the 'License'). You may not use this file except in
	9	* compliance with the License. The rights granted to you under the License
	10	* may not be used to create, or enable the creation or redistribution of,
	11	* unlawful or unlicensed copies of an Apple operating system, or to
	12	* circumvent, violate, or enable the circumvention or violation of, any
	13	* terms of an Apple operating system software license agreement.
8f6c56a5	14	*
2d21ac55 A	15	* Please obtain a copy of the License at
	16	* http://www.opensource.apple.com/apsl/ and read it before using this file.
	17	*
	18	* The Original Code and all software distributed under the License are
	19	* distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
8f6c56a5 A	20	* EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
8f6c56a5 A	21	* INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
2d21ac55 A	22	* FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
	23	* Please see the License for the specific language governing rights and
	24	* limitations under the License.
8f6c56a5	25	*
2d21ac55	26	* @APPLE_OSREFERENCE_LICENSE_HEADER_END@
1c79356b A	27	*/
	28	/*
	29	* Copyright (c) 1996-1998 Apple Computer, Inc.
	30	* All Rights Reserved.
	31	*/
	32
	33	/* Modified for MP, 1996 by Tuyen Nguyen
	34	* Modified, March 17, 1997 by Tuyen Nguyen for MacOSX.
	35	*/
	36	#include <sys/errno.h>
	37	#include <sys/types.h>
	38	#include <sys/param.h>
	39	#include <machine/spl.h>
	40	#include <sys/systm.h>
	41	#include <sys/kernel.h>
	42	#include <sys/proc.h>
	43	#include <sys/filedesc.h>
	44	#include <sys/fcntl.h>
	45	#include <sys/mbuf.h>
	46	#include <sys/ioctl.h>
	47	#include <sys/malloc.h>
	48	#include <sys/socket.h>
	49
	50	#include <netat/sysglue.h>
	51	#include <netat/appletalk.h>
	52	#include <netat/ddp.h>
	53	#include <netat/at_pcb.h>
	54	#include <netat/atp.h>
2d21ac55	55	#include <netat/asp.h>
1c79356b A	56	#include <netat/debug.h>
1c79356b A	57
2d21ac55 A	58	extern struct atp_rcb_qhead atp_need_rel;
2d21ac55 A	59	extern struct atp_trans *trp_tmo_rcb;
1c79356b A	60
	61	/*
	62	* The request timer retries a request, if all retries are used up
	63	* it returns a NAK
	64	*/
	65
	66	void
	67	atp_req_timeout(trp)
	68	register struct atp_trans *trp;
	69	{
1c79356b A	70	register gbuf_t *m;
	71	gref_t *gref;
	72	struct atp_state *atp;
	73	struct atp_trans *ctrp;
	74
	75	if ((atp = trp->tr_queue) == 0)
	76	return;
0c530ab8	77	if (atp->atp_flags & ATP_CLOSING)
1c79356b	78	return;
0c530ab8	79
1c79356b A	80	for (ctrp = atp->atp_trans_wait.head; ctrp; ctrp = ctrp->tr_list.next) {
	81	if (ctrp == trp)
	82	break;
	83	}
0c530ab8	84	if (ctrp != trp)
1c79356b	85	return;
1c79356b A	86
	87	if ((m = gbuf_cont(trp->tr_xmt)) == NULL)
	88	m = trp->tr_xmt; /* issued via the new interface */
	89
	90	if (trp->tr_retry == 0) {
	91	trp->tr_state = TRANS_FAILED;
	92	if (m == trp->tr_xmt) {
	93	trp->tr_xmt = NULL;
	94	l_notify:
	95	gbuf_wset(m,1);
	96	*gbuf_rptr(m) = 99;
	97	gbuf_set_type(m, MSG_DATA);
	98	gref = trp->tr_queue->atp_gref;
1c79356b A	99	atalk_putnext(gref, m);
	100
	101	return;
	102	}
	103	dPrintf(D_M_ATP_LOW,D_L_INFO, ("atp_req_timeout: skt=%d\n",
	104	trp->tr_local_socket));
	105	m = trp->tr_xmt;
	106	switch(((ioc_t *)(gbuf_rptr(trp->tr_xmt)))->ioc_cmd) {
	107	case AT_ATP_ISSUE_REQUEST:
	108	trp->tr_xmt = NULL;
	109	if (trp->tr_queue->dflag)
	110	((ioc_t *)gbuf_rptr(m))->ioc_cmd = AT_ATP_REQUEST_COMPLETE;
	111	else if (trp->tr_bdsp == NULL) {
1c79356b A	112	gbuf_freem(m);
1c79356b A	113	if (trp->tr_rsp_wait)
9bccf70c	114	wakeup(&trp->tr_event);
1c79356b A	115	break;
1c79356b A	116	}
1c79356b A	117	atp_iocnak(trp->tr_queue, m, ETIMEDOUT);
	118	atp_free(trp);
	119	return;
	120
	121	case AT_ATP_ISSUE_REQUEST_NOTE:
	122	case AT_ATP_ISSUE_REQUEST_TICKLE:
	123	trp->tr_xmt = gbuf_cont(m);
	124	gbuf_cont(m) = NULL;
	125	goto l_notify;
	126	}
	127	} else {
	128	(AT_ATP_HDR(m))->bitmap = trp->tr_bitmap;
	129
	130	if (trp->tr_retry != (unsigned int) ATP_INFINITE_RETRIES)
	131	trp->tr_retry--;
1c79356b A	132	atp_send(trp);
	133	}
	134	}
	135
	136
	137	/*
	138	* atp_free frees up a request, cleaning up the queues and freeing
	139	* the request packet
	140	* always called at 'lock'
	141	*/
	142
	143	void atp_free(trp)
	144	register struct atp_trans *trp;
0b4e3aa0	145	{
1c79356b A	146	register struct atp_state *atp;
1c79356b A	147	register int i;
1c79356b A	148
	149	dPrintf(D_M_ATP_LOW, D_L_TRACE,
	150	("atp_free: freeing trp 0x%x\n", (u_int) trp));
1c79356b	151
1c79356b	152
0b4e3aa0 A	153	if (trp->tr_state == TRANS_ABORTING) {
	154	ATP_Q_REMOVE(atp_trans_abort, trp, tr_list);
	155	trp->tr_state = TRANS_DONE;
1c79356b	156	}
0b4e3aa0 A	157	else {
	158	if (trp->tr_tmo_func)
	159	atp_untimout(atp_req_timeout, trp);
	160
	161	atp = trp->tr_queue;
	162	ATP_Q_REMOVE(atp->atp_trans_wait, trp, tr_list);
	163
	164	if (trp->tr_xmt) {
	165	gbuf_freem(trp->tr_xmt);
	166	trp->tr_xmt = NULL;
	167	}
	168	for (i = 0; i < 8; i++) {
	169	if (trp->tr_rcv[i]) {
	170	gbuf_freem(trp->tr_rcv[i]);
	171	trp->tr_rcv[i] = NULL;
	172	}
	173	}
	174	if (trp->tr_bdsp) {
	175	gbuf_freem(trp->tr_bdsp);
	176	trp->tr_bdsp = NULL;
	177	}
	178
	179	if (trp->tr_rsp_wait) {
	180	trp->tr_state = TRANS_ABORTING;
	181	ATP_Q_APPEND(atp_trans_abort, trp, tr_list);
9bccf70c	182	wakeup(&trp->tr_event);
0b4e3aa0	183	return;
1c79356b A	184	}
1c79356b A	185	}
0b4e3aa0	186
1c79356b	187	atp_trans_free(trp);
1c79356b A	188	} /* atp_free */
	189
	190
	191	/*
	192	* atp_send transmits a request packet by queuing it (if it isn't already) and
	193	* scheduling the queue
	194	*/
	195
	196	void atp_send(trp)
	197	register struct atp_trans *trp;
	198	{
	199	gbuf_t *m;
	200	struct atp_state *atp;
	201
	202	dPrintf(D_M_ATP_LOW, D_L_OUTPUT, ("atp_send: trp=0x%x, loc=%d\n",
	203	(u_int) trp->tr_queue, trp->tr_local_socket));
	204
	205	if ((atp = trp->tr_queue) != 0) {
	206	if (trp->tr_state == TRANS_TIMEOUT) {
	207	if ((m = gbuf_cont(trp->tr_xmt)) == NULL)
	208	m = trp->tr_xmt;
	209
	210	/*
	211	* Now either release the transaction or start the timer
	212	*/
	213	if (!trp->tr_retry && !trp->tr_bitmap && !trp->tr_xo) {
	214	m = (gbuf_t *)gbuf_copym(m);
	215	atp_x_done(trp);
	216	} else {
	217	m = (gbuf_t *)gbuf_dupm(m);
	218
	219	atp_timout(atp_req_timeout, trp, trp->tr_timeout);
	220	}
	221
	222	if (m) {
	223	trace_mbufs(D_M_ATP_LOW, " m", m);
	224	DDP_OUTPUT(m);
	225	}
	226	}
	227	}
	228	}
	229
	230
	231	/*
	232	* atp_reply sends all the available messages in the bitmap again
	233	* by queueing us to the write service routine
	234	*/
	235
	236	void atp_reply(rcbp)
	237	register struct atp_rcb *rcbp;
	238	{
	239	register struct atp_state *atp;
	240	register int i;
1c79356b A	241
1c79356b A	242	if ((atp = rcbp->rc_queue) != 0) {
1c79356b A	243	for (i = 0; i < rcbp->rc_pktcnt; i++) {
	244	if (rcbp->rc_bitmap&atp_mask[i])
	245	rcbp->rc_snd[i] = 1;
	246	else
	247	rcbp->rc_snd[i] = 0;
	248	}
	249	if (rcbp->rc_rep_waiting == 0) {
	250	rcbp->rc_state = RCB_SENDING;
	251	rcbp->rc_rep_waiting = 1;
1c79356b	252	atp_send_replies(atp, rcbp);
0c530ab8	253	}
1c79356b A	254	}
	255	}
	256
	257
	258	/*
	259	* The rcb timer just frees the rcb, this happens when we missed a release for XO
	260	*/
	261
2d21ac55	262	void atp_rcb_timer(__unused struct atp_trans *junk)
1c79356b	263	{
0c530ab8	264	register struct atp_rcb *rcbp;
1c79356b	265	register struct atp_rcb *next_rcbp;
91447636	266	struct timeval timenow;
1c79356b A	267
1c79356b A	268	l_again:
91447636	269	getmicrouptime(&timenow);
1c79356b A	270	for (rcbp = atp_need_rel.head; rcbp; rcbp = next_rcbp) {
	271	next_rcbp = rcbp->rc_tlist.next;
	272
0c530ab8	273	if ((timenow.tv_sec - rcbp->rc_timestamp) > 30) {
1c79356b A	274	atp_rcb_free(rcbp);
	275	goto l_again;
	276	}
	277	}
1c79356b A	278	atp_timout(atp_rcb_timer, trp_tmo_rcb, 10 * HZ);
	279	}
	280
2d21ac55	281	void atp_iocack(atp, m)
1c79356b A	282	struct atp_state *atp;
	283	register gbuf_t *m;
	284	{
	285	if (gbuf_type(m) == MSG_IOCTL)
	286	gbuf_set_type(m, MSG_IOCACK);
	287	if (gbuf_cont(m))
	288	((ioc_t *)gbuf_rptr(m))->ioc_count = gbuf_msgsize(gbuf_cont(m));
	289	else
	290	((ioc_t *)gbuf_rptr(m))->ioc_count = 0;
	291
	292	if (atp->dflag)
	293	asp_ack_reply(atp->atp_gref, m);
	294	else
	295	atalk_putnext(atp->atp_gref, m);
	296	}
	297
2d21ac55	298	void atp_iocnak(atp, m, err)
1c79356b A	299	struct atp_state *atp;
	300	register gbuf_t *m;
	301	register int err;
	302	{
	303	if (gbuf_type(m) == MSG_IOCTL)
	304	gbuf_set_type(m, MSG_IOCNAK);
	305	((ioc_t *)gbuf_rptr(m))->ioc_count = 0;
	306	((ioc_t *)gbuf_rptr(m))->ioc_error = err ? err : ENXIO;
	307	((ioc_t *)gbuf_rptr(m))->ioc_rval = -1;
	308	if (gbuf_cont(m)) {
	309	gbuf_freem(gbuf_cont(m));
	310	gbuf_cont(m) = NULL;
	311	}
	312
	313	if (atp->dflag)
	314	asp_nak_reply(atp->atp_gref, m);
	315	else
	316	atalk_putnext(atp->atp_gref, m);
	317	}
	318
	319	/*
	320	* Generate a transaction id for a socket
	321	*/
	322	static int lasttid;
2d21ac55	323	int atp_tid(atp)
1c79356b A	324	register struct atp_state *atp;
	325	{
	326	register int i;
	327	register struct atp_trans *trp;
1c79356b	328
1c79356b A	329	for (i = lasttid;;) {
	330	i = (i+1)&0xffff;
	331
	332	for (trp = atp->atp_trans_wait.head; trp; trp = trp->tr_list.next) {
	333	if (trp->tr_tid == i)
	334	break;
	335	}
	336	if (trp == NULL) {
	337	lasttid = i;
1c79356b A	338	return(i);
	339	}
	340	}
	341	}