104 lines
2.6 KiB
C
104 lines
2.6 KiB
C
|
/*
|
||
|
|
* File...........: linux/drivers/s390/block/dasd_3370_erp.c
|
||
|
|
* Author(s)......: Holger Smolinski <Holger.Smolinski@de.ibm.com>
|
||
|
|
* Bugreports.to..: <Linux390@de.ibm.com>
|
||
|
|
* (C) IBM Corporation, IBM Deutschland Entwicklung GmbH, 2000
|
||
|
|
*
|
||
|
|
*/
|
||
|
|
|
||
|
|
#define PRINTK_HEADER "dasd_erp(3370)"
|
||
|
|
|
||
|
|
#include "dasd_int.h"
|
||
|
|
|
||
|
|
|
||
|
|
/*
|
||
|
|
* DASD_3370_ERP_EXAMINE
|
||
|
|
*
|
||
|
|
* DESCRIPTION
|
||
|
|
* Checks only for fatal/no/recover error.
|
||
|
|
* A detailed examination of the sense data is done later outside
|
||
|
|
* the interrupt handler.
|
||
|
|
*
|
||
|
|
* The logic is based on the 'IBM 3880 Storage Control Reference' manual
|
||
|
|
* 'Chapter 7. 3370 Sense Data'.
|
||
|
|
*
|
||
|
|
* RETURN VALUES
|
||
|
|
* dasd_era_none no error
|
||
|
|
* dasd_era_fatal for all fatal (unrecoverable errors)
|
||
|
|
* dasd_era_recover for all others.
|
||
|
|
*/
|
||
|
|
dasd_era_t
|
||
|
|
dasd_3370_erp_examine(struct dasd_ccw_req * cqr, struct irb * irb)
|
||
|
|
{
|
||
|
|
char *sense = irb->ecw;
|
||
|
|
|
||
|
|
/* check for successful execution first */
|
||
|
|
if (irb->scsw.cstat == 0x00 &&
|
||
|
|
irb->scsw.dstat == (DEV_STAT_CHN_END | DEV_STAT_DEV_END))
|
||
|
|
return dasd_era_none;
|
||
|
|
if (sense[0] & 0x80) { /* CMD reject */
|
||
|
|
return dasd_era_fatal;
|
||
|
|
}
|
||
|
|
if (sense[0] & 0x40) { /* Drive offline */
|
||
|
|
return dasd_era_recover;
|
||
|
|
}
|
||
|
|
if (sense[0] & 0x20) { /* Bus out parity */
|
||
|
|
return dasd_era_recover;
|
||
|
|
}
|
||
|
|
if (sense[0] & 0x10) { /* equipment check */
|
||
|
|
if (sense[1] & 0x80) {
|
||
|
|
return dasd_era_fatal;
|
||
|
|
}
|
||
|
|
return dasd_era_recover;
|
||
|
|
}
|
||
|
|
if (sense[0] & 0x08) { /* data check */
|
||
|
|
if (sense[1] & 0x80) {
|
||
|
|
return dasd_era_fatal;
|
||
|
|
}
|
||
|
|
return dasd_era_recover;
|
||
|
|
}
|
||
|
|
if (sense[0] & 0x04) { /* overrun */
|
||
|
|
if (sense[1] & 0x80) {
|
||
|
|
return dasd_era_fatal;
|
||
|
|
}
|
||
|
|
return dasd_era_recover;
|
||
|
|
}
|
||
|
|
if (sense[1] & 0x40) { /* invalid blocksize */
|
||
|
|
return dasd_era_fatal;
|
||
|
|
}
|
||
|
|
if (sense[1] & 0x04) { /* file protected */
|
||
|
|
return dasd_era_recover;
|
||
|
|
}
|
||
|
|
if (sense[1] & 0x01) { /* operation incomplete */
|
||
|
|
return dasd_era_recover;
|
||
|
|
}
|
||
|
|
if (sense[2] & 0x80) { /* check data erroor */
|
||
|
|
return dasd_era_recover;
|
||
|
|
}
|
||
|
|
if (sense[2] & 0x10) { /* Env. data present */
|
||
|
|
return dasd_era_recover;
|
||
|
|
}
|
||
|
|
/* examine the 24 byte sense data */
|
||
|
|
return dasd_era_recover;
|
||
|
|
|
||
|
|
} /* END dasd_3370_erp_examine */
|
||
|
|
|
||
|
|
/*
|
||
|
|
* Overrides for Emacs so that we follow Linus's tabbing style.
|
||
|
|
* Emacs will notice this stuff at the end of the file and automatically
|
||
|
|
* adjust the settings for this buffer only. This must remain at the end
|
||
|
|
* of the file.
|
||
|
|
* ---------------------------------------------------------------------------
|
||
|
|
* Local variables:
|
||
|
|
* c-indent-level: 4
|
||
|
|
* c-brace-imaginary-offset: 0
|
||
|
|
* c-brace-offset: -4
|
||
|
|
* c-argdecl-indent: 4
|
||
|
|
* c-label-offset: -4
|
||
|
|
* c-continued-statement-offset: 4
|
||
|
|
* c-continued-brace-offset: 0
|
||
|
|
* indent-tabs-mode: 1
|
||
|
|
* tab-width: 8
|
||
|
|
* End:
|
||
|
|
*/
|