pdelete.c

来自「TCP-IP红宝书源代码」· C语言 代码 · 共 31 行

/* pdelete.c - pdelete */

#include <conf.h>
#include <kernel.h>
#include <mark.h>
#include <ports.h>

/*------------------------------------------------------------------------
 *  pdelete  --  delete a port, freeing waiting processes and messages
 *------------------------------------------------------------------------
 */
SYSCALL
pdelete(int portid, void (*dispose)())
{
	STATWORD ps;    
	struct	pt *ptptr;

	disable(ps);
	if ( isbadport(portid) ||
#ifdef	MEMMARK
	     unmarked(ptmark) ||
#endif
	     (ptptr= &ports[portid])->ptstate != PTALLOC ) {
		restore(ps);
		return SYSERR;
	}
	_ptclear(ptptr, PTFREE, dispose);
	restore(ps);
	return OK;
}