NT4/private/ntos/dd/qic117/0x11049.c
2020-09-30 17:12:29 +02:00

92 lines
2.4 KiB
C
Raw Blame History

This file contains invisible Unicode characters

This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

/*****************************************************************************
*
* COPYRIGHT 1993 - COLORADO MEMORY SYSTEMS, INC.
* ALL RIGHTS RESERVED.
*
******************************************************************************
*
* FILE: \SE\DRIVER\DEVICE\JUMBO\SRC\0X11049.C
*
* FUNCTION: cqd_WaitActive
*
* PURPOSE: Wait up to 5ms for tape drive's TRK0 line to go active.
* 5 ms the specified delay for this parameter.
*
* HISTORY:
* $Log: J:\se.vcs\driver\q117cd\src\0x11049.c $
*
* Rev 1.5 18 Jan 1994 16:20:50 KEVINKES
* Updated debug code.
*
* Rev 1.4 11 Jan 1994 14:33:38 KEVINKES
* Changed the Wait active interval to a generic define that can
* be adjusted depending on the OS type.
*
* Rev 1.3 23 Nov 1993 18:50:12 KEVINKES
* Modified CHECKED_DUMP calls for debugging over the serial port.
*
* Rev 1.2 08 Nov 1993 14:06:30 KEVINKES
* Removed all bit-field structures, removed all enumerated types, changed
* all defines to uppercase, and removed all signed data types wherever
* possible.
*
* Rev 1.1 25 Oct 1993 16:20:30 KEVINKES
* Changed kdi_wt2ticks to kdi_wt004ms.
*
* Rev 1.0 18 Oct 1993 17:33:06 KEVINKES
* Initial Revision.
*
*****************************************************************************/
#define FCT_ID 0x11049
#include "include\public\adi_api.h"
#include "include\public\frb_api.h"
#include "include\private\kdi_pub.h"
#include "include\private\cqd_pub.h"
#include "q117cd\include\cqd_defs.h"
#include "q117cd\include\cqd_strc.h"
#include "q117cd\include\cqd_hdr.h"
/*endinclude*/
dStatus cqd_WaitActive
(
/* INPUT PARAMETERS: */
CqdContextPtr cqd_context
/* UPDATE PARAMETERS: */
/* OUTPUT PARAMETERS: */
)
/* COMMENTS: *****************************************************************
*
* DEFINITIONS: *************************************************************/
{
/* DATA: ********************************************************************/
dStatus status; /* Status or error condition.*/
dUByte stat3;
/* CODE: ********************************************************************/
kdi_Sleep(cqd_context->kdi_context, INTERVAL_WAIT_ACTIVE , dFALSE);
if ((status = cqd_GetStatus(cqd_context, &stat3)) != DONT_PANIC) {
return status;
}
if (!(stat3 & ST3_T0)) {
kdi_CheckedDump(
QIC117WARN,
"Wait active drive fault...\n", 0l);
status = kdi_Error(ERR_DRIVE_FAULT, FCT_ID, ERR_SEQ_1);
}
return status;
}