tcballoc.c,v

来自「TCP-IP红宝书源代码」· C,V 代码 · 共 67 行

head	1.2;
access;
symbols;
locks
	dls:1.2; strict;
comment	@ * @;


1.2
date	97.09.21.19.30.11;	author dls;	state Dist;
branches;
next	1.1;

1.1
date	94.01.14.04.11.50;	author dls;	state v2e1;
branches;
next	;


desc
@@


1.2
log
@pre-3e code
@
text
@/* tcballoc.c - tcballoc */

#include <conf.h>
#include <kernel.h>
#include <network.h>

/*------------------------------------------------------------------------
 * tcballoc - allocate a Transmission Control Block
 *------------------------------------------------------------------------
 */
struct tcb *tcballoc()
{
	struct	tcb	*ptcb;
	int		slot;

	wait(tcps_tmutex);
	/* look for a free TCB */

	for (ptcb=&tcbtab[0], slot=0; slot<Ntcp; ++slot, ++ptcb)
		if (ptcb->tcb_state == TCPS_FREE)
			break;
	if (slot < Ntcp) {
		ptcb->tcb_state = TCPS_CLOSED;
		ptcb->tcb_mutex = screate(0);
	} else 
		ptcb = (struct tcb *)SYSERR;
	signal(tcps_tmutex);
	return ptcb;
}
@


1.1
log
@Initial revision
@
text
@@