DataMuseum.dk

top - metrics - download

    Length: 6144 (0x1800)
    Types: TextFile
    Names: »SYSCALLS.CC«

└─⟦909f4eb2b⟧ Bits:30009789/_.ft.Ibm2.50006622.imd Mogens Pelles Zilog 80,000 / EOS projekt
    └─⟦this⟧ »SYSCALLS.CC« 
└─⟦ddcd65152⟧ Bits:30009789/_.ft.Ibm2.50006617.imd Mogens Pelles Zilog 80,000 / EOS projekt
    └─⟦this⟧ »SYSCALLS.CC« 

TextFile

#include <sys/types.h>
#include <sys/times.h>
#include <sgtty.h>
#include <sys/stat.h>
#include <stdio.h>
 
extern int testflag;
 
e_negative ()
æint firstvar = -1;
 printarea(">>>>>>>>>> negative called <<<<<<<<<<",&firstvar,64);
 return(-1);
å;
 
e_link (n1,n2)
char *n1,*n2;
æint firstvar = -1;
 printarea(">>>>>>>>>> link called <<<<<<<<<<",&firstvar,64);
 return(0);
å;
 
e_unlink (n)
char *n;
æint firstvar = -1;
 printarea(">>>>>>>>>> unlink called <<<<<<<<<<",&firstvar,64);
 return(0);
å;
 
e_acct(file)
char *file;
æint firstvar = -1;
 printarea(">>>>>>>>>> acct called <<<<<<<<<<",&firstvar,64);
 return(-1);
å;
 
e_chmod (name,mode)
char *name;
int mode;
æint firstvar = -1;
 printarea(">>>>>>>>>> chmod called <<<<<<<<<<",&firstvar,64);
 return(0);
å;
 
e_chown (name,owner,group)
char *name;
int owner;
int group;
æint firstvar = -1;
 printarea(">>>>>>>>>> chown called <<<<<<<<<<",&firstvar,64);
 return(0);
å;
 
e_dup2 (fildes,fildes2)
int fildes;
int fildes2;
æint firstvar = -1;
 printarea(">>>>>>>>>> dup2 called <<<<<<<<<<",&firstvar,64);
 return(-1);
å;
 
e_getuid ()
æint firstvar = -1;
 printarea(">>>>>>>>>> getuid called <<<<<<<<<<",&firstvar,64);
 return(0);
å;
 
e_geteuid ()
æint firstvar = -1;
 printarea(">>>>>>>>>> geteuid called <<<<<<<<<<",&firstvar,64);
 return(0);
å;
 
e_getgid ()
æint firstvar = -1;
 printarea(">>>>>>>>>> getgid called <<<<<<<<<<",&firstvar,64);
 return(0);
å;
 
e_getegid ()
æint firstvar = -1;
 printarea(">>>>>>>>>> getegid called <<<<<<<<<<",&firstvar,64);
 return(0);
å;
 
e_ioctl (fildes,request,argp)
int fildes;
int request;
/* struct sgttyb *argp; */
int *argp;
æint firstvar = -1;
struct stat buf;
extern int clexflags;
int bit;
int res;
  res = 0;
  printvar(">>>>>>>>>> ioctl called <<<<<<<<<, clexflags= ",clexflags);
  printvar("   ioctl: request= ",request);
  printvar("   ioctl: fildes= ",fildes);
  res = fstat(fildes,&buf);
  printvar("   ioctl, fstat= ",res);
  printarea ("  ioctl, fstatrec= ",&buf,64);
  if (!res) æ
    if (fildes == 0)  bit = 0x80000000;
    else bit = 0x40000000 >> (fildes - 1); /* indicating file in bitmask */
    printvar("   ioctl: bit= ",bit);
    if (request == FIOCLEX) æ
      clexflags = clexflags ø bit; /* set bit */
    å else if (request == FIONCLEX) æ
      clexflags = clexflags & (übit); /* remove bit */
    å else æ
      if (request == FIONREAD) *argp = buf.st_size;
      else res = ! (buf.st_mode == S_IFCHR);
    å
  å
  printvar("ioctl, clexflags= ",clexflags);
  printvar("ioctl, res= ",res);
  return(res);
å;
 
e_stty (fildes,argp)
int fildes;
struct sgttyb *argp;
æint firstvar = -1;
 printarea(">>>>>>>>>> stty called <<<<<<<<<<",&firstvar,64);
 printarea("stty, sgttyb=",argp,64);
 return(ioctl(fildes,999,0)); /* check ttymode */
å;
 
e_gtty (fildes,argp)
int fildes;
struct sgttyb *argp;
æint firstvar = -1;
 printarea(">>>>>>>>>> gtty called <<<<<<<<<<",&firstvar,64);
 argp->sg_ispeed = 13;
 argp->sg_ospeed = 13; /* 9600 bps */
 argp->sg_erase  = 8;  /* ctrl-h */
 argp->sg_kill   = '@';
 argp->sg_flags  = 0;
 printarea("gtty, sgttyb=",argp,64);
 return(ioctl(fildes,999,0)); /* check ttymode */
å;
 
e_lock (flag)
int flag;
æint firstvar = -1;
 printarea(">>>>>>>>>> lock called <<<<<<<<<<",&firstvar,64);
 return(0);
å;
 
e_locking (fildes,mode,size)
int fildes;
int mode;
int size;
æint firstvar = -1;
 printarea(">>>>>>>>>> locking called <<<<<<<<<<",&firstvar,64);
 return(-1);
å;
 
e_mknod (name,mode, addr)
char *name;
int mode;
int addr;
æint firstvar = -1;
 printarea(">>>>>>>>>> mknod called <<<<<<<<<<",&firstvar,64);
 return(0);
å;
 
e_mount(special,name,rwflag)
char *special;
char *name;
int rwflag;
æint firstvar = -1;
 printarea(">>>>>>>>>> mount called <<<<<<<<<<",&firstvar,64);
 return(0);
å;
 
e_nice(incr)
int incr;
æint firstvar = -1;
 printarea(">>>>>>>>>> nice called <<<<<<<<<<",&firstvar,64);
 return(0);
å;
 
e_profil(buff,bufsiz,offset,scale)
char *buff;
int bufsiz;
int offset;
int scale;
æint firstvar = -1;
 printarea(">>>>>>>>>> profil called <<<<<<<<<<",&firstvar,64);
 return(-1);
å;
 
e_ptrace(req,pid,addr,data)
int req;
int pid;
int *addr;
int data;
æint firstvar = -1;
 printarea(">>>>>>>>>> ptrace called <<<<<<<<<<",&firstvar,64);
 return(-1);
å;
 
e_setuid(uid)
int uid;
æint firstvar = -1;
 printarea(">>>>>>>>>> setuid called <<<<<<<<<<",&firstvar,64);
 return(0);
å;
 
e_setgid(gid)
int gid;
æint firstvar = -1;
 printarea(">>>>>>>>>> setgid called <<<<<<<<<<",&firstvar,64);
 return(0);
å;
 
e_stat(name,buf)
char *name;
struct stat *buf;
æint firstvar = -1;
int f;
int res;
 f=open(name,0);
 res=f;
 if (f >= 0) æ
   res=fstat(f,buf);
   close(f);
 å;
 printarea(">>>>>>>>>> stat called <<<<<<<<<< buf=",buf,64);
 return(res);
å;
 
e_fstat(fildes,buf)
int fildes;
struct stat *buf;
æint firstvar = -1;
 printarea(">>>>>>>>>> fstat called <<<<<<<<<<",&firstvar,64);
 return(0);
å;
 
e_phys(physnum,virtaddr,size,physaddr)
int physnum;
char *virtaddr;
long size;
char *physaddr;
æint firstvar = -1;
 printarea(">>>>>>>>>> phys called <<<<<<<<<<",&firstvar,64);
 return(-1);
å;
 
e_stime(tp)
long *tp;
æint firstvar = -1;
 printarea(">>>>>>>>>> stime called <<<<<<<<<<",&firstvar,64);
 return(0);
å;
 
e_sync ()
æint firstvar = -1;
 printarea(">>>>>>>>>> sync called <<<<<<<<<<",&firstvar,64);
 return(0);
å;
 
e_times(buffer)
char *buffer;
æint firstvar = -1;
 printarea(">>>>>>>>>> times called <<<<<<<<<<",&firstvar,64);
 return(0);
å;
 
e_umask(cmode)
int cmode;
æint firstvar = -1;
 printarea(">>>>>>>>>> umask called <<<<<<<<<<",&firstvar,64);
 return(0);
å;
 
e_umount(special)
char *special;
æint firstvar = -1;
 printarea(">>>>>>>>>> umount called <<<<<<<<<<",&firstvar,64);
 return(0);
å;
 
e_utime(file,timep)
char *file;
time_t timepÆ2Å;
æint firstvar = -1;
 printarea(">>>>>>>>>> utime called <<<<<<<<<<",&firstvar,64);
 return(0);
å;
 
«eof»