rom/devs/scsi/scsi_unitclass.c

   1 /*
   2     Copyright © 2019, The AROS Development Team. All rights reserved.
   3     $Id$
   4 */
   5
   6 #include <aros/debug.h>
   7
   8 #include <proto/exec.h>
   9
  10 /* We want all other bases obtained from our base */
  11 #define __NOLIBBASE__
  12
  13 #include <hidd/storage.h>
  14 #include <hidd/scsi.h>
  15 #include <oop/oop.h>
  16
  17 #include "scsi.h"
  18
  19 /*****************************************************************************************
  20
  21     NAME
  22         --background--
  23
  24     LOCATION
  25         IID_Hidd_SCSIUnit
  26
  27     NOTES
  28         Unit class is private to ata.device. Instances of this class represent
  29         devices connected to IDE buses, and can be used to obtain information
  30         about these devices.
  31
  32 *****************************************************************************************/
  33
  34 /*
  35  * a STUB function for commands not supported by this particular device
  36  */
  37 static BYTE scsi_STUB(struct scsi_Unit *su)
  38 {
  39     D(bug("[SCSI%02ld] CALLED STUB FUNCTION (GENERIC). THIS OPERATION IS NOT "
  40         "SUPPORTED BY DEVICE\n", su->su_UnitNum));
  41     return CDERR_NOCMD;
  42 }
  43
  44 static BYTE scsi_STUB_IO32(struct scsi_Unit *su, ULONG blk, ULONG len,
  45     APTR buf, ULONG* act)
  46 {
  47     D(bug("[SCSI%02ld] CALLED STUB FUNCTION (IO32). THIS OPERATION IS NOT "
  48         "SUPPORTED BY DEVICE\n", su->su_UnitNum));
  49     return CDERR_NOCMD;
  50 }
  51
  52 static BYTE scsi_STUB_IO64(struct scsi_Unit *su, UQUAD blk, ULONG len,
  53     APTR buf, ULONG* act)
  54 {
  55     D(bug("[SCSI%02ld] CALLED STUB FUNCTION -- IO ACCESS TO BLOCK %08lx:%08lx, LENGTH %08lx. THIS OPERATION IS NOT SUPPORTED BY DEVICE\n", su->su_UnitNum, (blk >> 32), (blk & 0xffffffff), len));
  56     return CDERR_NOCMD;
  57 }
  58
  59 static BYTE scsi_STUB_SCSI(struct scsi_Unit *su, struct SCSICmd* cmd)
  60 {
  61     D(bug("[SCSI%02ld] CALLED STUB FUNCTION. THIS OPERATION IS NOT SUPPORTED BY DEVICE\n", su->su_UnitNum));
  62     return CDERR_NOCMD;
  63 }
  64
  65 OOP_Object *SCSIUnit__Root__New(OOP_Class *cl, OOP_Object *o, struct pRoot_New *msg)
  66 {
  67     D(bug("[SCSI:Unit] %s()\n", __PRETTY_FUNCTION__));
  68
  69     o = (OOP_Object *)OOP_DoSuperMethod(cl, o, &msg->mID);
  70     if (o)
  71     {
  72         struct scsiBase *SCSIBase = cl->UserData;
  73         struct scsi_Unit *unit = OOP_INST_DATA(cl, o);
  74
  75         D(bug("[SCSI:Unit] %s: instance @ 0x%p\n", __PRETTY_FUNCTION__, o));
  76
  77         unit->su_Drive = AllocPooled(SCSIBase->scsi_MemPool, sizeof(struct DriveIdent));
  78         if (!unit->su_Drive)
  79         {
  80             OOP_MethodID disp_msg = msg->mID - moRoot_New + moRoot_Dispose;
  81
  82             OOP_DoSuperMethod(cl, o, &disp_msg);
  83             return NULL;
  84         }
  85
  86         unit->su_SectorShift = 9; /* this really has to be set here. */
  87
  88         NEWLIST(&unit->su_SoftList);
  89
  90         /*
  91          * since the stack is always handled by caller
  92          * it's safe to stub all calls with one function
  93          */
  94         unit->su_Read32     = scsi_STUB_IO32;
  95         unit->su_Read64     = scsi_STUB_IO64;
  96         unit->su_Write32    = scsi_STUB_IO32;
  97         unit->su_Write64    = scsi_STUB_IO64;
  98         unit->su_Eject      = scsi_STUB;
  99         unit->su_DirectSCSI = scsi_STUB_SCSI;
 100         unit->su_Identify   = scsi_STUB;
 101     }
 102     return o;
 103 }
 104
 105 void SCSIUnit__Root__Dispose(OOP_Class *cl, OOP_Object *o, OOP_Msg msg)
 106 {
 107     struct scsiBase *SCSIBase = cl->UserData;
 108     struct scsi_Unit *unit = OOP_INST_DATA(cl, o);
 109
 110     D(bug("[SCSI:Unit] %s()\n", __PRETTY_FUNCTION__));
 111
 112     FreePooled(SCSIBase->scsi_MemPool, unit->su_Drive, sizeof(struct DriveIdent));
 113     OOP_DoSuperMethod(cl, o, msg);
 114 }
 115
 116 /*****************************************************************************************
 117
 118     NAME
 119         aoHidd_SCSIUnit_XferModes
 120
 121     SYNOPSIS
 122         [..G], ULONG
 123
 124     LOCATION
 125         IID_Hidd_SCSIUnit
 126
 127     FUNCTION
 128         Tells which transfer modes are supported by this device. The returned value
 129         is a bitwise combination of the following flags (see include/hidd/ata.h):
 130
 131         AF_XFER_PIO(x)  - PIO mode number x (0 - 4)
 132         AF_XFER_MDMA(x) - multiword DMA mode number x (0 - 2)
 133         AF_XFER_UDMA(x) - Ultra DMA mode number x (0 - 6)
 134         AF_XFER_48BIT   - LBA48 block addressing
 135         AF_XFER_RWMILTI - Multisector PIO
 136         AF_XFER_PACKET  - ATAPI
 137         AF_XFER_LBA     - LBA28 block addressing
 138         AF_XFER_PIO32   - 32-bit PIO
 139
 140     NOTES
 141
 142     EXAMPLE
 143
 144     BUGS
 145         32-bit PIO is actually controller's property and not drive's property.
 146         Because of this AF_XFER_PIO32 flag can never be returned by this attribute.
 147         Nevertheless, it can be returned by aoHidd_SCSIUnit_ConfiguredModes
 148         attribute.
 149
 150     SEE ALSO
 151         aoHidd_SCSIUnit_ConfiguredModes
 152
 153     INTERNALS
 154
 155 *****************************************************************************************/
 156 /*****************************************************************************************
 157
 158     NAME
 159         aoHidd_SCSIUnit_MultiSector
 160
 161     SYNOPSIS
 162         [..G], UBYTE
 163
 164     LOCATION
 165         IID_Hidd_SCSIUnit
 166
 167     FUNCTION
 168         Tells maximum allowed number of sectors for multisector transfer.
 169
 170     NOTES
 171
 172     EXAMPLE
 173
 174     BUGS
 175
 176     SEE ALSO
 177
 178     INTERNALS
 179
 180 *****************************************************************************************/
 181 /*****************************************************************************************
 182
 183     NAME
 184         aoHidd_SCSIUnit_ConfiguredModes
 185
 186     SYNOPSIS
 187         [..G], ULONG
 188
 189     LOCATION
 190         IID_Hidd_SCSIUnit
 191
 192     FUNCTION
 193         Tells which transfer modes are currently configured for use with the drive.
 194         The returned value is a bitmask of the same flags as for
 195         aoHidd_SCSIUnit_XferModes attribute.
 196
 197     NOTES
 198
 199     EXAMPLE
 200
 201     BUGS
 202         Currently ata.device does not distinguish between PIO modes and does not
 203         set any bit for them. Absence of DMA mode flags automatically means that
 204         PIO mode is used.
 205
 206     SEE ALSO
 207         aoHidd_SCSIUnit_XferModes
 208
 209     INTERNALS
 210
 211 *****************************************************************************************/
 212
 213 void SCSIUnit__Root__Get(OOP_Class *cl, OOP_Object *o, struct pRoot_Get *msg)
 214 {
 215     struct scsiBase *SCSIBase = cl->UserData;
 216     struct scsi_Unit *unit = OOP_INST_DATA(cl, o);
 217     ULONG idx;
 218
 219     Hidd_StorageUnit_Switch (msg->attrID, idx)
 220     {
 221     case aoHidd_StorageUnit_Device:
 222         *msg->storage = (IPTR)"scsi.device";
 223         return;
 224
 225     case aoHidd_StorageUnit_Number:
 226         *msg->storage = unit->su_UnitNum;
 227         return;
 228
 229     case aoHidd_StorageUnit_Type:
 230         {
 231             UBYTE u = unit->su_UnitNum & 1;
 232             switch (unit->su_Bus->sb_Dev[u])
 233             {
 234                 case DEV_SATA:
 235                 case DEV_ATA:
 236                     *msg->storage = vHidd_StorageUnit_Type_FixedDisk;
 237                     break;
 238
 239                 case DEV_SATAPI:
 240                 case DEV_ATAPI:
 241                     *msg->storage = vHidd_StorageUnit_Type_OpticalDisc;
 242                     break;
 243
 244                 default:
 245                     *msg->storage = vHidd_StorageUnit_Type_Unknown;
 246                     break;
 247             }
 248             return;
 249         }
 250
 251     case aoHidd_StorageUnit_Model:
 252         *msg->storage = (IPTR)unit->su_Model;
 253         return;
 254
 255     case aoHidd_StorageUnit_Revision:
 256         *msg->storage = (IPTR)unit->su_FirmwareRev;
 257         return;
 258
 259     case aoHidd_StorageUnit_Serial:
 260         *msg->storage = (IPTR)unit->su_SerialNumber;
 261         return;
 262
 263     case aoHidd_StorageUnit_Removable:
 264         *msg->storage = (unit->su_Flags & AF_Removable) ? TRUE : FALSE;
 265         return;
 266     }
 267
 268     Hidd_SCSIUnit_Switch (msg->attrID, idx)
 269     {
 270     case aoHidd_SCSIUnit_XferModes:
 271         *msg->storage = unit->su_XferModes;
 272         return;
 273
 274     case aoHidd_SCSIUnit_MultiSector:
 275         *msg->storage = unit->su_Drive->id_RWMultipleSize & 0xFF;
 276         return;
 277
 278     case aoHidd_SCSIUnit_ConfiguredModes:
 279         *msg->storage = unit->su_UseModes;
 280         return;
 281     }
 282
 283     OOP_DoSuperMethod(cl, o, &msg->mID);
 284 }