home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Pascal / MAXONPASCAL2.DMS / in.adf / INCLUDE / devices / scsidisk.h < prev    next >
Encoding:
Text File  |  1994-07-25  |  1.1 KB  |  51 lines

  1. {$if not def DEVICES_SCSIDISK_H} CONST DEVICES_SCSIDISK_H=0;
  2.  
  3. { ********************************************************************
  4.   ** KickPascal-Include-Datei "devices/scsidisk.h" zu Kickstart 3.0 **
  5.   ******************************************************************** }
  6.  
  7. TYPE p_SCSICmd = ^SCSICmd;
  8.  
  9. {$if not def EXEC_IO_H;incl "exec/io.h";endif}
  10.  
  11. CONST HD_SCSICMD = 28;
  12.  
  13. TYPE SCSICmd = RECORD
  14.  scsi_Data        : Ptr;
  15.  scsi_Length      : Long;
  16.  scsi_Actual      : Long;
  17.  scsi_Command     : Ptr;
  18.  scsi_CmdLength   : Word;
  19.  scsi_CmdActual   : Word;
  20.  scsi_Flags       : Byte;
  21.  scsi_Status      : Byte;
  22.  scsi_SenseData   : Ptr;
  23.  scsi_SenseLength : Word;
  24.  scsi_SenseActual : Word;
  25. END;
  26.  
  27. CONST
  28.  SCSIF_WRITE      = 0;
  29.  SCSIF_READ       = 1;
  30.  SCSIB_READ_WRITE = 0;
  31.  
  32. CONST
  33.  SCSIF_NOSENSE      = 0;
  34.  SCSIF_AUTOSENSE    = 2;
  35.  SCSIF_OLDAUTOSENSE = 6;
  36.  SCSIB_AUTOSENSE    = 1;
  37.  SCSIB_OLDAUTOSENSE = 2;
  38.  
  39. CONST
  40.  HFERR_SelfUnit   = 40;
  41.  HFERR_DMA        = 41;
  42.  HFERR_Phase      = 42;
  43.  HFERR_Parity     = 43;
  44.  HFERR_SelTimeout = 44;
  45.  HFERR_BadStatus  = 45;
  46.  
  47. CONST
  48.  HFERR_NoBoard  = 50;
  49.  
  50. {$endif}
  51.