File:  [XINU] / xinu / sys / LSI / ibfree.c
Revision 1.1.1.1 (vendor branch): download - view: text, annotated - select for diffs
Tue Apr 24 17:39:04 2018 UTC (8 years, 3 months ago) by root
Branches: xinu, MAIN
CVS tags: xinu-19870308, HEAD
Xinu for VAX

/* ibfree.c - ibfree */

#include <conf.h>
#include <kernel.h>
#include <io.h>
#include <disk.h>
#include <lfile.h>
#include <dir.h>

/*------------------------------------------------------------------------
 *  ibfree.c  --  deallocate an iblock and return to the free list
 *------------------------------------------------------------------------
 */
ibfree(diskdev, inum)
int	diskdev;
IBADDR	inum;
{
	struct	dir	*dirptr;
	struct	iblk	*ibptr;
	char	*buff;
	DBADDR	dba;
	int	i, sem;

	dirptr = dsdirec(diskdev);
	buff = getbuf(dskdbp);
	dba = ibtodb(inum);
	read(diskdev, buff, dba);
	ibptr = (struct iblk *)(buff + ibdisp(inum));
	for (i=0 ; i<IBLEN ; i++)
		if ( (dba=ibptr->ib_dba[i]) != DBNULL)
			lfsdfree(diskdev, dba);
	sem = ( (struct dsblk *)devtab[diskdev].dvioblk )->dflsem;
	wait(sem);
	ibptr->ib_next = dirptr->d_filst;
	dirptr->d_filst = inum;
	write(diskdev, buff, dba);
	write(diskdev, dskbcpy(dirptr), DIRBLK);
	signal(sem);
	return(OK);
}

unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.