/*-*- Mode: C; c-basic-offset: 8 -*-*/
/***
This file is part of libatasmart.
Copyright 2008 Lennart Poettering
libatasmart is free software; you can redistribute it and/or modify
it under the terms of the GNU Lesser General Public License as
published by the Free Software Foundation, either version 2.1 of the
License, or (at your option) any later version.
libatasmart is distributed in the hope that it will be useful, but
WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
Lesser General Public License for more details.
You should have received a copy of the GNU Lesser General Public
License along with libatasmart. If not, If not, see
.
***/
#ifdef HAVE_CONFIG_H
#include
#endif
#include
#include
#include
#include
#include
#include
#include
#include
#include
#include
#include
#include
#include
#include
#include
#include
#include
#include
#include
#include
#include "atasmart.h"
#ifndef STRPOOL
#define _P(x) x
#endif
#define SK_TIMEOUT 2000
typedef enum SkDirection {
SK_DIRECTION_NONE,
SK_DIRECTION_IN,
SK_DIRECTION_OUT,
_SK_DIRECTION_MAX
} SkDirection;
typedef enum SkDiskType {
/* These three will be autotested for: */
SK_DISK_TYPE_ATA_PASSTHROUGH_12, /* ATA passthrough over SCSI transport, 12-byte version */
SK_DISK_TYPE_ATA_PASSTHROUGH_16, /* ATA passthrough over SCSI transport, 16-byte version */
SK_DISK_TYPE_ATA, /* Classic Linux /dev/hda ioctls */
/* These three will not be autotested for */
SK_DISK_TYPE_SUNPLUS, /* SunPlus USB/ATA bridges */
SK_DISK_TYPE_BLOB,
SK_DISK_TYPE_UNKNOWN,
_SK_DISK_TYPE_MAX,
_SK_DISK_TYPE_TEST_MAX = SK_DISK_TYPE_SUNPLUS /* only auto test until here */
} SkDiskType;
#if __BYTE_ORDER == __LITTLE_ENDIAN
#define MAKE_TAG(a,b,c,d) \
(((uint32_t) d << 24) | \
((uint32_t) c << 16) | \
((uint32_t) b << 8) | \
((uint32_t) a))
#else
#define MAKE_TAG(a,b,c,d) \
(((uint32_t) a << 24) | \
((uint32_t) b << 16) | \
((uint32_t) c << 8) | \
((uint32_t) d))
#endif
typedef enum SkBlobTag {
SK_BLOB_TAG_IDENTIFY = MAKE_TAG('I', 'D', 'F', 'Y'),
SK_BLOB_TAG_SMART_STATUS = MAKE_TAG('S', 'M', 'S', 'T'),
SK_BLOB_TAG_SMART_DATA = MAKE_TAG('S', 'M', 'D', 'T'),
SK_BLOB_TAG_SMART_THRESHOLDS = MAKE_TAG('S', 'M', 'T', 'H')
} SkBlobTag;
struct SkDisk {
char *name;
int fd;
SkDiskType type;
uint64_t size;
uint8_t identify[512];
uint8_t smart_data[512];
uint8_t smart_thresholds[512];
SkBool identify_valid:1;
SkBool smart_data_valid:1;
SkBool smart_thresholds_valid:1;
SkBool blob_smart_status:1;
SkBool blob_smart_status_valid:1;
SkIdentifyParsedData identify_parsed_data;
SkSmartParsedData smart_parsed_data;
void *blob;
};
/* ATA commands */
typedef enum SkAtaCommand {
SK_ATA_COMMAND_IDENTIFY_DEVICE = 0xEC,
SK_ATA_COMMAND_IDENTIFY_PACKET_DEVICE = 0xA1,
SK_ATA_COMMAND_SMART = 0xB0,
SK_ATA_COMMAND_CHECK_POWER_MODE = 0xE5
} SkAtaCommand;
/* ATA SMART subcommands (ATA8 7.52.1) */
typedef enum SkSmartCommand {
SK_SMART_COMMAND_READ_DATA = 0xD0,
SK_SMART_COMMAND_READ_THRESHOLDS = 0xD1,
SK_SMART_COMMAND_EXECUTE_OFFLINE_IMMEDIATE = 0xD4,
SK_SMART_COMMAND_ENABLE_OPERATIONS = 0xD8,
SK_SMART_COMMAND_DISABLE_OPERATIONS = 0xD9,
SK_SMART_COMMAND_RETURN_STATUS = 0xDA
} SkSmartCommand;
static const char *disk_type_to_string(SkDiskType type) {
/* %STRINGPOOLSTART% */
static const char* const map[_SK_DISK_TYPE_MAX] = {
[SK_DISK_TYPE_ATA_PASSTHROUGH_16] = "16 Byte SCSI ATA SAT Passthru",
[SK_DISK_TYPE_ATA_PASSTHROUGH_12] = "12 Byte SCSI ATA SAT Passthru",
[SK_DISK_TYPE_ATA] = "Native Linux ATA",
[SK_DISK_TYPE_SUNPLUS] = "Sunplus SCSI ATA Passthru",
[SK_DISK_TYPE_BLOB] = "Blob",
[SK_DISK_TYPE_UNKNOWN] = "Unknown"
};
/* %STRINGPOOLSTOP% */
if (type >= _SK_DISK_TYPE_MAX)
return NULL;
return _P(map[type]);
}
static SkBool disk_smart_is_available(SkDisk *d) {
return d->identify_valid && !!(d->identify[164] & 1);
}
static SkBool disk_smart_is_enabled(SkDisk *d) {
return d->identify_valid && !!(d->identify[170] & 1);
}
static SkBool disk_smart_is_conveyance_test_available(SkDisk *d) {
assert(d->smart_data_valid);
return !!(d->smart_data[367] & 32);
}
static SkBool disk_smart_is_short_and_extended_test_available(SkDisk *d) {
assert(d->smart_data_valid);
return !!(d->smart_data[367] & 16);
}
static SkBool disk_smart_is_start_test_available(SkDisk *d) {
assert(d->smart_data_valid);
return !!(d->smart_data[367] & 1);
}
static SkBool disk_smart_is_abort_test_available(SkDisk *d) {
assert(d->smart_data_valid);
return !!(d->smart_data[367] & 41);
}
static int disk_ata_command(SkDisk *d, SkAtaCommand command, SkDirection direction, void* cmd_data, void* data, size_t *len) {
uint8_t *bytes = cmd_data;
int ret;
assert(d->type == SK_DISK_TYPE_ATA);
switch (direction) {
case SK_DIRECTION_OUT:
/* We could use HDIO_DRIVE_TASKFILE here, but
* that's a deprecated ioctl(), hence we don't
* do it. And we don't need writing anyway. */
errno = ENOTSUP;
return -1;
case SK_DIRECTION_IN: {
uint8_t *ioctl_data;
/* We have HDIO_DRIVE_CMD which can only read, but not write,
* and cannot do LBA. We use it for all read commands. */
ioctl_data = alloca(4 + *len);
memset(ioctl_data, 0, 4 + *len);
ioctl_data[0] = (uint8_t) command; /* COMMAND */
ioctl_data[1] = ioctl_data[0] == WIN_SMART ? bytes[9] : bytes[3]; /* SECTOR/NSECTOR */
ioctl_data[2] = bytes[1]; /* FEATURE */
ioctl_data[3] = bytes[3]; /* NSECTOR */
if ((ret = ioctl(d->fd, HDIO_DRIVE_CMD, ioctl_data)) < 0)
return ret;
memset(bytes, 0, 12);
bytes[11] = ioctl_data[0];
bytes[1] = ioctl_data[1];
bytes[3] = ioctl_data[2];
memcpy(data, ioctl_data+4, *len);
return ret;
}
case SK_DIRECTION_NONE: {
uint8_t ioctl_data[7];
/* We have HDIO_DRIVE_TASK which can neither read nor
* write, but can do LBA. We use it for all commands that
* do neither read nor write */
memset(ioctl_data, 0, sizeof(ioctl_data));
ioctl_data[0] = (uint8_t) command; /* COMMAND */
ioctl_data[1] = bytes[1]; /* FEATURE */
ioctl_data[2] = bytes[3]; /* NSECTOR */
ioctl_data[3] = bytes[9]; /* LBA LOW */
ioctl_data[4] = bytes[8]; /* LBA MID */
ioctl_data[5] = bytes[7]; /* LBA HIGH */
ioctl_data[6] = bytes[10]; /* SELECT */
if ((ret = ioctl(d->fd, HDIO_DRIVE_TASK, ioctl_data)))
return ret;
memset(bytes, 0, 12);
bytes[11] = ioctl_data[0];
bytes[1] = ioctl_data[1];
bytes[3] = ioctl_data[2];
bytes[9] = ioctl_data[3];
bytes[8] = ioctl_data[4];
bytes[7] = ioctl_data[5];
bytes[10] = ioctl_data[6];
return ret;
}
default:
assert(FALSE);
return -1;
}
}
/* Sends a SCSI command block */
static int sg_io(int fd, int direction,
const void *cdb, size_t cdb_len,
void *data, size_t data_len,
void *sense, size_t sense_len) {
struct sg_io_hdr io_hdr;
memset(&io_hdr, 0, sizeof(struct sg_io_hdr));
io_hdr.interface_id = 'S';
io_hdr.cmdp = (unsigned char*) cdb;
io_hdr.cmd_len = cdb_len;
io_hdr.dxferp = data;
io_hdr.dxfer_len = data_len;
io_hdr.sbp = sense;
io_hdr.mx_sb_len = sense_len;
io_hdr.dxfer_direction = direction;
io_hdr.timeout = SK_TIMEOUT;
return ioctl(fd, SG_IO, &io_hdr);
}
static int disk_passthrough_16_command(SkDisk *d, SkAtaCommand command, SkDirection direction, void* cmd_data, void* data, size_t *len) {
uint8_t *bytes = cmd_data;
uint8_t cdb[16];
uint8_t sense[32];
uint8_t *desc = sense+8;
int ret;
static const int direction_map[] = {
[SK_DIRECTION_NONE] = SG_DXFER_NONE,
[SK_DIRECTION_IN] = SG_DXFER_FROM_DEV,
[SK_DIRECTION_OUT] = SG_DXFER_TO_DEV
};
assert(d->type == SK_DISK_TYPE_ATA_PASSTHROUGH_16);
/* ATA Pass-Through 16 byte command, as described in "T10 04-262r8
* ATA Command Pass-Through":
* http://www.t10.org/ftp/t10/document.04/04-262r8.pdf */
memset(cdb, 0, sizeof(cdb));
cdb[0] = 0x85; /* OPERATION CODE: 16 byte pass through */
if (direction == SK_DIRECTION_NONE) {
cdb[1] = 3 << 1; /* PROTOCOL: Non-Data */
cdb[2] = 0x20; /* OFF_LINE=0, CK_COND=1, T_DIR=0, BYT_BLOK=0, T_LENGTH=0 */
} else if (direction == SK_DIRECTION_IN) {
cdb[1] = 4 << 1; /* PROTOCOL: PIO Data-in */
cdb[2] = 0x2e; /* OFF_LINE=0, CK_COND=1, T_DIR=1, BYT_BLOK=1, T_LENGTH=2 */
} else if (direction == SK_DIRECTION_OUT) {
cdb[1] = 5 << 1; /* PROTOCOL: PIO Data-Out */
cdb[2] = 0x26; /* OFF_LINE=0, CK_COND=1, T_DIR=0, BYT_BLOK=1, T_LENGTH=2 */
}
cdb[3] = bytes[0]; /* FEATURES */
cdb[4] = bytes[1];
cdb[5] = bytes[2]; /* SECTORS */
cdb[6] = bytes[3];
cdb[8] = bytes[9]; /* LBA LOW */
cdb[10] = bytes[8]; /* LBA MID */
cdb[12] = bytes[7]; /* LBA HIGH */
cdb[13] = bytes[10] & 0x4F; /* SELECT */
cdb[14] = (uint8_t) command;
memset(sense, 0, sizeof(sense));
if ((ret = sg_io(d->fd, direction_map[direction], cdb, sizeof(cdb), data, (size_t) cdb[6] * 512, sense, sizeof(sense))) < 0)
return ret;
if (sense[0] != 0x72 || desc[0] != 0x9 || desc[1] != 0x0c) {
errno = EIO;
return -1;
}
memset(bytes, 0, 12);
bytes[1] = desc[3];
bytes[2] = desc[4];
bytes[3] = desc[5];
bytes[9] = desc[7];
bytes[8] = desc[9];
bytes[7] = desc[11];
bytes[10] = desc[12];
bytes[11] = desc[13];
return ret;
}
static int disk_passthrough_12_command(SkDisk *d, SkAtaCommand command, SkDirection direction, void* cmd_data, void* data, size_t *len) {
uint8_t *bytes = cmd_data;
uint8_t cdb[12];
uint8_t sense[32];
uint8_t *desc = sense+8;
int ret;
static const int direction_map[] = {
[SK_DIRECTION_NONE] = SG_DXFER_NONE,
[SK_DIRECTION_IN] = SG_DXFER_FROM_DEV,
[SK_DIRECTION_OUT] = SG_DXFER_TO_DEV
};
assert(d->type == SK_DISK_TYPE_ATA_PASSTHROUGH_12);
/* ATA Pass-Through 12 byte command, as described in "T10 04-262r8
* ATA Command Pass-Through":
* http://www.t10.org/ftp/t10/document.04/04-262r8.pdf */
memset(cdb, 0, sizeof(cdb));
cdb[0] = 0xa1; /* OPERATION CODE: 12 byte pass through */
if (direction == SK_DIRECTION_NONE) {
cdb[1] = 3 << 1; /* PROTOCOL: Non-Data */
cdb[2] = 0x20; /* OFF_LINE=0, CK_COND=1, T_DIR=0, BYT_BLOK=0, T_LENGTH=0 */
} else if (direction == SK_DIRECTION_IN) {
cdb[1] = 4 << 1; /* PROTOCOL: PIO Data-in */
cdb[2] = 0x2e; /* OFF_LINE=0, CK_COND=1, T_DIR=1, BYT_BLOK=1, T_LENGTH=2 */
} else if (direction == SK_DIRECTION_OUT) {
cdb[1] = 5 << 1; /* PROTOCOL: PIO Data-Out */
cdb[2] = 0x26; /* OFF_LINE=0, CK_COND=1, T_DIR=0, BYT_BLOK=1, T_LENGTH=2 */
}
cdb[3] = bytes[1]; /* FEATURES */
cdb[4] = bytes[3]; /* SECTORS */
cdb[5] = bytes[9]; /* LBA LOW */
cdb[6] = bytes[8]; /* LBA MID */
cdb[7] = bytes[7]; /* LBA HIGH */
cdb[8] = bytes[10] & 0x4F; /* SELECT */
cdb[9] = (uint8_t) command;
memset(sense, 0, sizeof(sense));
if ((ret = sg_io(d->fd, direction_map[direction], cdb, sizeof(cdb), data, (size_t) cdb[4] * 512, sense, sizeof(sense))) < 0)
return ret;
if (sense[0] != 0x72 || desc[0] != 0x9 || desc[1] != 0x0c) {
errno = EIO;
return -1;
}
memset(bytes, 0, 12);
bytes[1] = desc[3]; /* FEATURES */
bytes[2] = desc[4]; /* STATUS */
bytes[3] = desc[5]; /* SECTORS */
bytes[9] = desc[7]; /* LBA LOW */
bytes[8] = desc[9]; /* LBA MID */
bytes[7] = desc[11]; /* LBA HIGH */
bytes[10] = desc[12]; /* SELECT */
bytes[11] = desc[13]; /* ERROR */
return ret;
}
static int disk_sunplus_command(SkDisk *d, SkAtaCommand command, SkDirection direction, void* cmd_data, void* data, size_t *len) {
uint8_t *bytes = cmd_data;
uint8_t cdb[12];
uint8_t sense[32], buf[8];
int ret;
static const int direction_map[] = {
[SK_DIRECTION_NONE] = SG_DXFER_NONE,
[SK_DIRECTION_IN] = SG_DXFER_FROM_DEV,
[SK_DIRECTION_OUT] = SG_DXFER_TO_DEV
};
assert(d->type == SK_DISK_TYPE_SUNPLUS);
/* SunplusIT specific SCSI ATA pass-thru */
memset(cdb, 0, sizeof(cdb));
cdb[0] = 0xF8; /* OPERATION CODE: Sunplus specific */
cdb[1] = 0x00; /* Subcommand: Pass-thru */
cdb[2] = 0x22;
if (direction == SK_DIRECTION_NONE)
cdb[3] = 0x00; /* protocol */
else if (direction == SK_DIRECTION_IN)
cdb[3] = 0x10; /* protocol */
else if (direction == SK_DIRECTION_OUT)
cdb[3] = 0x11; /* protocol */
cdb[4] = bytes[3]; /* size? */
cdb[5] = bytes[1]; /* FEATURES */
cdb[6] = bytes[3]; /* SECTORS */
cdb[7] = bytes[9]; /* LBA LOW */
cdb[8] = bytes[8]; /* LBA MID */
cdb[9] = bytes[7]; /* LBA HIGH */
cdb[10] = bytes[10] | 0xA0; /* SELECT */
cdb[11] = (uint8_t) command;
memset(sense, 0, sizeof(sense));
/* Issue request */
if ((ret = sg_io(d->fd, direction_map[direction], cdb, sizeof(cdb), data, (size_t) cdb[6] * 512, sense, sizeof(sense))) < 0)
return ret;
memset(cdb, 0, sizeof(cdb));
cdb[0] = 0xF8;
cdb[1] = 0x00;
cdb[2] = 0x21;
memset(buf, 0, sizeof(buf));
/* Ask for response */
if ((ret = sg_io(d->fd, SG_DXFER_FROM_DEV, cdb, sizeof(cdb), buf, sizeof(buf), sense, sizeof(sense))) < 0)
return ret;
memset(bytes, 0, 12);
bytes[2] = buf[1]; /* ERROR */
bytes[3] = buf[2]; /* SECTORS */
bytes[9] = buf[3]; /* LBA LOW */
bytes[8] = buf[4]; /* LBA MID */
bytes[7] = buf[5]; /* LBA HIGH */
bytes[10] = buf[6]; /* SELECT */
bytes[11] = buf[7]; /* STATUS */
return ret;
}
static int disk_command(SkDisk *d, SkAtaCommand command, SkDirection direction, void* cmd_data, void* data, size_t *len) {
static int (* const disk_command_table[_SK_DISK_TYPE_MAX]) (SkDisk *d, SkAtaCommand command, SkDirection direction, void* cmd_data, void* data, size_t *len) = {
[SK_DISK_TYPE_ATA] = disk_ata_command,
[SK_DISK_TYPE_ATA_PASSTHROUGH_12] = disk_passthrough_12_command,
[SK_DISK_TYPE_ATA_PASSTHROUGH_16] = disk_passthrough_16_command,
[SK_DISK_TYPE_SUNPLUS] = disk_sunplus_command,
[SK_DISK_TYPE_BLOB] = NULL,
[SK_DISK_TYPE_UNKNOWN] = NULL
};
assert(d);
assert(d->type <= _SK_DISK_TYPE_MAX);
assert(direction <= _SK_DIRECTION_MAX);
assert(direction == SK_DIRECTION_NONE || (data && len && *len > 0));
assert(direction != SK_DIRECTION_NONE || (!data && !len));
if (!disk_command_table[d->type]) {
errno = -ENOTSUP;
return -1;
}
return disk_command_table[d->type](d, command, direction, cmd_data, data, len);
}
static int disk_identify_device(SkDisk *d) {
uint16_t cmd[6];
int ret;
size_t len = 512;
const uint8_t *p;
if (d->type == SK_DISK_TYPE_BLOB)
return 0;
memset(d->identify, 0, len);
memset(cmd, 0, sizeof(cmd));
cmd[1] = htons(1);
if ((ret = disk_command(d, SK_ATA_COMMAND_IDENTIFY_DEVICE, SK_DIRECTION_IN, cmd, d->identify, &len)) < 0)
return ret;
if (len != 512) {
errno = EIO;
return -1;
}
/* Check if IDENTIFY data is all NULs */
for (p = d->identify; p < (const uint8_t*) d->identify+len; p++)
if (*p) {
p = NULL;
break;
}
if (p) {
errno = EIO;
return -1;
}
d->identify_valid = TRUE;
return 0;
}
int sk_disk_check_sleep_mode(SkDisk *d, SkBool *awake) {
int ret;
uint16_t cmd[6];
uint8_t status;
if (!d->identify_valid) {
errno = ENOTSUP;
return -1;
}
if (d->type == SK_DISK_TYPE_BLOB) {
errno = ENOTSUP;
return -1;
}
memset(cmd, 0, sizeof(cmd));
if ((ret = disk_command(d, SK_ATA_COMMAND_CHECK_POWER_MODE, SK_DIRECTION_NONE, cmd, NULL, 0)) < 0)
return ret;
if (cmd[0] != 0 || (ntohs(cmd[5]) & 1) != 0) {
errno = EIO;
return -1;
}
status = ntohs(cmd[1]) & 0xFF;
*awake = status == 0xFF || status == 0x80; /* idle and active/idle is considered awake */
return 0;
}
static int disk_smart_enable(SkDisk *d, SkBool b) {
uint16_t cmd[6];
if (!disk_smart_is_available(d)) {
errno = ENOTSUP;
return -1;
}
if (d->type == SK_DISK_TYPE_BLOB) {
errno = ENOTSUP;
return -1;
}
memset(cmd, 0, sizeof(cmd));
cmd[0] = htons(b ? SK_SMART_COMMAND_ENABLE_OPERATIONS : SK_SMART_COMMAND_DISABLE_OPERATIONS);
cmd[2] = htons(0x0000U);
cmd[3] = htons(0x00C2U);
cmd[4] = htons(0x4F00U);
return disk_command(d, SK_ATA_COMMAND_SMART, SK_DIRECTION_NONE, cmd, NULL, 0);
}
int sk_disk_smart_read_data(SkDisk *d) {
uint16_t cmd[6];
int ret;
size_t len = 512;
if (!disk_smart_is_available(d)) {
errno = ENOTSUP;
return -1;
}
if (d->type == SK_DISK_TYPE_BLOB)
return 0;
memset(cmd, 0, sizeof(cmd));
cmd[0] = htons(SK_SMART_COMMAND_READ_DATA);
cmd[1] = htons(1);
cmd[2] = htons(0x0000U);
cmd[3] = htons(0x00C2U);
cmd[4] = htons(0x4F00U);
if ((ret = disk_command(d, SK_ATA_COMMAND_SMART, SK_DIRECTION_IN, cmd, d->smart_data, &len)) < 0)
return ret;
d->smart_data_valid = TRUE;
return ret;
}
static int disk_smart_read_thresholds(SkDisk *d) {
uint16_t cmd[6];
int ret;
size_t len = 512;
if (!disk_smart_is_available(d)) {
errno = ENOTSUP;
return -1;
}
if (d->type == SK_DISK_TYPE_BLOB)
return 0;
memset(cmd, 0, sizeof(cmd));
cmd[0] = htons(SK_SMART_COMMAND_READ_THRESHOLDS);
cmd[1] = htons(1);
cmd[2] = htons(0x0000U);
cmd[3] = htons(0x00C2U);
cmd[4] = htons(0x4F00U);
if ((ret = disk_command(d, SK_ATA_COMMAND_SMART, SK_DIRECTION_IN, cmd, d->smart_thresholds, &len)) < 0)
return ret;
d->smart_thresholds_valid = TRUE;
return ret;
}
int sk_disk_smart_status(SkDisk *d, SkBool *good) {
uint16_t cmd[6];
int ret;
if (!disk_smart_is_available(d)) {
errno = ENOTSUP;
return -1;
}
if (d->type == SK_DISK_TYPE_BLOB) {
if (d->blob_smart_status_valid) {
*good = d->blob_smart_status;
return 0;
}
errno = ENXIO;
return -1;
}
memset(cmd, 0, sizeof(cmd));
cmd[0] = htons(SK_SMART_COMMAND_RETURN_STATUS);
cmd[1] = htons(0x0000U);
cmd[3] = htons(0x00C2U);
cmd[4] = htons(0x4F00U);
if ((ret = disk_command(d, SK_ATA_COMMAND_SMART, SK_DIRECTION_NONE, cmd, NULL, 0)) < 0)
return ret;
/* SAT/USB bridges truncate packets, so we only check for 4F,
* not for 2C on those */
if ((d->type == SK_DISK_TYPE_ATA_PASSTHROUGH_12 || cmd[3] == htons(0x00C2U)) &&
cmd[4] == htons(0x4F00U))
*good = TRUE;
else if ((d->type == SK_DISK_TYPE_ATA_PASSTHROUGH_12 || cmd[3] == htons(0x002CU)) &&
cmd[4] == htons(0xF400U))
*good = FALSE;
else {
errno = EIO;
return -1;
}
return ret;
}
int sk_disk_smart_self_test(SkDisk *d, SkSmartSelfTest test) {
uint16_t cmd[6];
int ret;
if (!disk_smart_is_available(d)) {
errno = ENOTSUP;
return -1;
}
if (d->type == SK_DISK_TYPE_BLOB) {
errno = ENOTSUP;
return -1;
}
if (!d->smart_data_valid)
if ((ret = sk_disk_smart_read_data(d)) < 0)
return -1;
assert(d->smart_data_valid);
if (test != SK_SMART_SELF_TEST_SHORT &&
test != SK_SMART_SELF_TEST_EXTENDED &&
test != SK_SMART_SELF_TEST_CONVEYANCE &&
test != SK_SMART_SELF_TEST_ABORT) {
errno = EINVAL;
return -1;
}
if (!disk_smart_is_start_test_available(d)
|| (test == SK_SMART_SELF_TEST_ABORT && !disk_smart_is_abort_test_available(d))
|| ((test == SK_SMART_SELF_TEST_SHORT || test == SK_SMART_SELF_TEST_EXTENDED) && !disk_smart_is_short_and_extended_test_available(d))
|| (test == SK_SMART_SELF_TEST_CONVEYANCE && !disk_smart_is_conveyance_test_available(d))) {
errno = ENOTSUP;
return -1;
}
if (test == SK_SMART_SELF_TEST_ABORT &&
!disk_smart_is_abort_test_available(d)) {
errno = ENOTSUP;
return -1;
}
memset(cmd, 0, sizeof(cmd));
cmd[0] = htons(SK_SMART_COMMAND_EXECUTE_OFFLINE_IMMEDIATE);
cmd[2] = htons(0x0000U);
cmd[3] = htons(0x00C2U);
cmd[4] = htons(0x4F00U | (uint16_t) test);
return disk_command(d, SK_ATA_COMMAND_SMART, SK_DIRECTION_NONE, cmd, NULL, NULL);
}
static void swap_strings(char *s, size_t len) {
assert((len & 1) == 0);
for (; len > 0; s += 2, len -= 2) {
char t;
t = s[0];
s[0] = s[1];
s[1] = t;
}
}
static void clean_strings(char *s) {
char *e;
for (e = s; *e; e++)
if (*e < ' ' || *e >= 127)
*e = ' ';
}
static void drop_spaces(char *s) {
char *d = s;
SkBool prev_space = FALSE;
s += strspn(s, " ");
for (;*s; s++) {
if (prev_space) {
if (*s != ' ') {
prev_space = FALSE;
*(d++) = ' ';
*(d++) = *s;
}
} else {
if (*s == ' ')
prev_space = TRUE;
else
*(d++) = *s;
}
}
*d = 0;
}
static void read_string(char *d, uint8_t *s, size_t len) {
memcpy(d, s, len);
d[len] = 0;
swap_strings(d, len);
clean_strings(d);
drop_spaces(d);
}
int sk_disk_identify_parse(SkDisk *d, const SkIdentifyParsedData **ipd) {
assert(d);
assert(ipd);
if (!d->identify_valid) {
errno = ENOENT;
return -1;
}
read_string(d->identify_parsed_data.serial, d->identify+20, 20);
read_string(d->identify_parsed_data.firmware, d->identify+46, 8);
read_string(d->identify_parsed_data.model, d->identify+54, 40);
*ipd = &d->identify_parsed_data;
return 0;
}
int sk_disk_smart_is_available(SkDisk *d, SkBool *b) {
assert(d);
assert(b);
if (!d->identify_valid) {
errno = ENOTSUP;
return -1;
}
*b = disk_smart_is_available(d);
return 0;
}
int sk_disk_identify_is_available(SkDisk *d, SkBool *b) {
assert(d);
assert(b);
*b = d->identify_valid;
return 0;
}
const char *sk_smart_offline_data_collection_status_to_string(SkSmartOfflineDataCollectionStatus status) {
/* %STRINGPOOLSTART% */
static const char* const map[] = {
[SK_SMART_OFFLINE_DATA_COLLECTION_STATUS_NEVER] = "Off-line data collection activity was never started.",
[SK_SMART_OFFLINE_DATA_COLLECTION_STATUS_SUCCESS] = "Off-line data collection activity was completed without error.",
[SK_SMART_OFFLINE_DATA_COLLECTION_STATUS_INPROGRESS] = "Off-line activity in progress.",
[SK_SMART_OFFLINE_DATA_COLLECTION_STATUS_SUSPENDED] = "Off-line data collection activity was suspended by an interrupting command from host.",
[SK_SMART_OFFLINE_DATA_COLLECTION_STATUS_ABORTED] = "Off-line data collection activity was aborted by an interrupting command from host.",
[SK_SMART_OFFLINE_DATA_COLLECTION_STATUS_FATAL] = "Off-line data collection activity was aborted by the device with a fatal error.",
[SK_SMART_OFFLINE_DATA_COLLECTION_STATUS_UNKNOWN] = "Unknown status"
};
/* %STRINGPOOLSTOP% */
if (status >= _SK_SMART_OFFLINE_DATA_COLLECTION_STATUS_MAX)
return NULL;
return _P(map[status]);
}
const char *sk_smart_self_test_execution_status_to_string(SkSmartSelfTestExecutionStatus status) {
/* %STRINGPOOLSTART% */
static const char* const map[] = {
[SK_SMART_SELF_TEST_EXECUTION_STATUS_SUCCESS_OR_NEVER] = "The previous self-test routine completed without error or no self-test has ever been run.",
[SK_SMART_SELF_TEST_EXECUTION_STATUS_ABORTED] = "The self-test routine was aborted by the host.",
[SK_SMART_SELF_TEST_EXECUTION_STATUS_INTERRUPTED] = "The self-test routine was interrupted by the host with a hardware or software reset.",
[SK_SMART_SELF_TEST_EXECUTION_STATUS_FATAL] = "A fatal error or unknown test error occurred while the device was executing its self-test routine and the device was unable to complete the self-test routine.",
[SK_SMART_SELF_TEST_EXECUTION_STATUS_ERROR_UNKNOWN] = "The previous self-test completed having a test element that failed and the test element that failed.",
[SK_SMART_SELF_TEST_EXECUTION_STATUS_ERROR_ELECTRICAL] = "The previous self-test completed having the electrical element of the test failed.",
[SK_SMART_SELF_TEST_EXECUTION_STATUS_ERROR_SERVO] = "The previous self-test completed having the servo (and/or seek) test element of the test failed.",
[SK_SMART_SELF_TEST_EXECUTION_STATUS_ERROR_READ] = "The previous self-test completed having the read element of the test failed.",
[SK_SMART_SELF_TEST_EXECUTION_STATUS_ERROR_HANDLING] = "The previous self-test completed having a test element that failed and the device is suspected of having handling damage.",
[SK_SMART_SELF_TEST_EXECUTION_STATUS_INPROGRESS] = "Self-test routine in progress"
};
/* %STRINGPOOLSTOP% */
if (status >= _SK_SMART_SELF_TEST_EXECUTION_STATUS_MAX)
return NULL;
return _P(map[status]);
}
const char* sk_smart_self_test_to_string(SkSmartSelfTest test) {
switch (test) {
case SK_SMART_SELF_TEST_SHORT:
return "short";
case SK_SMART_SELF_TEST_EXTENDED:
return "extended";
case SK_SMART_SELF_TEST_CONVEYANCE:
return "conveyance";
case SK_SMART_SELF_TEST_ABORT:
return "abort";
}
return NULL;
}
SkBool sk_smart_self_test_available(const SkSmartParsedData *d, SkSmartSelfTest test) {
assert(d);
if (!d->start_test_available)
return FALSE;
switch (test) {
case SK_SMART_SELF_TEST_SHORT:
case SK_SMART_SELF_TEST_EXTENDED:
return d->short_and_extended_test_available;
case SK_SMART_SELF_TEST_CONVEYANCE:
return d->conveyance_test_available;
case SK_SMART_SELF_TEST_ABORT:
return d->abort_test_available;
default:
return FALSE;
}
}
unsigned sk_smart_self_test_polling_minutes(const SkSmartParsedData *d, SkSmartSelfTest test) {
assert(d);
if (!sk_smart_self_test_available(d, test))
return 0;
switch (test) {
case SK_SMART_SELF_TEST_SHORT:
return d->short_test_polling_minutes;
case SK_SMART_SELF_TEST_EXTENDED:
return d->extended_test_polling_minutes;
case SK_SMART_SELF_TEST_CONVEYANCE:
return d->conveyance_test_polling_minutes;
default:
return 0;
}
}
static void make_pretty(SkSmartAttributeParsedData *a) {
uint64_t fourtyeight;
if (!a->name)
return;
if (a->pretty_unit == SK_SMART_ATTRIBUTE_UNIT_UNKNOWN)
return;
fourtyeight =
((uint64_t) a->raw[0]) |
(((uint64_t) a->raw[1]) << 8) |
(((uint64_t) a->raw[2]) << 16) |
(((uint64_t) a->raw[3]) << 24) |
(((uint64_t) a->raw[4]) << 32) |
(((uint64_t) a->raw[5]) << 40);
if (!strcmp(a->name, "spin-up-time"))
a->pretty_value = fourtyeight & 0xFFFF;
else if (!strcmp(a->name, "airflow-temperature-celsius") ||
!strcmp(a->name, "temperature-celsius") ||
!strcmp(a->name, "temperature-celsius-2"))
a->pretty_value = (fourtyeight & 0xFFFF)*1000 + 273150;
else if (!strcmp(a->name, "temperature-centi-celsius"))
a->pretty_value = (fourtyeight & 0xFFFF)*100 + 273150;
else if (!strcmp(a->name, "power-on-minutes"))
a->pretty_value = (((uint64_t) a->raw[0]) | (uint64_t) a->raw[1]) * 60 * 1000;
else if (!strcmp(a->name, "power-on-seconds"))
a->pretty_value = fourtyeight * 1000;
else if (!strcmp(a->name, "power-on-half-minutes"))
a->pretty_value = fourtyeight * 30 * 1000;
else if (!strcmp(a->name, "power-on-hours") ||
!strcmp(a->name, "loaded-hours") ||
!strcmp(a->name, "head-flying-hours"))
a->pretty_value = fourtyeight * 60 * 60 * 1000;
else
a->pretty_value = fourtyeight;
}
typedef struct SkSmartAttributeInfo {
const char *name;
SkSmartAttributeUnit unit;
} SkSmartAttributeInfo;
/* This data is stolen from smartmontools */
/* %STRINGPOOLSTART% */
static const SkSmartAttributeInfo const attribute_info[256] = {
[1] = { "raw-read-error-rate", SK_SMART_ATTRIBUTE_UNIT_NONE },
[2] = { "throughput-performance", SK_SMART_ATTRIBUTE_UNIT_UNKNOWN },
[3] = { "spin-up-time", SK_SMART_ATTRIBUTE_UNIT_MSECONDS },
[4] = { "start-stop-count", SK_SMART_ATTRIBUTE_UNIT_NONE },
[5] = { "reallocated-sector-count", SK_SMART_ATTRIBUTE_UNIT_SECTORS },
[6] = { "read-channel-margin", SK_SMART_ATTRIBUTE_UNIT_UNKNOWN },
[7] = { "seek-error-rate", SK_SMART_ATTRIBUTE_UNIT_NONE },
[8] = { "seek-time-performance", SK_SMART_ATTRIBUTE_UNIT_UNKNOWN },
[9] = { "power-on-hours", SK_SMART_ATTRIBUTE_UNIT_MSECONDS },
[10] = { "spin-retry-count", SK_SMART_ATTRIBUTE_UNIT_NONE },
[11] = { "calibration-retry-count", SK_SMART_ATTRIBUTE_UNIT_NONE },
[12] = { "power-cycle-count", SK_SMART_ATTRIBUTE_UNIT_NONE },
[13] = { "read-soft-error-rate", SK_SMART_ATTRIBUTE_UNIT_NONE },
[187] = { "reported-uncorrect", SK_SMART_ATTRIBUTE_UNIT_SECTORS },
[189] = { "high-fly-writes", SK_SMART_ATTRIBUTE_UNIT_NONE },
[190] = { "airflow-temperature-celsius", SK_SMART_ATTRIBUTE_UNIT_MKELVIN },
[191] = { "g-sense-error-rate", SK_SMART_ATTRIBUTE_UNIT_NONE },
[192] = { "power-off-retract-count", SK_SMART_ATTRIBUTE_UNIT_NONE },
[193] = { "load-cycle-count", SK_SMART_ATTRIBUTE_UNIT_NONE },
[194] = { "temperature-celsius-2", SK_SMART_ATTRIBUTE_UNIT_MKELVIN },
[195] = { "hardware-ecc-recovered", SK_SMART_ATTRIBUTE_UNIT_NONE },
[196] = { "reallocated-event-count", SK_SMART_ATTRIBUTE_UNIT_SECTORS },
[197] = { "current-pending-sector", SK_SMART_ATTRIBUTE_UNIT_SECTORS },
[198] = { "offline-uncorrectable", SK_SMART_ATTRIBUTE_UNIT_SECTORS },
[199] = { "udma-crc-error-count", SK_SMART_ATTRIBUTE_UNIT_NONE },
[200] = { "multi-zone-error-rate", SK_SMART_ATTRIBUTE_UNIT_NONE },
[201] = { "soft-read-error-rate", SK_SMART_ATTRIBUTE_UNIT_NONE },
[202] = { "ta-increase-count", SK_SMART_ATTRIBUTE_UNIT_NONE },
[203] = { "run-out-cancel", SK_SMART_ATTRIBUTE_UNIT_NONE },
[204] = { "shock-count-write-open", SK_SMART_ATTRIBUTE_UNIT_NONE },
[205] = { "shock-rate-write-open", SK_SMART_ATTRIBUTE_UNIT_NONE },
[206] = { "flying-height", SK_SMART_ATTRIBUTE_UNIT_UNKNOWN },
[207] = { "spin-high-current", SK_SMART_ATTRIBUTE_UNIT_UNKNOWN },
[208] = { "spin-buzz", SK_SMART_ATTRIBUTE_UNIT_UNKNOWN},
[209] = { "offline-seek-performance", SK_SMART_ATTRIBUTE_UNIT_UNKNOWN },
[220] = { "disk-shift", SK_SMART_ATTRIBUTE_UNIT_UNKNOWN },
[221] = { "g-sense-error-rate-2", SK_SMART_ATTRIBUTE_UNIT_NONE },
[222] = { "loaded-hours", SK_SMART_ATTRIBUTE_UNIT_MSECONDS },
[223] = { "load-retry-count", SK_SMART_ATTRIBUTE_UNIT_NONE },
[224] = { "load-friction", SK_SMART_ATTRIBUTE_UNIT_UNKNOWN },
[225] = { "load-cycle-count-2", SK_SMART_ATTRIBUTE_UNIT_NONE },
[226] = { "load-in-time", SK_SMART_ATTRIBUTE_UNIT_MSECONDS },
[227] = { "torq-amp-count", SK_SMART_ATTRIBUTE_UNIT_NONE },
[228] = { "power-off-retract-count-2", SK_SMART_ATTRIBUTE_UNIT_NONE },
[230] = { "head-amplitude", SK_SMART_ATTRIBUTE_UNIT_UNKNOWN },
[231] = { "temperature-celsius", SK_SMART_ATTRIBUTE_UNIT_MKELVIN },
[240] = { "head-flying-hours", SK_SMART_ATTRIBUTE_UNIT_MSECONDS },
[250] = { "read-error-retry-rate", SK_SMART_ATTRIBUTE_UNIT_NONE }
};
/* %STRINGPOOLSTOP% */
typedef enum SkSmartQuirk {
SK_SMART_QUIRK_9_POWERONMINUTES = 1,
SK_SMART_QUIRK_9_POWERONSECONDS = 2,
SK_SMART_QUIRK_9_POWERONHALFMINUTES = 4,
SK_SMART_QUIRK_192_EMERGENCYRETRACTCYCLECT = 8,
SK_SMART_QUIRK_193_LOADUNLOAD = 16,
SK_SMART_QUIRK_194_10XCELSIUS = 32,
SK_SMART_QUIRK_194_UNKNOWN = 64,
SK_SMART_QUIRK_200_WRITEERRORCOUNT = 128,
SK_SMART_QUIRK_201_DETECTEDTACOUNT = 256,
} SkSmartQuirk;
/* %STRINGPOOLSTART% */
static const char *quirk_name[] = {
"9_POWERONMINUTES",
"9_POWERONSECONDS",
"9_POWERONHALFMINUTES",
"192_EMERGENCYRETRACTCYCLECT",
"193_LOADUNLOAD",
"194_10XCELSIUS",
"194_UNKNOWN",
"200_WRITEERRORCOUNT",
"201_DETECTEDTACOUNT",
NULL
};
/* %STRINGPOOLSTOP% */
typedef struct SkSmartQuirkDatabase {
const char *model;
const char *firmware;
SkSmartQuirk quirk;
} SkSmartQuirkDatabase;
static const SkSmartQuirkDatabase quirk_database[] = { {
/*** Fujitsu */
"^FUJITSU MHR2040AT$",
NULL,
SK_SMART_QUIRK_9_POWERONSECONDS|
SK_SMART_QUIRK_192_EMERGENCYRETRACTCYCLECT|
SK_SMART_QUIRK_200_WRITEERRORCOUNT
}, {
"^FUJITSU MHS20[6432]0AT( .)?$",
NULL,
SK_SMART_QUIRK_9_POWERONSECONDS|
SK_SMART_QUIRK_192_EMERGENCYRETRACTCYCLECT|
SK_SMART_QUIRK_200_WRITEERRORCOUNT|
SK_SMART_QUIRK_201_DETECTEDTACOUNT
}, {
"^("
"FUJITSU M1623TAU|"
"FUJITSU MHG2...ATU?.*|"
"FUJITSU MHH2...ATU?.*|"
"FUJITSU MHJ2...ATU?.*|"
"FUJITSU MHK2...ATU?.*|"
"FUJITSU MHL2300AT|"
"FUJITSU MHM2(20|15|10|06)0AT|"
"FUJITSU MHN2...AT|"
"FUJITSU MHR2020AT|"
"FUJITSU MHT2...(AH|AS|AT|BH)U?.*|"
"FUJITSU MHU2...ATU?.*|"
"FUJITSU MHV2...(AH|AS|AT|BH|BS|BT).*|"
"FUJITSU MP[A-G]3...A[HTEV]U?.*"
")$",
NULL,
SK_SMART_QUIRK_9_POWERONSECONDS
}, {
/*** Samsung ***/
"^("
"SAMSUNG SV4012H|"
"SAMSUNG SP(0451|08[0124]2|12[0145]3|16[0145]4)[CN]"
")$",
NULL,
SK_SMART_QUIRK_9_POWERONHALFMINUTES
}, {
"^("
"SAMSUNG SV0412H|"
"SAMSUNG SV1204H"
")$",
NULL,
SK_SMART_QUIRK_9_POWERONHALFMINUTES|
SK_SMART_QUIRK_194_10XCELSIUS
}, {
"^SAMSUNG SP40A2H$",
"^RR100-07$",
SK_SMART_QUIRK_9_POWERONHALFMINUTES
}, {
"^SAMSUNG SP80A4H$",
"^RT100-06$",
SK_SMART_QUIRK_9_POWERONHALFMINUTES
}, {
"^SAMSUNG SP8004H$",
"^QW100-61$",
SK_SMART_QUIRK_9_POWERONHALFMINUTES
}, {
/*** Maxtor */
"^("
"Maxtor 2B0(0[468]|1[05]|20)H1|"
"Maxtor 4G(120J6|160J[68])|"
"Maxtor 4D0(20H1|40H2|60H3|80H4)"
")$",
NULL,
SK_SMART_QUIRK_9_POWERONMINUTES|
SK_SMART_QUIRK_194_UNKNOWN
}, {
"^("
"Maxtor 2F0[234]0[JL]0|"
"Maxtor 8(1280A2|2160A4|2560A4|3840A6|4000A6|5120A8)|"
"Maxtor 8(2160D2|3228D3|3240D3|4320D4|6480D6|8400D8|8455D8)|"
"Maxtor 9(0510D4|0576D4|0648D5|0720D5|0840D6|0845D6|0864D6|1008D7|1080D8|1152D8)|"
"Maxtor 9(1(360|350|202)D8|1190D7|10[12]0D6|0840D5|06[48]0D4|0510D3|1(350|202)E8|1010E6|0840E5|0640E4)|"
"Maxtor 9(0512D2|0680D3|0750D3|0913D4|1024D4|1360D6|1536D6|1792D7|2048D8)|"
"Maxtor 9(2732U8|2390U7|204[09]U6|1707U5|1366U4|1024U3|0845U3|0683U2)|"
"Maxtor 4(R0[68]0[JL]0|R1[26]0L0|A160J0|R120L4)|"
"Maxtor (91728D8|91512D7|91303D6|91080D5|90845D4|90645D3|90648D[34]|90432D2)|"
"Maxtor 9(0431U1|0641U2|0871U2|1301U3|1741U4)|"
"Maxtor (94091U8|93071U6|92561U5|92041U4|91731U4|91531U3|91361U3|91021U2|90841U2|90651U2)|"
"Maxtor (33073U4|32049U3|31536U2|30768U1|33073H4|32305H3|31536H2|30768H1)|"
"Maxtor (93652U8|92739U6|91826U4|91369U3|90913U2|90845U2|90435U1)|"
"Maxtor 9(0684U2|1024U2|1362U3|1536U3|2049U4|2562U5|3073U6|4098U8)|"
"Maxtor (54098[UH]8|53073[UH]6|52732[UH]6|52049[UH]4|51536[UH]3|51369[UH]3|51024[UH]2)|"
"Maxtor 3(1024H1|1535H2|2049H2|3073H3|4098H4)( B)?|"
"Maxtor 5(4610H6|4098H6|3073H4|2049H3|1536H2|1369H2|1023H2)|"
"Maxtor 9(1023U2|1536U2|2049U3|2305U3|3073U4|4610U6|6147U8)|"
"Maxtor 9(1023H2|1536H2|2049H3|2305H3|3073H4|4098H6|4610H6|6147H8)|"
"Maxtor 5T0(60H6|40H4|30H3|20H2|10H1)|"
"Maxtor (98196H8|96147H6)|"
"Maxtor 4W(100H6|080H6|060H4|040H3|030H2)|"
"Maxtor 6(E0[234]|K04)0L0|"
"Maxtor 6(B(30|25|20|16|12|10|08)0[MPRS]|L(080[MLP]|(100|120)[MP]|160[MP]|200[MPRS]|250[RS]|300[RS]))0|"
"Maxtor 6Y((060|080|120|160)L0|(060|080|120|160|200|250)P0|(060|080|120|160|200|250)M0)|"
"Maxtor 7Y250[PM]0|"
"Maxtor [45]A(25|30|32)0[JN]0|"
"Maxtor 7L(25|30)0[SR]0"
")$",
NULL,
SK_SMART_QUIRK_9_POWERONMINUTES
}, {
/*** Hitachi */
"^("
"HITACHI_DK14FA-20B|"
"HITACHI_DK23..-..B?|"
"HITACHI_DK23FA-20J|HTA422020F9AT[JN]0|"
"HE[JN]4230[23]0F9AT00|"
"HTC4260[23]0G5CE00|HTC4260[56]0G8CE00"
")$",
NULL,
SK_SMART_QUIRK_9_POWERONMINUTES|
SK_SMART_QUIRK_193_LOADUNLOAD
}, {
NULL,
NULL,
0
}
};
static int match(const char*regex, const char *s, SkBool *result) {
int k;
regex_t re;
*result = FALSE;
if (regcomp(&re, regex, REG_EXTENDED|REG_NOSUB) != 0) {
errno = EINVAL;
return -1;
}
if ((k = regexec(&re, s, 0, NULL, 0)) != 0) {
if (k != REG_NOMATCH) {
regfree(&re);
errno = EINVAL;
return -1;
}
} else
*result = TRUE;
regfree(&re);
return 0;
}
static int lookup_quirks(const char *model, const char *firmware, SkSmartQuirk *quirk) {
int k;
const SkSmartQuirkDatabase *db;
*quirk = 0;
for (db = quirk_database; db->model || db->firmware; db++) {
if (db->model) {
SkBool matching = FALSE;
if ((k = match(db->model, model, &matching)) < 0)
return k;
if (!matching)
continue;
}
if (db->firmware) {
SkBool matching = FALSE;
if ((k = match(db->firmware, firmware, &matching)) < 0)
return k;
if (!matching)
continue;
}
*quirk = db->quirk;
return 0;
}
return 0;
}
static const SkSmartAttributeInfo *lookup_attribute(SkDisk *d, uint8_t id) {
const SkIdentifyParsedData *ipd;
SkSmartQuirk quirk = 0;
/* These are the complex ones */
if (sk_disk_identify_parse(d, &ipd) < 0)
return NULL;
if (lookup_quirks(ipd->model, ipd->firmware, &quirk) < 0)
return NULL;
if (quirk) {
switch (id) {
case 9:
/* %STRINGPOOLSTART% */
if (quirk & SK_SMART_QUIRK_9_POWERONMINUTES) {
static const SkSmartAttributeInfo a = {
"power-on-minutes", SK_SMART_ATTRIBUTE_UNIT_MSECONDS
};
return &a;
} else if (quirk & SK_SMART_QUIRK_9_POWERONSECONDS) {
static const SkSmartAttributeInfo a = {
"power-on-seconds", SK_SMART_ATTRIBUTE_UNIT_MSECONDS
};
return &a;
} else if (quirk & SK_SMART_QUIRK_9_POWERONHALFMINUTES) {
static const SkSmartAttributeInfo a = {
"power-on-half-minutes", SK_SMART_ATTRIBUTE_UNIT_MSECONDS
};
return &a;
}
/* %STRINGPOOLSTOP% */
break;
case 192:
/* %STRINGPOOLSTART% */
if (quirk & SK_SMART_QUIRK_192_EMERGENCYRETRACTCYCLECT) {
static const SkSmartAttributeInfo a = {
"emergency-retract-cycle-count", SK_SMART_ATTRIBUTE_UNIT_NONE
};
return &a;
}
/* %STRINGPOOLSTOP% */
break;
case 194:
/* %STRINGPOOLSTART% */
if (quirk & SK_SMART_QUIRK_194_10XCELSIUS) {
static const SkSmartAttributeInfo a = {
"temperature-centi-celsius", SK_SMART_ATTRIBUTE_UNIT_MKELVIN
};
return &a;
} else if (quirk & SK_SMART_QUIRK_194_UNKNOWN)
return NULL;
/* %STRINGPOOLSTOP% */
break;
case 200:
/* %STRINGPOOLSTART% */
if (quirk & SK_SMART_QUIRK_200_WRITEERRORCOUNT) {
static const SkSmartAttributeInfo a = {
"write-error-count", SK_SMART_ATTRIBUTE_UNIT_NONE
};
return &a;
}
/* %STRINGPOOLSTOP% */
break;
case 201:
/* %STRINGPOOLSTART% */
if (quirk & SK_SMART_QUIRK_201_DETECTEDTACOUNT) {
static const SkSmartAttributeInfo a = {
"detected-ta-count", SK_SMART_ATTRIBUTE_UNIT_NONE
};
return &a;
}
/* %STRINGPOOLSTOP% */
break;
}
}
/* These are the simple cases */
if (attribute_info[id].name)
return &attribute_info[id];
return NULL;
}
int sk_disk_smart_parse(SkDisk *d, const SkSmartParsedData **spd) {
if (!d->smart_data_valid) {
errno = ENOENT;
return -1;
}
switch (d->smart_data[362]) {
case 0x00:
case 0x80:
d->smart_parsed_data.offline_data_collection_status = SK_SMART_OFFLINE_DATA_COLLECTION_STATUS_NEVER;
break;
case 0x02:
case 0x82:
d->smart_parsed_data.offline_data_collection_status = SK_SMART_OFFLINE_DATA_COLLECTION_STATUS_SUCCESS;
break;
case 0x03:
d->smart_parsed_data.offline_data_collection_status = SK_SMART_OFFLINE_DATA_COLLECTION_STATUS_INPROGRESS;
break;
case 0x04:
case 0x84:
d->smart_parsed_data.offline_data_collection_status = SK_SMART_OFFLINE_DATA_COLLECTION_STATUS_SUSPENDED;
break;
case 0x05:
case 0x85:
d->smart_parsed_data.offline_data_collection_status = SK_SMART_OFFLINE_DATA_COLLECTION_STATUS_ABORTED;
break;
case 0x06:
case 0x86:
d->smart_parsed_data.offline_data_collection_status = SK_SMART_OFFLINE_DATA_COLLECTION_STATUS_FATAL;
break;
default:
d->smart_parsed_data.offline_data_collection_status = SK_SMART_OFFLINE_DATA_COLLECTION_STATUS_UNKNOWN;
break;
}
d->smart_parsed_data.self_test_execution_percent_remaining = 10*(d->smart_data[363] & 0xF);
d->smart_parsed_data.self_test_execution_status = (d->smart_data[363] >> 4) & 0xF;
d->smart_parsed_data.total_offline_data_collection_seconds = (uint16_t) d->smart_data[364] | ((uint16_t) d->smart_data[365] << 8);
d->smart_parsed_data.conveyance_test_available = disk_smart_is_conveyance_test_available(d);
d->smart_parsed_data.short_and_extended_test_available = disk_smart_is_short_and_extended_test_available(d);
d->smart_parsed_data.start_test_available = disk_smart_is_start_test_available(d);
d->smart_parsed_data.abort_test_available = disk_smart_is_abort_test_available(d);
d->smart_parsed_data.short_test_polling_minutes = d->smart_data[372];
d->smart_parsed_data.extended_test_polling_minutes = d->smart_data[373] != 0xFF ? d->smart_data[373] : ((uint16_t) d->smart_data[376] << 8 | (uint16_t) d->smart_data[375]);
d->smart_parsed_data.conveyance_test_polling_minutes = d->smart_data[374];
*spd = &d->smart_parsed_data;
return 0;
}
static void find_threshold(SkDisk *d, SkSmartAttributeParsedData *a) {
uint8_t *p;
unsigned n;
if (!d->smart_thresholds_valid) {
a->threshold_valid = FALSE;
return;
}
for (n = 0, p = d->smart_thresholds+2; n < 30; n++, p+=12)
if (p[0] == a->id)
break;
if (n >= 30) {
a->threshold_valid = FALSE;
a->good_valid = FALSE;
return;
}
a->threshold = p[1];
a->threshold_valid = p[1] != 0xFE;
a->good_valid = FALSE;
a->good = TRUE;
/* Always-Fail and Always-Passing thresholds are not relevant
* for our assessment. */
if (p[1] >= 1 && p[1] <= 0xFD) {
if (a->worst_value_valid) {
a->good = a->good && (a->worst_value > a->threshold);
a->good_valid = TRUE;
}
if (a->current_value_valid) {
a->good = a->good && (a->current_value > a->threshold);
a->good_valid = TRUE;
}
}
}
int sk_disk_smart_parse_attributes(SkDisk *d, SkSmartAttributeParseCallback cb, void* userdata) {
uint8_t *p;
unsigned n;
if (!d->smart_data_valid) {
errno = ENOENT;
return -1;
}
for (n = 0, p = d->smart_data + 2; n < 30; n++, p+=12) {
SkSmartAttributeParsedData a;
const SkSmartAttributeInfo *i;
char *an = NULL;
if (p[0] == 0)
continue;
memset(&a, 0, sizeof(a));
a.id = p[0];
a.current_value = p[3];
a.current_value_valid = p[3] >= 1 && p[3] <= 0xFD;
a.worst_value = p[4];
a.worst_value_valid = p[4] >= 1 && p[4] <= 0xFD;
a.flags = ((uint16_t) p[2] << 8) | p[1];
a.prefailure = !!(p[1] & 1);
a.online = !!(p[1] & 2);
memcpy(a.raw, p+5, 6);
if ((i = lookup_attribute(d, p[0]))) {
a.name = _P(i->name);
a.pretty_unit = i->unit;
} else {
if (asprintf(&an, "attribute-%u", a.id) < 0) {
errno = ENOMEM;
return -1;
}
a.name = an;
a.pretty_unit = SK_SMART_ATTRIBUTE_UNIT_UNKNOWN;
}
make_pretty(&a);
find_threshold(d, &a);
/* Handle a few fields specially */
if ((!strcmp(a.name, "reallocated-sector-count") ||
!strcmp(a.name, "reallocated-event-count") ||
!strcmp(a.name, "current-pending-sector")) &&
a.pretty_unit == SK_SMART_ATTRIBUTE_UNIT_SECTORS &&
a.pretty_value > 0) {
a.good = FALSE;
a.good_valid = TRUE;
}
cb(d, &a, userdata);
free(an);
}
return 0;
}
static const char *yes_no(SkBool b) {
return b ? "yes" : "no";
}
const char* sk_smart_attribute_unit_to_string(SkSmartAttributeUnit unit) {
/* %STRINGPOOLSTART% */
const char * const map[] = {
[SK_SMART_ATTRIBUTE_UNIT_UNKNOWN] = NULL,
[SK_SMART_ATTRIBUTE_UNIT_NONE] = "",
[SK_SMART_ATTRIBUTE_UNIT_MSECONDS] = "ms",
[SK_SMART_ATTRIBUTE_UNIT_SECTORS] = "sectors",
[SK_SMART_ATTRIBUTE_UNIT_MKELVIN] = "mK"
};
/* %STRINGPOOLSTOP% */
if (unit >= _SK_SMART_ATTRIBUTE_UNIT_MAX)
return NULL;
return _P(map[unit]);
}
struct attr_helper {
uint64_t *value;
SkBool found;
};
static void temperature_cb(SkDisk *d, const SkSmartAttributeParsedData *a, struct attr_helper *ah) {
if (a->pretty_unit != SK_SMART_ATTRIBUTE_UNIT_MKELVIN)
return;
if (!strcmp(a->name, "temperature-centi-celsius") ||
!strcmp(a->name, "temperature-celsius") ||
!strcmp(a->name, "temperature-celsius-2") ||
!strcmp(a->name, "airflow-temperature-celsius")) {
if (!ah->found || a->pretty_value > *ah->value)
*ah->value = a->pretty_value;
ah->found = TRUE;
}
}
int sk_disk_smart_get_temperature(SkDisk *d, uint64_t *kelvin) {
struct attr_helper ah;
assert(d);
assert(kelvin);
ah.found = FALSE;
ah.value = kelvin;
if (sk_disk_smart_parse_attributes(d, (SkSmartAttributeParseCallback) temperature_cb, &ah) < 0)
return -1;
if (!ah.found) {
errno = ENOENT;
return -1;
}
return 0;
}
static void power_on_cb(SkDisk *d, const SkSmartAttributeParsedData *a, struct attr_helper *ah) {
if (a->pretty_unit != SK_SMART_ATTRIBUTE_UNIT_MSECONDS)
return;
if (!strcmp(a->name, "power-on-minutes") ||
!strcmp(a->name, "power-on-seconds") ||
!strcmp(a->name, "power-on-half-minutes") ||
!strcmp(a->name, "power-on-hours")) {
if (!ah->found || a->pretty_value > *ah->value)
*ah->value = a->pretty_value;
ah->found = TRUE;
}
}
int sk_disk_smart_get_power_on(SkDisk *d, uint64_t *mseconds) {
struct attr_helper ah;
assert(d);
assert(mseconds);
ah.found = FALSE;
ah.value = mseconds;
if (sk_disk_smart_parse_attributes(d, (SkSmartAttributeParseCallback) power_on_cb, &ah) < 0)
return -1;
if (!ah.found) {
errno = ENOENT;
return -1;
}
return 0;
}
static void power_cycle_cb(SkDisk *d, const SkSmartAttributeParsedData *a, struct attr_helper *ah) {
if (a->pretty_unit != SK_SMART_ATTRIBUTE_UNIT_NONE)
return;
if (!strcmp(a->name, "power-cycle-count")) {
if (!ah->found || a->pretty_value > *ah->value)
*ah->value = a->pretty_value;
ah->found = TRUE;
}
}
int sk_disk_smart_get_power_cycle(SkDisk *d, uint64_t *count) {
struct attr_helper ah;
assert(d);
assert(count);
ah.found = FALSE;
ah.value = count;
if (sk_disk_smart_parse_attributes(d, (SkSmartAttributeParseCallback) power_cycle_cb, &ah) < 0)
return -1;
if (!ah.found) {
errno = ENOENT;
return -1;
}
return 0;
}
static void reallocated_cb(SkDisk *d, const SkSmartAttributeParsedData *a, struct attr_helper *ah) {
if (a->pretty_unit != SK_SMART_ATTRIBUTE_UNIT_SECTORS)
return;
if (!strcmp(a->name, "reallocated-sector-count")) {
if (!ah->found || a->pretty_value > *ah->value)
*ah->value = a->pretty_value;
ah->found = TRUE;
}
}
static void pending_cb(SkDisk *d, const SkSmartAttributeParsedData *a, struct attr_helper *ah) {
if (a->pretty_unit != SK_SMART_ATTRIBUTE_UNIT_SECTORS)
return;
if (!strcmp(a->name, "current-pending-sector")) {
if (!ah->found || a->pretty_value > *ah->value)
*ah->value = a->pretty_value;
ah->found = TRUE;
}
}
int sk_disk_smart_get_bad(SkDisk *d, uint64_t *sectors) {
struct attr_helper ah1, ah2;
uint64_t sectors1, sectors2;
assert(d);
assert(sectors);
ah1.found = FALSE;
ah1.value = §ors1;
if (sk_disk_smart_parse_attributes(d, (SkSmartAttributeParseCallback) reallocated_cb, &ah1) < 0)
return -1;
ah2.found = FALSE;
ah2.value = §ors2;
if (sk_disk_smart_parse_attributes(d, (SkSmartAttributeParseCallback) pending_cb, &ah2) < 0)
return -1;
if (!ah1.found && !ah2.found) {
errno = ENOENT;
return -1;
}
if (ah1.found && ah2.found)
*sectors = sectors1 + sectors2;
else if (ah1.found)
*sectors = sectors1;
else
*sectors = sectors2;
return 0;
}
const char* sk_smart_overall_to_string(SkSmartOverall overall) {
/* %STRINGPOOLSTART% */
const char * const map[] = {
[SK_SMART_OVERALL_GOOD] = "GOOD",
[SK_SMART_OVERALL_BAD_STATUS] = "BAD_STATUS",
[SK_SMART_OVERALL_BAD_ATTRIBUTE] = "BAD_ATTRIBUTE",
[SK_SMART_OVERALL_BAD_SECTOR] = "BAD_SECTOR"
};
/* %STRINGPOOLSTOP% */
if (overall >= _SK_SMART_OVERALL_MAX)
return NULL;
return _P(map[overall]);
}
static void bad_attribute_cb(SkDisk *d, const SkSmartAttributeParsedData *a, SkBool *good) {
if (a->prefailure && a->good_valid && !a->good)
*good = FALSE;
}
int sk_disk_smart_get_overall(SkDisk *d, SkSmartOverall *overall) {
SkBool good;
uint64_t sectors;
assert(d);
assert(overall);
if (sk_disk_smart_status(d, &good) < 0)
return -1;
if (!good) {
*overall = SK_SMART_OVERALL_BAD_STATUS;
return 0;
}
if (sk_disk_smart_get_bad(d, §ors) < 0) {
if (errno != ENOENT)
return -1;
} else if (sectors > 0) {
*overall = SK_SMART_OVERALL_BAD_SECTOR;
return 0;
}
good = TRUE;
if (sk_disk_smart_parse_attributes(d, (SkSmartAttributeParseCallback) bad_attribute_cb, &good) < 0)
return -1;
if (!good) {
*overall = SK_SMART_OVERALL_BAD_ATTRIBUTE;
return 0;
}
*overall = SK_SMART_OVERALL_GOOD;
return 0;
}
static char* print_name(char *s, size_t len, uint8_t id, const char *k) {
if (k)
strncpy(s, k, len);
else
snprintf(s, len, "%u", id);
s[len-1] = 0;
return s;
}
static char *print_value(char *s, size_t len, uint64_t pretty_value, SkSmartAttributeUnit pretty_unit) {
switch (pretty_unit) {
case SK_SMART_ATTRIBUTE_UNIT_MSECONDS:
if (pretty_value >= 1000LLU*60LLU*60LLU*24LLU*365LLU)
snprintf(s, len, "%0.1f years", ((double) pretty_value)/(1000.0*60*60*24*365));
else if (pretty_value >= 1000LLU*60LLU*60LLU*24LLU*30LLU)
snprintf(s, len, "%0.1f months", ((double) pretty_value)/(1000.0*60*60*24*30));
else if (pretty_value >= 1000LLU*60LLU*60LLU*24LLU)
snprintf(s, len, "%0.1f days", ((double) pretty_value)/(1000.0*60*60*24));
else if (pretty_value >= 1000LLU*60LLU*60LLU)
snprintf(s, len, "%0.1f h", ((double) pretty_value)/(1000.0*60*60));
else if (pretty_value >= 1000LLU*60LLU)
snprintf(s, len, "%0.1f min", ((double) pretty_value)/(1000.0*60));
else if (pretty_value >= 1000LLU)
snprintf(s, len, "%0.1f s", ((double) pretty_value)/(1000.0));
else
snprintf(s, len, "%llu ms", (unsigned long long) pretty_value);
break;
case SK_SMART_ATTRIBUTE_UNIT_MKELVIN:
snprintf(s, len, "%0.1f C", ((double) pretty_value - 273150) / 1000);
break;
case SK_SMART_ATTRIBUTE_UNIT_SECTORS:
snprintf(s, len, "%llu sectors", (unsigned long long) pretty_value);
break;
case SK_SMART_ATTRIBUTE_UNIT_NONE:
snprintf(s, len, "%llu", (unsigned long long) pretty_value);
break;
case SK_SMART_ATTRIBUTE_UNIT_UNKNOWN:
snprintf(s, len, "n/a");
break;
case _SK_SMART_ATTRIBUTE_UNIT_MAX:
assert(FALSE);
}
s[len-1] = 0;
return s;
}
#define HIGHLIGHT "\x1B[1m"
#define ENDHIGHLIGHT "\x1B[0m"
static void disk_dump_attributes(SkDisk *d, const SkSmartAttributeParsedData *a, void* userdata) {
char name[32];
char pretty[32];
char tt[32], tw[32], tc[32];
SkBool highlight;
snprintf(tt, sizeof(tt), "%3u", a->threshold);
tt[sizeof(tt)-1] = 0;
snprintf(tw, sizeof(tw), "%3u", a->worst_value);
tw[sizeof(tw)-1] = 0;
snprintf(tc, sizeof(tc), "%3u", a->current_value);
tc[sizeof(tc)-1] = 0;
highlight = a->good_valid && !a->good && isatty(1);
if (highlight)
fprintf(stderr, HIGHLIGHT);
printf("%3u %-27s %-3s %-3s %-3s %-11s 0x%02x%02x%02x%02x%02x%02x %-7s %-7s %-3s\n",
a->id,
print_name(name, sizeof(name), a->id, a->name),
a->current_value_valid ? tc : "n/a",
a->worst_value_valid ? tw : "n/a",
a->threshold_valid ? tt : "n/a",
print_value(pretty, sizeof(pretty), a->pretty_value, a->pretty_unit),
a->raw[0], a->raw[1], a->raw[2], a->raw[3], a->raw[4], a->raw[5],
a->prefailure ? "prefail" : "old-age",
a->online ? "online" : "offline",
a->good_valid ? yes_no(a->good) : "n/a");
if (highlight)
fprintf(stderr, ENDHIGHLIGHT);
}
int sk_disk_dump(SkDisk *d) {
int ret;
SkBool awake = FALSE;
uint64_t size;
assert(d);
printf("Device: %s\n"
"Type: %s\n",
d->name ? d->name : "n/a",
disk_type_to_string(d->type));
ret = sk_disk_get_size(d, &size);
if (ret >= 0)
printf("Size: %lu MiB\n", (unsigned long) (d->size/1024/1024));
else
printf("Size: %s\n", strerror(errno));
if (d->identify_valid) {
const SkIdentifyParsedData *ipd;
SkSmartQuirk quirk = 0;
unsigned i;
if ((ret = sk_disk_identify_parse(d, &ipd)) < 0)
return ret;
printf("Model: [%s]\n"
"Serial: [%s]\n"
"Firmware: [%s]\n"
"SMART Available: %s\n",
ipd->model,
ipd->serial,
ipd->firmware,
yes_no(disk_smart_is_available(d)));
if ((ret = lookup_quirks(ipd->model, ipd->firmware, &quirk)))
return ret;
printf("Quirks:");
for (i = 0; quirk_name[i]; i++)
if (quirk & (1<= 0 ? yes_no(awake) : strerror(errno));
if (disk_smart_is_available(d)) {
SkSmartOverall overall;
const SkSmartParsedData *spd;
SkBool good;
char pretty[32];
uint64_t value, power_on;
ret = sk_disk_smart_status(d, &good);
printf("SMART Disk Health Good: %s\n",
ret >= 0 ? yes_no(good) : strerror(errno));
if ((ret = sk_disk_smart_read_data(d)) < 0)
return ret;
if ((ret = sk_disk_smart_parse(d, &spd)) < 0)
return ret;
printf("Off-line Data Collection Status: [%s]\n"
"Total Time To Complete Off-Line Data Collection: %u s\n"
"Self-Test Execution Status: [%s]\n"
"Percent Self-Test Remaining: %u%%\n"
"Conveyance Self-Test Available: %s\n"
"Short/Extended Self-Test Available: %s\n"
"Start Self-Test Available: %s\n"
"Abort Self-Test Available: %s\n"
"Short Self-Test Polling Time: %u min\n"
"Extended Self-Test Polling Time: %u min\n"
"Conveyance Self-Test Polling Time: %u min\n",
sk_smart_offline_data_collection_status_to_string(spd->offline_data_collection_status),
spd->total_offline_data_collection_seconds,
sk_smart_self_test_execution_status_to_string(spd->self_test_execution_status),
spd->self_test_execution_percent_remaining,
yes_no(spd->conveyance_test_available),
yes_no(spd->short_and_extended_test_available),
yes_no(spd->start_test_available),
yes_no(spd->abort_test_available),
spd->short_test_polling_minutes,
spd->extended_test_polling_minutes,
spd->conveyance_test_polling_minutes);
if (sk_disk_smart_get_bad(d, &value) < 0)
printf("Bad Sectors: %s\n", strerror(errno));
else
printf("%sBad Sectors: %s%s\n",
value > 0 ? HIGHLIGHT : "",
print_value(pretty, sizeof(pretty), value, SK_SMART_ATTRIBUTE_UNIT_SECTORS),
value > 0 ? ENDHIGHLIGHT : "");
if (sk_disk_smart_get_power_on(d, &power_on) < 0) {
printf("Powered On: %s\n", strerror(errno));
power_on = 0;
} else
printf("Powered On: %s\n", print_value(pretty, sizeof(pretty), power_on, SK_SMART_ATTRIBUTE_UNIT_MSECONDS));
if (sk_disk_smart_get_power_cycle(d, &value) < 0)
printf("Power Cycles: %s\n", strerror(errno));
else {
printf("Power Cycles: %llu\n", (unsigned long long) value);
if (value > 0 && power_on > 0)
printf("Average Powered On Per Power Cycle: %s\n", print_value(pretty, sizeof(pretty), power_on/value, SK_SMART_ATTRIBUTE_UNIT_MSECONDS));
}
if (sk_disk_smart_get_temperature(d, &value) < 0)
printf("Temperature: %s\n", strerror(errno));
else
printf("Temperature: %s\n", print_value(pretty, sizeof(pretty), value, SK_SMART_ATTRIBUTE_UNIT_MKELVIN));
if (sk_disk_smart_get_overall(d, &overall) < 0)
printf("Overall Status: %s\n", strerror(errno));
else
printf("%sOverall Status: %s%s\n",
overall != SK_SMART_OVERALL_GOOD ? HIGHLIGHT : "",
sk_smart_overall_to_string(overall),
overall != SK_SMART_OVERALL_GOOD ? ENDHIGHLIGHT : "");
printf("%3s %-27s %5s %5s %5s %-11s %-14s %-7s %-7s %-3s\n",
"ID#",
"Name",
"Value",
"Worst",
"Thres",
"Pretty",
"Raw",
"Type",
"Updates",
"Good");
if ((ret = sk_disk_smart_parse_attributes(d, disk_dump_attributes, NULL)) < 0)
return ret;
} else
printf("ATA SMART not supported.\n");
return 0;
}
int sk_disk_get_size(SkDisk *d, uint64_t *bytes) {
assert(d);
assert(bytes);
if (d->size == (uint64_t) -1) {
errno = ENODATA;
return -1;
}
*bytes = d->size;
return 0;
}
static int disk_find_type(SkDisk *d, dev_t devnum) {
struct udev *udev;
struct udev_device *dev = NULL, *usb;
int r = -1;
assert(d);
if (!(udev = udev_new())) {
errno = ENXIO;
goto finish;
}
if (!(dev = udev_device_new_from_devnum(udev, 'b', devnum))) {
errno = ENODEV;
goto finish;
}
if ((usb = udev_device_get_parent_with_subsystem_devtype(dev, "usb", "usb_device"))) {
const char *product, *vendor;
uint32_t pid, vid;
if (!(product = udev_device_get_sysattr_value(usb, "idProduct")) ||
sscanf(product, "%04x", &pid) != 1) {
errno = ENODEV;
goto finish;
}
if (!(vendor = udev_device_get_sysattr_value(usb, "idVendor")) ||
sscanf(vendor, "%04x", &vid) != 1) {
errno = ENODEV;
goto finish;
}
if ((vid == 0x0c0b && pid == 0xb159) ||
(vid == 0x04fc && pid == 0x0c25))
d->type = SK_DISK_TYPE_SUNPLUS;
else
d->type = SK_DISK_TYPE_ATA_PASSTHROUGH_12;
} else if (udev_device_get_parent_with_subsystem_devtype(dev, "ide", NULL))
d->type = SK_DISK_TYPE_ATA;
else if (udev_device_get_parent_with_subsystem_devtype(dev, "scsi", NULL))
d->type = SK_DISK_TYPE_ATA_PASSTHROUGH_16;
else
d->type = SK_DISK_TYPE_UNKNOWN;
r = 0;
finish:
if (dev)
udev_device_unref(dev);
if (udev)
udev_unref(udev);
return r;
}
int sk_disk_open(const char *name, SkDisk **_d) {
SkDisk *d;
int ret = -1;
struct stat st;
assert(_d);
if (!(d = calloc(1, sizeof(SkDisk)))) {
errno = ENOMEM;
goto fail;
}
if (!name) {
d->fd = -1;
d->type = SK_DISK_TYPE_BLOB;
d->size = (uint64_t) -1;
} else {
if (!(d->name = strdup(name))) {
errno = ENOMEM;
goto fail;
}
if ((d->fd = open(name,
O_RDONLY|O_NOCTTY|O_NONBLOCK
#ifdef O_CLOEXEC
|O_CLOEXEC
#endif
)) < 0) {
ret = d->fd;
goto fail;
}
if ((ret = fstat(d->fd, &st)) < 0)
goto fail;
if (!S_ISBLK(st.st_mode)) {
errno = ENODEV;
ret = -1;
goto fail;
}
/* So, it's a block device. Let's make sure the ioctls work */
if ((ret = ioctl(d->fd, BLKGETSIZE64, &d->size)) < 0)
goto fail;
if (d->size <= 0 || d->size == (uint64_t) -1) {
errno = EIO;
ret = -1;
goto fail;
}
/* OK, it's a real block device with a size. Now let's find the suitable API */
if ((ret = disk_find_type(d, st.st_rdev)) < 0)
goto fail;
if (d->type == SK_DISK_TYPE_UNKNOWN) {
/* We have no clue, so let's autotest for a working API */
for (d->type = 0; d->type < _SK_DISK_TYPE_TEST_MAX; d->type++)
if (disk_identify_device(d) >= 0)
break;
if (d->type >= _SK_DISK_TYPE_TEST_MAX)
d->type = SK_DISK_TYPE_UNKNOWN;
} else
disk_identify_device(d);
/* Check if driver can do SMART, and enable if necessary */
if (disk_smart_is_available(d)) {
if (!disk_smart_is_enabled(d)) {
if ((ret = disk_smart_enable(d, TRUE)) < 0)
goto fail;
if ((ret = disk_identify_device(d)) < 0)
goto fail;
if (!disk_smart_is_enabled(d)) {
errno = EIO;
ret = -1;
goto fail;
}
}
disk_smart_read_thresholds(d);
}
}
*_d = d;
return 0;
fail:
if (d)
sk_disk_free(d);
return ret;
}
void sk_disk_free(SkDisk *d) {
assert(d);
if (d->fd >= 0)
close(d->fd);
free(d->name);
free(d->blob);
free(d);
}
int sk_disk_get_blob(SkDisk *d, const void **blob, size_t *rsize) {
size_t size;
SkBool good, have_good = FALSE;
uint32_t *p;
assert(d);
assert(blob);
assert(rsize);
size =
(d->identify_valid ? 8 + sizeof(d->identify) : 0) +
(d->smart_data_valid ? 8 + sizeof(d->smart_data) : 0) +
(d->smart_thresholds ? 8 + sizeof(d->smart_thresholds) : 0);
if (sk_disk_smart_status(d, &good) >= 0) {
size += 12;
have_good = TRUE;
}
if (size <= 0) {
errno = ENODATA;
return -1;
}
free(d->blob);
if (!(d->blob = malloc(size))) {
errno = ENOMEM;
return -1;
}
p = d->blob;
/* These memory accesses are only OK as long as all our
* objects are sensibly aligned, which they are... */
if (d->identify_valid) {
p[0] = SK_BLOB_TAG_IDENTIFY;
p[1] = htonl(sizeof(d->identify));
p += 2;
memcpy(p, d->identify, sizeof(d->identify));
p = (uint32_t*) ((uint8_t*) p + sizeof(d->identify));
}
if (have_good) {
p[0] = SK_BLOB_TAG_SMART_STATUS;
p[1] = htonl(4);
p[2] = htonl(!!good);
p += 3;
}
if (d->smart_data_valid) {
p[0] = SK_BLOB_TAG_SMART_DATA;
p[1] = htonl(sizeof(d->smart_data));
p += 2;
memcpy(p, d->smart_data, sizeof(d->smart_data));
p = (uint32_t*) ((uint8_t*) p + sizeof(d->smart_data));
}
if (d->smart_thresholds_valid) {
p[0] = SK_BLOB_TAG_SMART_THRESHOLDS;
p[1] = htonl(sizeof(d->smart_thresholds));
p += 2;
memcpy(p, d->smart_thresholds, sizeof(d->smart_thresholds));
p = (uint32_t*) ((uint8_t*) p + sizeof(d->smart_thresholds));
}
assert((size_t) ((uint8_t*) p - (uint8_t*) d->blob) == size);
*blob = d->blob;
*rsize = size;
return 0;
}
int sk_disk_set_blob(SkDisk *d, const void *blob, size_t size) {
const uint32_t *p;
size_t left;
SkBool idv = FALSE, sdv = FALSE, stv = FALSE, bssv = FALSE;
assert(d);
assert(blob);
if (d->type != SK_DISK_TYPE_BLOB) {
errno = ENODEV;
return -1;
}
if (size <= 0) {
errno = EINVAL;
return -1;
}
/* First run, verify if everything makes sense */
p = blob;
left = size;
while (left > 0) {
uint32_t tag, tsize;
if (left < 8) {
errno = EINVAL;
return -1;
}
memcpy(&tag, p, 4);
memcpy(&tsize, p+1, 4);
p += 2;
left -= 8;
if (left < ntohl(tsize)) {
errno = EINVAL;
return -1;
}
switch (tag) {
case SK_BLOB_TAG_IDENTIFY:
if (ntohl(tsize) != sizeof(d->identify) || idv) {
errno = EINVAL;
return -1;
}
idv = TRUE;
break;
case SK_BLOB_TAG_SMART_STATUS:
if (ntohl(tsize) != 4 || bssv) {
errno = EINVAL;
return -1;
}
bssv = TRUE;
break;
case SK_BLOB_TAG_SMART_DATA:
if (ntohl(tsize) != sizeof(d->smart_data) || sdv) {
errno = EINVAL;
return -1;
}
sdv = TRUE;
break;
case SK_BLOB_TAG_SMART_THRESHOLDS:
if (ntohl(tsize) != sizeof(d->smart_thresholds) || stv) {
errno = EINVAL;
return -1;
}
stv = TRUE;
break;
}
p = (uint32_t*) ((uint8_t*) p + ntohl(tsize));
left -= ntohl(tsize);
}
if (!idv) {
errno = -ENODATA;
return -1;
}
d->identify_valid = idv;
d->smart_data_valid = sdv;
d->smart_thresholds_valid = stv;
d->blob_smart_status_valid = bssv;
/* Second run, actually copy things in */
p = blob;
left = size;
while (left > 0) {
uint32_t tag, tsize;
assert(left >= 8);
memcpy(&tag, p, 4);
memcpy(&tsize, p+1, 4);
p += 2;
left -= 8;
assert(left >= ntohl(tsize));
switch (tag) {
case SK_BLOB_TAG_IDENTIFY:
assert(ntohl(tsize) == sizeof(d->identify));
memcpy(d->identify, p, sizeof(d->identify));
break;
case SK_BLOB_TAG_SMART_STATUS: {
uint32_t ok;
assert(ntohl(tsize) == 4);
memcpy(&ok, p, 4);
d->blob_smart_status = !!ok;
break;
}
case SK_BLOB_TAG_SMART_DATA:
assert(ntohl(tsize) == sizeof(d->smart_data));
memcpy(d->smart_data, p, sizeof(d->smart_data));
break;
case SK_BLOB_TAG_SMART_THRESHOLDS:
assert(ntohl(tsize) == sizeof(d->smart_thresholds));
memcpy(d->smart_thresholds, p, sizeof(d->smart_thresholds));
break;
}
p = (uint32_t*) ((uint8_t*) p + ntohl(tsize));
left -= ntohl(tsize);
}
return 0;
}