#include <stdio.h>
#include <fcntl.h>
#include <sys/ioctl.h>
#include </sys/dev/ppbus/ppi.h>
#include </sys/dev/ppbus/ppbconf.h>
 
static int ppi_fd;
 
static void do_init(void)
{
  char port[] = "/dev/ppi0";
 
  ppi_fd = open(port, O_RDWR);
  if( ppi_fd < 0 ) {
    perror(port);
    _Exit(1);
  }
}
 
static void do_out(unsigned long outval)
{
  int val = outval, n;
 
  n = ioctl(ppi_fd, PPISDATA, &val);
  if( n < 0 ) {
    perror("ioctl PPISDATA");
    _Exit(1);
  }
}
 
static unsigned long do_in(void)
{
  int val, n;
 
  n = ioctl(ppi_fd, PPIGSTATUS, &val);
  if( n < 0 ) {
    perror("ioctl PPIGSTATUS");
    _Exit(1);
  }
  return val;
}