/* SLOOKUP.C */
/* 7 SEP 84, ES=6.01 */
/* 28 DEC 84, ES=7.00 */

#include <portab.h>
#include "system.h"

#define	PBLK	struct	_pblock

EXTERN LONG __OSIF();
EXTERN VOID zerofil();

PBLK
{
	BYTE	pb_mode;
	BYTE	pb_option;
	WORD	pb_flags;
	LONG	pb_swi;
	LONG	pb_id;
	LONG	pb_buffer;
	LONG	pb_bufsiz;
	LONG	pb_p1;
	LONG	pb_p2;
	LONG	pb_p3;
};

LONG s_lookup(table,flags,name,buffer,bufsiz,itemsiz,key)
    BYTE table;
    UWORD flags;
    BYTE *name;
    BYTE *buffer;
    LONG bufsiz;
    LONG itemsiz;
    LONG key;
{
    PBLK p;

	zerofil(&p,sizeof(PBLK));
	p.pb_option = table;
	p.pb_flags = flags;
	p.pb_id = (LONG)name;
	p.pb_buffer = (LONG)buffer;
	p.pb_bufsiz = bufsiz;
	p.pb_p1 = itemsiz;
	p.pb_p2 = key;
	return( __OSIF( F_LOOKUP,&p ) );
}