dlls/wnaspi32/winaspi32.c

   1 /*
   2  * Copyright 1997 Bruce Milner
   3  * Copyright 1998 Andreas Mohr
   4  *
   5  * This library is free software; you can redistribute it and/or
   6  * modify it under the terms of the GNU Lesser General Public
   7  * License as published by the Free Software Foundation; either
   8  * version 2.1 of the License, or (at your option) any later version.
   9  *
  10  * This library is distributed in the hope that it will be useful,
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13  * Lesser General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU Lesser General Public
  16  * License along with this library; if not, write to the Free Software
  17  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  18  */
  19
  20 #include "config.h"
  21
  22 #include <assert.h>
  23 #include <stdlib.h>
  24 #include <stdarg.h>
  25 #include <stdio.h>
  26 #include <sys/types.h>
  27 #include <errno.h>
  28 #include <fcntl.h>
  29 #include <string.h>
  30 #ifdef HAVE_UNISTD_H
  31 # include <unistd.h>
  32 #endif
  33
  34 #include "windef.h"
  35 #include "winbase.h"
  36 #include "aspi.h"
  37 #include "wnaspi32.h"
  38 #include "winescsi.h"
  39 #include "wine/debug.h"
  40
  41 WINE_DEFAULT_DEBUG_CHANNEL(aspi);
  42
  43 /* FIXME!
  44  * 1) Residual byte length reporting not handled
  45  * 2) Make this code re-entrant for multithreading
  46  *    -- Added CriticalSection to OpenDevices function
  47  * 3) Only linux supported so far
  48  * 4) Leaves sg devices open. This may or may not be okay.  A better solution
  49  *    would be to close the file descriptors when the thread/process using
  50  *    them no longer needs them.
  51  */
  52
  53 #ifdef linux
  54
  55 static ASPI_DEVICE_INFO *ASPI_open_devices = NULL;
  56
  57 static CRITICAL_SECTION ASPI_CritSection;
  58 static CRITICAL_SECTION_DEBUG critsect_debug =
  59 {
  60     0, 0, &ASPI_CritSection,
  61     { &critsect_debug.ProcessLocksList, &critsect_debug.ProcessLocksList },
  62       0, 0, { (DWORD_PTR)(__FILE__ ": ASPI_CritSection") }
  63 };
  64 static CRITICAL_SECTION ASPI_CritSection = { &critsect_debug, -1, 0, 0, 0, 0 };
  65
  66 #endif /* defined(linux) */
  67
  68
  69 BOOL WINAPI DllMain(HINSTANCE hInstDLL, DWORD fdwReason, LPVOID fImpLoad)
  70 {
  71 #ifdef linux
  72         switch( fdwReason )
  73         {
  74         case DLL_PROCESS_ATTACH:
  75             DisableThreadLibraryCalls(hInstDLL);
  76             SCSI_Init();
  77             break;
  78         case DLL_PROCESS_DETACH:
  79             if (fImpLoad) break;
  80             DeleteCriticalSection( &ASPI_CritSection );
  81             break;
  82         }
  83 #endif /* defined(linux) */
  84         return TRUE;
  85 }
  86
  87
  88 #ifdef linux
  89
  90 static int
  91 ASPI_OpenDevice(SRB_ExecSCSICmd *prb)
  92 {
  93     int fd;
  94     DWORD       hc;
  95     ASPI_DEVICE_INFO *curr;
  96
  97     /* search list of devices to see if we've opened it already.
  98      * There is not an explicit open/close in ASPI land, so hopefully
  99      * keeping a device open won't be a problem.
 100      */
 101
 102     EnterCriticalSection(&ASPI_CritSection);
 103     for (curr = ASPI_open_devices; curr; curr = curr->next) {
 104         if (curr->hostId == prb->SRB_HaId &&
 105             curr->target == prb->SRB_Target &&
 106             curr->lun == prb->SRB_Lun) {
 107             LeaveCriticalSection(&ASPI_CritSection);
 108             return curr->fd;
 109         }
 110     }
 111     LeaveCriticalSection(&ASPI_CritSection);
 112
 113     if (prb->SRB_HaId >= ASPI_GetNumControllers())
 114         return -1;
 115
 116     hc = ASPI_GetHCforController( prb->SRB_HaId );
 117     fd = SCSI_OpenDevice( HIWORD(hc), LOWORD(hc), prb->SRB_Target, prb->SRB_Lun);
 118
 119     if (fd == -1)
 120         return -1;
 121
 122     /* device is now open */
 123     /* FIXME: Let users specify SCSI timeout in registry */
 124     SCSI_LinuxSetTimeout( fd, SCSI_DEFAULT_TIMEOUT );
 125
 126     curr = HeapAlloc( GetProcessHeap(), 0, sizeof(ASPI_DEVICE_INFO) );
 127     curr->fd = fd;
 128     curr->hostId = prb->SRB_HaId;
 129     curr->target = prb->SRB_Target;
 130     curr->lun = prb->SRB_Lun;
 131
 132     /* insert new record at beginning of open device list */
 133     EnterCriticalSection(&ASPI_CritSection);
 134     curr->next = ASPI_open_devices;
 135     ASPI_open_devices = curr;
 136     LeaveCriticalSection(&ASPI_CritSection);
 137     return fd;
 138 }
 139
 140
 141 static void
 142 ASPI_DebugPrintCmd(SRB_ExecSCSICmd *prb)
 143 {
 144   int   i;
 145   BYTE *cdb;
 146
 147   switch (prb->CDBByte[0]) {
 148   case CMD_INQUIRY:
 149     TRACE("INQUIRY {\n");
 150     TRACE("\tEVPD: %d\n", prb->CDBByte[1] & 1);
 151     TRACE("\tLUN: %d\n", (prb->CDBByte[1] & 0xc) >> 1);
 152     TRACE("\tPAGE CODE: %d\n", prb->CDBByte[2]);
 153     TRACE("\tALLOCATION LENGTH: %d\n", prb->CDBByte[4]);
 154     TRACE("\tCONTROL: %d\n", prb->CDBByte[5]);
 155     TRACE("}\n");
 156     break;
 157   case CMD_SCAN_SCAN:
 158     TRACE("Transfer Length: %d\n", prb->CDBByte[4]);
 159     break;
 160   }
 161
 162   TRACE("Host Adapter: %d\n", prb->SRB_HaId);
 163   TRACE("Flags: %d\n", prb->SRB_Flags);
 164   if (TARGET_TO_HOST(prb)) {
 165     TRACE("\tData transfer: Target to host. Length checked.\n");
 166   }
 167   else if (HOST_TO_TARGET(prb)) {
 168     TRACE("\tData transfer: Host to target. Length checked.\n");
 169   }
 170   else if (NO_DATA_TRANSFERRED(prb)) {
 171     TRACE("\tData transfer: none\n");
 172   }
 173   else {
 174     WARN("\tTransfer by scsi cmd. Length not checked.\n");
 175   }
 176
 177   TRACE("\tResidual byte length reporting %s\n", prb->SRB_Flags & 0x4 ? "enabled" : "disabled");
 178   TRACE("\tLinking %s\n", prb->SRB_Flags & 0x2 ? "enabled" : "disabled");
 179   TRACE("\tPosting %s\n", prb->SRB_Flags & 0x1 ? "enabled" : "disabled");
 180   TRACE("Target: %d\n", prb->SRB_Target);
 181   TRACE("Lun: %d\n", prb->SRB_Lun);
 182   TRACE("BufLen: %d\n", prb->SRB_BufLen);
 183   TRACE("SenseLen: %d\n", prb->SRB_SenseLen);
 184   TRACE("BufPtr: %p\n", prb->SRB_BufPointer);
 185   TRACE("CDB Length: %d\n", prb->SRB_CDBLen);
 186   TRACE("POST Proc: %p\n", prb->SRB_PostProc);
 187   cdb = &prb->CDBByte[0];
 188   if (TRACE_ON(aspi)) {
 189       TRACE("CDB buffer[");
 190       for (i = 0; i < prb->SRB_CDBLen; i++) {
 191           if (i != 0) TRACE(",");
 192           TRACE("%02x", *cdb++);
 193       }
 194       TRACE("]\n");
 195   }
 196 }
 197
 198 static void
 199 ASPI_PrintCDBArea(SRB_ExecSCSICmd *prb)
 200 {
 201     if (TRACE_ON(aspi))
 202     {
 203         int i;
 204         TRACE("CDB[");
 205         for (i = 0; i < prb->SRB_CDBLen; i++) {
 206             if (i) TRACE(",");
 207             TRACE("%02x", prb->CDBByte[i]);
 208         }
 209         TRACE("]\n");
 210     }
 211 }
 212
 213 static void
 214 ASPI_PrintSenseArea(SRB_ExecSCSICmd *prb)
 215 {
 216   int   i;
 217   BYTE  *rqbuf = prb->SenseArea;
 218
 219   if (TRACE_ON(aspi))
 220   {
 221       TRACE("Request Sense reports:\n");
 222       if ((rqbuf[0]&0x7f)!=0x70) {
 223               TRACE("\tInvalid sense header: 0x%02x instead of 0x70\n", rqbuf[0]&0x7f);
 224               return;
 225       }
 226       TRACE("\tCurrent command read filemark: %s\n",(rqbuf[2]&0x80)?"yes":"no");
 227       TRACE("\tEarly warning passed: %s\n",(rqbuf[2]&0x40)?"yes":"no");
 228       TRACE("\tIncorrect blocklength: %s\n",(rqbuf[2]&0x20)?"yes":"no");
 229       TRACE("\tSense Key: %d\n",rqbuf[2]&0xf);
 230       if (rqbuf[0]&0x80)
 231         TRACE("\tResidual Length: %d\n",rqbuf[3]*0x1000000+rqbuf[4]*0x10000+rqbuf[5]*0x100+rqbuf[6]);
 232       TRACE("\tAdditional Sense Length: %d\n",rqbuf[7]);
 233       TRACE("\tAdditional Sense Code: %d\n",rqbuf[12]);
 234       TRACE("\tAdditional Sense Code Qualifier: %d\n",rqbuf[13]);
 235       if (rqbuf[15]&0x80) {
 236         TRACE("\tIllegal Param is in %s\n",(rqbuf[15]&0x40)?"the CDB":"the Data Out Phase");
 237         if (rqbuf[15]&0x8) {
 238           TRACE("Pointer at %d, bit %d\n",rqbuf[16]*256+rqbuf[17],rqbuf[15]&0x7);
 239         }
 240       }
 241       TRACE("SenseArea[");
 242       for (i = 0; i < prb->SRB_SenseLen; i++) {
 243         if (i) TRACE(",");
 244         TRACE("%02x", *rqbuf++);
 245       }
 246       TRACE("]\n");
 247   }
 248 }
 249
 250 static void
 251 ASPI_DebugPrintResult(SRB_ExecSCSICmd *prb)
 252 {
 253
 254   TRACE("SRB_Status: %x\n", prb->SRB_Status);
 255   TRACE("SRB_HaStat: %x\n", prb->SRB_HaStat);
 256   TRACE("SRB_TargStat: %x\n", prb->SRB_TargStat);
 257   switch (prb->CDBByte[0]) {
 258   case CMD_INQUIRY:
 259     TRACE("Vendor: '%s'\n", prb->SRB_BufPointer + INQUIRY_VENDOR);
 260     break;
 261   case CMD_TEST_UNIT_READY:
 262     ASPI_PrintSenseArea(prb);
 263     break;
 264   }
 265 }
 266
 267 /* Posting must be done in such a way that as soon as the SRB_Status is set
 268  * we don't touch the SRB anymore because it could possibly be freed
 269  * if the app is doing ASPI polling
 270  */
 271 static DWORD
 272 WNASPI32_DoPosting( SRB_ExecSCSICmd *lpPRB, DWORD status )
 273 {
 274         void (*SRB_PostProc)(SRB_ExecSCSICmd *) = lpPRB->SRB_PostProc;
 275         BYTE SRB_Flags = lpPRB->SRB_Flags;
 276         if( status == SS_PENDING )
 277         {
 278                 WARN("Tried posting SS_PENDING\n");
 279                 return SS_PENDING;
 280         }
 281         lpPRB->SRB_Status = status;
 282         /* lpPRB is NOT safe, it could be freed in another thread */
 283
 284         if (SRB_PostProc)
 285         {
 286                 if (SRB_Flags & 0x1)
 287                 {
 288                         TRACE("Post Routine (%p) called\n", SRB_PostProc);
 289                         /* Even though lpPRB could have been freed by
 290                          * the program.. that's unlikely if it planned
 291                          * to use it in the PostProc
 292                          */
 293                         (*SRB_PostProc)(lpPRB);
 294                 }
 295                 else if (SRB_Flags & SRB_EVENT_NOTIFY) {
 296                         TRACE("Setting event %p\n", SRB_PostProc);
 297                         SetEvent(SRB_PostProc);
 298                 }
 299         }
 300         return SS_PENDING;
 301 }
 302
 303 static WORD
 304 ASPI_ExecScsiCmd(SRB_ExecSCSICmd *lpPRB)
 305 {
 306   struct sg_header *sg_hd, *sg_reply_hdr;
 307   WORD ret;
 308   DWORD status;
 309   int   in_len, out_len;
 310   int   num_controllers = 0;
 311   int   error_code = 0;
 312   int   fd;
 313   DWORD SRB_Status;
 314
 315   num_controllers = ASPI_GetNumControllers();
 316   if (lpPRB->SRB_HaId >= num_controllers) {
 317       WARN("Failed: Wanted hostadapter with index %d, but we have only %d.\n",
 318           lpPRB->SRB_HaId, num_controllers
 319       );
 320       return WNASPI32_DoPosting( lpPRB, SS_INVALID_HA );
 321   }
 322   fd = ASPI_OpenDevice(lpPRB);
 323   if (fd == -1) {
 324       return WNASPI32_DoPosting( lpPRB, SS_NO_DEVICE );
 325   }
 326
 327   /* FIXME: hackmode */
 328 #define MAKE_TARGET_TO_HOST(lpPRB) \
 329         if (!TARGET_TO_HOST(lpPRB)) { \
 330             WARN("program was not sending target_to_host for cmd %x (flags=%x),correcting.\n",lpPRB->CDBByte[0],lpPRB->SRB_Flags); \
 331             lpPRB->SRB_Flags |= 0x08; \
 332         }
 333 #define MAKE_HOST_TO_TARGET(lpPRB) \
 334         if (!HOST_TO_TARGET(lpPRB)) { \
 335             WARN("program was not sending host_to_target for cmd %x (flags=%x),correcting.\n",lpPRB->CDBByte[0],lpPRB->SRB_Flags); \
 336             lpPRB->SRB_Flags |= 0x10; \
 337         }
 338   switch (lpPRB->CDBByte[0]) {
 339   case 0x12: /* INQUIRY */
 340   case 0x5a: /* MODE_SENSE_10 */
 341   case 0xa4: /* REPORT_KEY (DVD) MMC-2 */
 342   case 0xad: /* READ DVD STRUCTURE MMC-2 */
 343         MAKE_TARGET_TO_HOST(lpPRB)
 344         break;
 345   case 0xa3: /* SEND KEY (DVD) MMC-2 */
 346         MAKE_HOST_TO_TARGET(lpPRB)
 347         break;
 348   default:
 349         if ((((lpPRB->SRB_Flags & 0x18) == 0x00) ||
 350              ((lpPRB->SRB_Flags & 0x18) == 0x18)
 351             ) && lpPRB->SRB_BufLen
 352         ) {
 353             FIXME("command 0x%02x, no data transfer specified, but buflen is %d!!!\n",lpPRB->CDBByte[0],lpPRB->SRB_BufLen);
 354         }
 355         break;
 356   }
 357   ASPI_DebugPrintCmd(lpPRB);
 358
 359   sg_hd = NULL;
 360   sg_reply_hdr = NULL;
 361
 362   lpPRB->SRB_Status = SS_PENDING;
 363
 364   if (!lpPRB->SRB_CDBLen) {
 365       ERR("Failed: lpPRB->SRB_CDBLen = 0.\n");
 366       return WNASPI32_DoPosting( lpPRB, SS_INVALID_SRB );
 367   }
 368
 369   /* build up sg_header + scsi cmd */
 370   if (HOST_TO_TARGET(lpPRB)) {
 371     /* send header, command, and then data */
 372     in_len = SCSI_OFF + lpPRB->SRB_CDBLen + lpPRB->SRB_BufLen;
 373     sg_hd = HeapAlloc(GetProcessHeap(), 0, in_len);
 374     memset(sg_hd, 0, SCSI_OFF);
 375     memcpy(sg_hd + 1, &lpPRB->CDBByte[0], lpPRB->SRB_CDBLen);
 376     if (lpPRB->SRB_BufLen) {
 377       memcpy(((BYTE *) sg_hd) + SCSI_OFF + lpPRB->SRB_CDBLen, lpPRB->SRB_BufPointer, lpPRB->SRB_BufLen);
 378     }
 379   }
 380   else {
 381     /* send header and command - no data */
 382     in_len = SCSI_OFF + lpPRB->SRB_CDBLen;
 383     sg_hd = HeapAlloc(GetProcessHeap(), 0, in_len);
 384     memset(sg_hd, 0, SCSI_OFF);
 385     memcpy(sg_hd + 1, &lpPRB->CDBByte[0], lpPRB->SRB_CDBLen);
 386   }
 387
 388   if (TARGET_TO_HOST(lpPRB)) {
 389     out_len = SCSI_OFF + lpPRB->SRB_BufLen;
 390     sg_reply_hdr = HeapAlloc(GetProcessHeap(), 0, out_len);
 391     memset(sg_reply_hdr, 0, SCSI_OFF);
 392     sg_hd->reply_len = out_len;
 393   }
 394   else {
 395     out_len = SCSI_OFF;
 396     sg_reply_hdr = HeapAlloc(GetProcessHeap(), 0, out_len);
 397     memset(sg_reply_hdr, 0, SCSI_OFF);
 398     sg_hd->reply_len = out_len;
 399   }
 400
 401   SCSI_Fix_CMD_LEN(fd, lpPRB->CDBByte[0], lpPRB->SRB_CDBLen);
 402
 403   if(!SCSI_LinuxDeviceIo( fd,
 404                           sg_hd, in_len,
 405                           sg_reply_hdr, out_len,
 406                           &status) )
 407   {
 408     goto error_exit;
 409   }
 410
 411   if (sg_reply_hdr->result != 0) {
 412     error_code = sg_reply_hdr->result;
 413     WARN("reply header error (%d)\n", sg_reply_hdr->result);
 414     goto error_exit;
 415   }
 416
 417   if (TARGET_TO_HOST(lpPRB) && lpPRB->SRB_BufLen) {
 418     memcpy(lpPRB->SRB_BufPointer, sg_reply_hdr + 1, lpPRB->SRB_BufLen);
 419   }
 420
 421   /* copy in sense buffer to amount that is available in client */
 422   if (lpPRB->SRB_SenseLen) {
 423     int sense_len = lpPRB->SRB_SenseLen;
 424     if (lpPRB->SRB_SenseLen > 16)
 425       sense_len = 16;
 426
 427     /* CDB is fixed in WNASPI32 */
 428     memcpy(lpPRB->SenseArea, &sg_reply_hdr->sense_buffer[0], sense_len);
 429
 430     ASPI_PrintCDBArea(lpPRB);
 431     ASPI_PrintSenseArea(lpPRB);
 432   }
 433
 434   SRB_Status = SS_COMP;
 435   lpPRB->SRB_HaStat = HASTAT_OK;
 436   lpPRB->SRB_TargStat = sg_reply_hdr->target_status << 1;
 437
 438   HeapFree(GetProcessHeap(), 0, sg_reply_hdr);
 439   HeapFree(GetProcessHeap(), 0, sg_hd);
 440
 441   /* FIXME: Should this be != 0 maybe? */
 442   if( lpPRB->SRB_TargStat == 2 ) {
 443     SRB_Status = SS_ERR;
 444     switch (lpPRB->CDBByte[0]) {
 445     case 0xa4: /* REPORT_KEY (DVD) MMC-2 */
 446     case 0xa3: /* SEND KEY (DVD) MMC-2 */
 447           SRB_Status = SS_COMP;
 448           lpPRB->SRB_TargStat = 0;
 449           FIXME("Program wants to do DVD Region switching, but fails (non compliant DVD drive). Ignoring....\n");
 450           break;
 451     }
 452   }
 453
 454   ASPI_DebugPrintResult(lpPRB);
 455   /* now do posting */
 456   ret = WNASPI32_DoPosting( lpPRB, SRB_Status );
 457
 458   switch (lpPRB->CDBByte[0]) {
 459   case CMD_INQUIRY:
 460       if (SRB_Status == SS_COMP)
 461           return SS_COMP; /* some junk expects ss_comp here. */
 462       /*FALLTHROUGH*/
 463   default:
 464       break;
 465   }
 466
 467   /* In real WNASPI32 stuff really is always pending because ASPI does things
 468      in the background, but we are not doing that (yet) */
 469
 470   return ret;
 471
 472 error_exit:
 473   SRB_Status = SS_ERR;
 474   if (error_code == EBUSY) {
 475       WNASPI32_DoPosting( lpPRB, SS_ASPI_IS_BUSY );
 476       TRACE("Device busy\n");
 477   } else
 478       FIXME("Failed\n");
 479
 480   /* I'm not sure exactly error codes work here
 481    * We probably should set lpPRB->SRB_TargStat, SRB_HaStat ?
 482    */
 483   WARN("error_exit\n");
 484   HeapFree(GetProcessHeap(), 0, sg_reply_hdr);
 485   HeapFree(GetProcessHeap(), 0, sg_hd);
 486   WNASPI32_DoPosting( lpPRB, SRB_Status );
 487   return SS_PENDING;
 488 }
 489
 490 #endif /* defined(linux) */
 491
 492
 493 /*******************************************************************
 494  *     GetASPI32SupportInfo             [WNASPI32.1]
 495  *
 496  * Checks if the ASPI subsystem is initialized correctly.
 497  *
 498  * RETURNS
 499  *    HIWORD: 0.
 500  *    HIBYTE of LOWORD: status (SS_COMP or SS_FAILED_INIT)
 501  *    LOBYTE of LOWORD: # of host adapters.
 502  */
 503 DWORD __cdecl GetASPI32SupportInfo(void)
 504 {
 505     DWORD controllers = ASPI_GetNumControllers();
 506
 507     if (!controllers)
 508         return SS_NO_ADAPTERS << 8;
 509     return (SS_COMP << 8) | controllers ;
 510 }
 511
 512 /***********************************************************************
 513  *             SendASPI32Command (WNASPI32.2)
 514  */
 515 DWORD __cdecl SendASPI32Command(LPSRB lpSRB)
 516 {
 517 #ifdef linux
 518   static const char szId[] = "ASPI for WIN32";
 519   static const char szWh[] = "Wine host";
 520   switch (lpSRB->common.SRB_Cmd) {
 521   case SC_HA_INQUIRY:
 522     lpSRB->inquiry.SRB_Status = SS_COMP;       /* completed successfully */
 523     lpSRB->inquiry.HA_Count = ASPI_GetNumControllers();
 524     lpSRB->inquiry.HA_SCSI_ID = 7;             /* not always ID 7 */
 525     memcpy(lpSRB->inquiry.HA_ManagerId, szId, sizeof szId); /* max 15 chars, don't change */
 526     memcpy(lpSRB->inquiry.HA_Identifier, szWh, sizeof szWh); /* FIXME: return host adapter name */
 527     memset(lpSRB->inquiry.HA_Unique, 0, 16); /* default HA_Unique content */
 528     lpSRB->inquiry.HA_Unique[6] = 0x02; /* Maximum Transfer Length (128K, Byte> 4-7) */
 529     lpSRB->inquiry.HA_Unique[3] = 0x08; /* Maximum number of SCSI targets */
 530     FIXME("ASPI: Partially implemented SC_HA_INQUIRY for adapter %d.\n", lpSRB->inquiry.SRB_HaId);
 531     return SS_COMP;
 532
 533   case SC_GET_DEV_TYPE: {
 534     /* FIXME: We should return SS_NO_DEVICE if the device is not configured */
 535     /* FIXME: We should return SS_INVALID_HA if HostAdapter!=0 */
 536     SRB         tmpsrb;
 537     unsigned char inqbuf[200];
 538     DWORD       ret;
 539
 540     memset(&tmpsrb,0,sizeof(tmpsrb));
 541
 542     /* Copy header */
 543     tmpsrb.common = lpSRB->common;
 544
 545     tmpsrb.cmd.SRB_Flags        |= 8; /* target to host */
 546     tmpsrb.cmd.SRB_Cmd          = SC_EXEC_SCSI_CMD;
 547     tmpsrb.cmd.SRB_Target       = lpSRB->devtype.SRB_Target;
 548     tmpsrb.cmd.SRB_Lun          = lpSRB->devtype.SRB_Lun;
 549     tmpsrb.cmd.SRB_BufLen       = sizeof(inqbuf);
 550     tmpsrb.cmd.SRB_BufPointer   = inqbuf;
 551     tmpsrb.cmd.CDBByte[0]       = 0x12; /* INQUIRY  */
 552                                   /* FIXME: handle lun */
 553     tmpsrb.cmd.CDBByte[4]       = sizeof(inqbuf);
 554     tmpsrb.cmd.SRB_CDBLen       = 6;
 555
 556     ret = ASPI_ExecScsiCmd(&tmpsrb.cmd);
 557
 558     lpSRB->devtype.SRB_Status   = tmpsrb.cmd.SRB_Status;
 559     lpSRB->devtype.SRB_DeviceType = inqbuf[0]&0x1f;
 560
 561     TRACE("returning devicetype %d for target %d\n",inqbuf[0]&0x1f,tmpsrb.cmd.SRB_Target);
 562     if (ret!=SS_PENDING) /* Any error is passed down directly */
 563         return ret;
 564     /* FIXME: knows that the command is finished already, pass final Status */
 565     return tmpsrb.cmd.SRB_Status;
 566   }
 567   case SC_EXEC_SCSI_CMD:
 568     return ASPI_ExecScsiCmd(&lpSRB->cmd);
 569   case SC_ABORT_SRB:
 570     FIXME("Not implemented SC_ABORT_SRB\n");
 571     break;
 572   case SC_RESET_DEV:
 573     FIXME("Not implemented SC_RESET_DEV\n");
 574     break;
 575   case SC_GET_DISK_INFO:
 576     /* here we have to find out the int13 / bios association.
 577      * We just say we do not have any.
 578      */
 579     FIXME("SC_GET_DISK_INFO always return 'int13 unassociated disk'.\n");
 580     lpSRB->diskinfo.SRB_DriveFlags = 0; /* disk is not int13 served */
 581     return SS_COMP;
 582   default:
 583     FIXME("Unknown command %d\n", lpSRB->common.SRB_Cmd);
 584   }
 585   return SS_INVALID_SRB;
 586 #else
 587   return SS_INVALID_SRB;
 588 #endif
 589 }
 590
 591
 592 /***********************************************************************
 593  *             GetASPI32DLLVersion   (WNASPI32.4)
 594  */
 595 DWORD __cdecl GetASPI32DLLVersion(void)
 596 {
 597 #ifdef linux
 598         TRACE("Returning version 1\n");
 599         return 1;
 600 #else
 601         FIXME("Please add SCSI support for your operating system, returning 0\n");
 602         return 0;
 603 #endif
 604 }
 605
 606 /***********************************************************************
 607  *             GetASPI32Buffer   (WNASPI32.8)
 608  * Supposed to return a DMA capable large SCSI buffer.
 609  * Our implementation does not use those at all, all buffer stuff is
 610  * done in the kernel SG device layer. So we just heapalloc the buffer.
 611  */
 612 BOOL __cdecl GetASPI32Buffer(PASPI32BUFF pab)
 613 {
 614     pab->AB_BufPointer = HeapAlloc(GetProcessHeap(),
 615                 pab->AB_ZeroFill?HEAP_ZERO_MEMORY:0,
 616                 pab->AB_BufLen
 617     );
 618     if (!pab->AB_BufPointer) return FALSE;
 619     return TRUE;
 620 }
 621
 622 /***********************************************************************
 623  *             FreeASPI32Buffer   (WNASPI32.14)
 624  */
 625 BOOL __cdecl FreeASPI32Buffer(PASPI32BUFF pab)
 626 {
 627     HeapFree(GetProcessHeap(),0,pab->AB_BufPointer);
 628     return TRUE;
 629 }
 630
 631 /***********************************************************************
 632  *             TranslateASPI32Address   (WNASPI32.7)
 633  */
 634 BOOL __cdecl TranslateASPI32Address(LPDWORD pdwPath, LPDWORD pdwDEVNODE)
 635 {
 636     FIXME("(%p, %p), stub !\n", pdwPath, pdwDEVNODE);
 637     return TRUE;
 638 }