include "sys.m";
sys:= load Sys Sys->PATH;
Connection: adt
{
dfd: ref FD; # data file
cfd: ref FD; # control file
dir: string; # pathname of line directory
};
announce: fn(addr: string): (int, Connection);
dial: fn(addr, local: string): (int, Connection);
listen: fn(c: Connection): (int, Connection);
export: fn(fd: ref FD, flag: int): int;
Examples
Make a call and return an open file descriptor to use for communications:
callkremvax( ): (int, Connection)
{
return sys->dial("tcp!kremvax", nil);
}
Call the local authentication server:dialauth(service: string): (int, Connection) { return sys->dial("net!$auth", nil); }
|
bind
|
Discussion of the mount function
|