tmset.c,v

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

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


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

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


desc
@@


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

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

/*------------------------------------------------------------------------
 *  tmset -  set a fast timer
 *------------------------------------------------------------------------
 */
int tmset(port, portlen, msg, time)
int	port, portlen, msg, time;
{
	struct	tqent	*ptq, *newtq, *tq;

	newtq = (struct tqent *)getmem(sizeof(struct tqent));
	newtq->tq_timeleft = time;
	newtq->tq_time = ctr100;
	newtq->tq_port = port;
	newtq->tq_portlen = portlen;
	newtq->tq_msg = msg;
	newtq->tq_next = NULL;

	/* clear duplicates */
	(void) tmclear(port, msg);

	wait(tqmutex);
	if (tqhead == NULL) {
		tqhead = newtq;
		resume(tqpid);
		signal(tqmutex);
		return OK;
	}
	/* search the list for our spot */

	for (ptq=0, tq=tqhead; tq; tq=tq->tq_next) {
		if (newtq->tq_timeleft < tq->tq_timeleft)
			break;
		newtq->tq_timeleft -= tq->tq_timeleft;
		ptq = tq;
	}
	newtq->tq_next = tq;
	if (ptq)
		ptq->tq_next = newtq;
	else
		tqhead = newtq;
	if (tq)
		tq->tq_timeleft -= newtq->tq_timeleft;
	signal(tqmutex);
	return OK;
}
@


1.1
log
@Initial revision
@
text
@@