os_netbsd.c

   1 /*
   2  * os_netbsd.c
   3  *
   4  * Home page of code is: http://smartmontools.sourceforge.net
   5  *
   6  * Copyright (C) 2003-6 Sergey Svishchev <smartmontools-support@lists.sourceforge.net>
   7  *
   8  * This program is free software; you can redistribute it and/or modify
   9  * it under the terms of the GNU General Public License as published by
  10  * the Free Software Foundation; either version 2, or (at your option)
  11  * any later version.
  12  *
  13  * You should have received a copy of the GNU General Public License
  14  * (for example COPYING); if not, write to the Free
  15  * Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  16  *
  17  */
  18
  19 #include "config.h"
  20 #include "int64.h"
  21 #include "atacmds.h"
  22 #include "scsicmds.h"
  23 #include "utility.h"
  24 #include "os_netbsd.h"
  25 #include <unistd.h>
  26
  27 const char *os_XXXX_c_cvsid = "$Id: os_netbsd.c,v 1.15 2006/04/12 14:54:28 ballen4705 Exp $" \
  28 ATACMDS_H_CVSID CONFIG_H_CVSID INT64_H_CVSID OS_NETBSD_H_CVSID SCSICMDS_H_CVSID UTILITY_H_CVSID;
  29
  30 /* global variable holding byte count of allocated memory */
  31 extern long long bytes;
  32
  33 enum warnings {
  34   BAD_SMART, NO_3WARE, MAX_MSG
  35 };
  36
  37 /* Utility function for printing warnings */
  38 void
  39 printwarning(int msgNo, const char *extra)
  40 {
  41   static int printed[] = {0, 0};
  42   static const char *message[] = {
  43     "Error: SMART Status command failed.\nPlease get assistance from \n" PACKAGE_HOMEPAGE "\nRegister values returned from SMART Status command are:\n",
  44     PACKAGE_STRING " does not currentlly support twe(4) devices (3ware Escalade)\n",
  45   };
  46
  47   if (msgNo >= 0 && msgNo <= MAX_MSG) {
  48     if (!printed[msgNo]) {
  49       printed[msgNo] = 1;
  50       pout("%s", message[msgNo]);
  51       if (extra)
  52         pout("%s", extra);
  53     }
  54   }
  55   return;
  56 }
  57
  58 static const char *net_dev_prefix = "/dev/";
  59 static const char *net_dev_ata_disk = "wd";
  60 static const char *net_dev_scsi_disk = "sd";
  61 static const char *net_dev_scsi_tape = "enrst";
  62
  63 /* Guess device type(ata or scsi) based on device name */
  64 int
  65 guess_device_type(const char *dev_name)
  66 {
  67   int len;
  68   int dev_prefix_len = strlen(net_dev_prefix);
  69
  70   if (!dev_name || !(len = strlen(dev_name)))
  71     return CONTROLLER_UNKNOWN;
  72
  73   if (!strncmp(net_dev_prefix, dev_name, dev_prefix_len)) {
  74     if (len <= dev_prefix_len)
  75       return CONTROLLER_UNKNOWN;
  76     else
  77       dev_name += dev_prefix_len;
  78   }
  79   if (!strncmp(net_dev_ata_disk, dev_name, strlen(net_dev_ata_disk)))
  80     return CONTROLLER_ATA;
  81
  82   if (!strncmp(net_dev_scsi_disk, dev_name, strlen(net_dev_scsi_disk)))
  83     return CONTROLLER_SCSI;
  84
  85   if (!strncmp(net_dev_scsi_tape, dev_name, strlen(net_dev_scsi_tape)))
  86     return CONTROLLER_SCSI;
  87
  88   return CONTROLLER_UNKNOWN;
  89 }
  90
  91 int
  92 get_dev_names(char ***names, const char *prefix)
  93 {
  94   char *disknames, *p, **mp;
  95   int n = 0;
  96   int sysctl_mib[2];
  97   size_t sysctl_len;
  98
  99   *names = NULL;
 100
 101   sysctl_mib[0] = CTL_HW;
 102   sysctl_mib[1] = HW_DISKNAMES;
 103   if (-1 == sysctl(sysctl_mib, 2, NULL, &sysctl_len, NULL, 0)) {
 104     pout("Failed to get value of sysctl `hw.disknames'\n");
 105     return -1;
 106   }
 107   if (!(disknames = malloc(sysctl_len))) {
 108     pout("Out of memory constructing scan device list\n");
 109     return -1;
 110   }
 111   if (-1 == sysctl(sysctl_mib, 2, disknames, &sysctl_len, NULL, 0)) {
 112     pout("Failed to get value of sysctl `hw.disknames'\n");
 113     return -1;
 114   }
 115   if (!(mp = (char **) calloc(strlen(disknames) / 2, sizeof(char *)))) {
 116     pout("Out of memory constructing scan device list\n");
 117     return -1;
 118   }
 119   for (p = strtok(disknames, " "); p; p = strtok(NULL, " ")) {
 120     if (strncmp(p, prefix, strlen(prefix))) {
 121       continue;
 122     }
 123     mp[n] = malloc(strlen(net_dev_prefix) + strlen(p) + 2);
 124     if (!mp[n]) {
 125       pout("Out of memory constructing scan device list\n");
 126       return -1;
 127     }
 128     sprintf(mp[n], "%s%s%c", net_dev_prefix, p, 'a' + getrawpartition());
 129     bytes += strlen(mp[n]) + 1;
 130     n++;
 131   }
 132
 133   mp = realloc(mp, n * (sizeof(char *)));
 134   bytes += (n) * (sizeof(char *));
 135   *names = mp;
 136   return n;
 137 }
 138
 139 int
 140 make_device_names(char ***devlist, const char *name)
 141 {
 142   if (!strcmp(name, "SCSI"))
 143     return get_dev_names(devlist, net_dev_scsi_disk);
 144   else if (!strcmp(name, "ATA"))
 145     return get_dev_names(devlist, net_dev_ata_disk);
 146   else
 147     return 0;
 148 }
 149
 150 int
 151 deviceopen(const char *pathname, char *type)
 152 {
 153   if (!strcmp(type, "SCSI")) {
 154     int fd = open(pathname, O_RDWR | O_NONBLOCK);
 155     if (fd < 0 && errno == EROFS)
 156       fd = open(pathname, O_RDONLY | O_NONBLOCK);
 157     return fd;
 158   } else if (!strcmp(type, "ATA"))
 159     return open(pathname, O_RDWR | O_NONBLOCK);
 160   else
 161     return -1;
 162 }
 163
 164 int
 165 deviceclose(int fd)
 166 {
 167   return close(fd);
 168 }
 169
 170 int
 171 marvell_command_interface(int fd, smart_command_set command, int select, char *data)
 172 { return -1; }
 173
 174 int
 175 ata_command_interface(int fd, smart_command_set command, int select, char *data)
 176 {
 177   struct atareq req;
 178   unsigned char inbuf[DEV_BSIZE];
 179   int retval, copydata = 0;
 180
 181   memset(&req, 0, sizeof(req));
 182   memset(&inbuf, 0, sizeof(inbuf));
 183
 184   switch (command) {
 185   case READ_VALUES:
 186     req.flags = ATACMD_READ;
 187     req.features = WDSM_RD_DATA;
 188     req.command = WDCC_SMART;
 189     req.databuf = inbuf;
 190     req.datalen = sizeof(inbuf);
 191     req.cylinder = WDSMART_CYL;
 192     req.timeout = 1000;
 193     copydata = 1;
 194     break;
 195   case READ_THRESHOLDS:
 196     req.flags = ATACMD_READ;
 197     req.features = WDSM_RD_THRESHOLDS;
 198     req.command = WDCC_SMART;
 199     req.databuf = inbuf;
 200     req.datalen = sizeof(inbuf);
 201     req.cylinder = WDSMART_CYL;
 202     req.timeout = 1000;
 203     copydata = 1;
 204     break;
 205   case READ_LOG:
 206     req.flags = ATACMD_READ;
 207     req.features = ATA_SMART_READ_LOG_SECTOR;   /* XXX missing from wdcreg.h */
 208     req.command = WDCC_SMART;
 209     req.databuf = inbuf;
 210     req.datalen = sizeof(inbuf);
 211     req.cylinder = WDSMART_CYL;
 212     req.sec_num = select;
 213     req.sec_count = 1;
 214     req.timeout = 1000;
 215     copydata = 1;
 216     break;
 217   case WRITE_LOG:
 218     memcpy(inbuf, data, 512);
 219     req.flags = ATACMD_WRITE;
 220     req.features = ATA_SMART_WRITE_LOG_SECTOR;  /* XXX missing from wdcreg.h */
 221     req.command = WDCC_SMART;
 222     req.databuf = inbuf;
 223     req.datalen = sizeof(inbuf);
 224     req.cylinder = WDSMART_CYL;
 225     req.sec_num = select;
 226     req.sec_count = 1;
 227     req.timeout = 1000;
 228     break;
 229   case IDENTIFY:
 230     req.flags = ATACMD_READ;
 231     req.command = WDCC_IDENTIFY;
 232     req.databuf = (caddr_t) inbuf;
 233     req.datalen = sizeof(inbuf);
 234     req.timeout = 1000;
 235     copydata = 1;
 236     break;
 237   case PIDENTIFY:
 238     req.flags = ATACMD_READ;
 239     req.command = ATAPI_IDENTIFY_DEVICE;
 240     req.databuf = (caddr_t) inbuf;
 241     req.datalen = sizeof(inbuf);
 242     req.timeout = 1000;
 243     copydata = 1;
 244     break;
 245   case ENABLE:
 246     req.flags = ATACMD_READ;
 247     req.features = WDSM_ENABLE_OPS;
 248     req.command = WDCC_SMART;
 249     req.cylinder = WDSMART_CYL;
 250     req.timeout = 1000;
 251     break;
 252   case DISABLE:
 253     req.flags = ATACMD_READ;
 254     req.features = WDSM_DISABLE_OPS;
 255     req.command = WDCC_SMART;
 256     req.cylinder = WDSMART_CYL;
 257     req.timeout = 1000;
 258     break;
 259   case AUTO_OFFLINE:
 260     /* NOTE: According to ATAPI 4 and UP, this command is obsolete */
 261     req.flags = ATACMD_READ;
 262     req.features = ATA_SMART_AUTO_OFFLINE;      /* XXX missing from wdcreg.h */
 263     req.command = WDCC_SMART;
 264     req.databuf = inbuf;
 265     req.datalen = sizeof(inbuf);
 266     req.cylinder = WDSMART_CYL;
 267     req.sec_num = select;
 268     req.sec_count = 1;
 269     req.timeout = 1000;
 270     break;
 271   case AUTOSAVE:
 272     req.flags = ATACMD_READ;
 273     req.features = ATA_SMART_AUTOSAVE;  /* XXX missing from wdcreg.h */
 274     req.command = WDCC_SMART;
 275     req.cylinder = WDSMART_CYL;
 276     req.sec_count = 0xf1;
 277     /* to enable autosave */
 278     req.timeout = 1000;
 279     break;
 280   case IMMEDIATE_OFFLINE:
 281     /* NOTE: According to ATAPI 4 and UP, this command is obsolete */
 282     req.flags = ATACMD_READ;
 283     req.features = ATA_SMART_IMMEDIATE_OFFLINE; /* XXX missing from wdcreg.h */
 284     req.command = WDCC_SMART;
 285     req.databuf = inbuf;
 286     req.datalen = sizeof(inbuf);
 287     req.cylinder = WDSMART_CYL;
 288     req.sec_num = select;
 289     req.sec_count = 1;
 290     req.timeout = 1000;
 291     break;
 292   case STATUS_CHECK:
 293     /* same command, no HDIO in NetBSD */
 294   case STATUS:
 295     req.flags = ATACMD_READ;
 296     req.features = WDSM_STATUS;
 297     req.command = WDCC_SMART;
 298     req.cylinder = WDSMART_CYL;
 299     req.timeout = 1000;
 300     break;
 301   case CHECK_POWER_MODE:
 302     req.flags = ATACMD_READREG;
 303     req.command = WDCC_CHECK_PWR;
 304     req.timeout = 1000;
 305     break;
 306   default:
 307     pout("Unrecognized command %d in ata_command_interface()\n", command);
 308     errno = ENOSYS;
 309     return -1;
 310   }
 311
 312   if (command == STATUS_CHECK) {
 313     char buf[512];
 314
 315     unsigned const short normal = WDSMART_CYL, failed = 0x2cf4;
 316
 317     if ((retval = ioctl(fd, ATAIOCCOMMAND, &req))) {
 318       perror("Failed command");
 319       return -1;
 320     }
 321     /* Cyl low and Cyl high unchanged means "Good SMART status" */
 322     if (req.cylinder == normal)
 323       return 0;
 324
 325     /* These values mean "Bad SMART status" */
 326     if (req.cylinder == failed)
 327       return 1;
 328
 329     /* We haven't gotten output that makes sense;
 330      * print out some debugging info */
 331     snprintf(buf, sizeof(buf),
 332       "CMD=0x%02x\nFR =0x%02x\nNS =0x%02x\nSC =0x%02x\nCL =0x%02x\nCH =0x%02x\nRETURN =0x%04x\n",
 333       (int) req.command, (int) req.features, (int) req.sec_count, (int) req.sec_num,
 334       (int) (le16toh(req.cylinder) & 0xff), (int) ((le16toh(req.cylinder) >> 8) & 0xff),
 335       (int) req.error);
 336     printwarning(BAD_SMART, buf);
 337     return 0;
 338   }
 339   if ((retval = ioctl(fd, ATAIOCCOMMAND, &req))) {
 340     perror("Failed command");
 341     return -1;
 342   }
 343   if (command == CHECK_POWER_MODE)
 344     data[0] = req.sec_count;
 345
 346   if (copydata)
 347     memcpy(data, inbuf, 512);
 348
 349   return 0;
 350 }
 351
 352 int
 353 escalade_command_interface(int fd, int disknum, int escalade_type, smart_command_set command, int select, char *data)
 354 {
 355   printwarning(NO_3WARE, NULL);
 356   return -1;
 357 }
 358
 359 int
 360 do_scsi_cmnd_io(int fd, struct scsi_cmnd_io * iop, int report)
 361 {
 362   struct scsireq sc;
 363
 364   if (report > 0) {
 365     size_t k;
 366
 367     const unsigned char *ucp = iop->cmnd;
 368     const char *np;
 369
 370     np = scsi_get_opcode_name(ucp[0]);
 371     pout(" [%s: ", np ? np : "<unknown opcode>");
 372     for (k = 0; k < iop->cmnd_len; ++k)
 373       pout("%02x ", ucp[k]);
 374     if ((report > 1) &&
 375       (DXFER_TO_DEVICE == iop->dxfer_dir) && (iop->dxferp)) {
 376       int trunc = (iop->dxfer_len > 256) ? 1 : 0;
 377
 378       pout("]\n  Outgoing data, len=%d%s:\n", (int) iop->dxfer_len,
 379         (trunc ? " [only first 256 bytes shown]" : ""));
 380       dStrHex(iop->dxferp, (trunc ? 256 : iop->dxfer_len), 1);
 381     } else
 382       pout("]");
 383   }
 384   memset(&sc, 0, sizeof(sc));
 385   memcpy(sc.cmd, iop->cmnd, iop->cmnd_len);
 386   sc.cmdlen = iop->cmnd_len;
 387   sc.databuf = iop->dxferp;
 388   sc.datalen = iop->dxfer_len;
 389   sc.senselen = iop->max_sense_len;
 390   sc.timeout = iop->timeout == 0 ? 60000 : (1000 * iop->timeout);
 391   sc.flags =
 392     (iop->dxfer_dir == DXFER_NONE ? SCCMD_READ :        /* XXX */
 393     (iop->dxfer_dir == DXFER_FROM_DEVICE ? SCCMD_READ : SCCMD_WRITE));
 394
 395   if (ioctl(fd, SCIOCCOMMAND, &sc) < 0) {
 396     warn("error sending SCSI ccb");
 397     return -1;
 398   }
 399   iop->resid = sc.datalen - sc.datalen_used;
 400   iop->scsi_status = sc.status;
 401   if (iop->sensep) {
 402     memcpy(iop->sensep, sc.sense, sc.senselen_used);
 403     iop->resp_sense_len = sc.senselen_used;
 404   }
 405   if (report > 0) {
 406     int trunc;
 407
 408     pout("  status=0\n");
 409     trunc = (iop->dxfer_len > 256) ? 1 : 0;
 410
 411     pout("  Incoming data, len=%d%s:\n", (int) iop->dxfer_len,
 412       (trunc ? " [only first 256 bytes shown]" : ""));
 413     dStrHex(iop->dxferp, (trunc ? 256 : iop->dxfer_len), 1);
 414   }
 415   return 0;
 416 }
 417
 418 /* print examples for smartctl */
 419 void
 420 print_smartctl_examples()
 421 {
 422   char p;
 423
 424   p = 'a' + getrawpartition();
 425   printf("=================================================== SMARTCTL EXAMPLES =====\n\n");
 426 #ifdef HAVE_GETOPT_LONG
 427   printf(
 428     "  smartctl -a /dev/wd0%c                      (Prints all SMART information)\n\n"
 429     "  smartctl --smart=on --offlineauto=on --saveauto=on /dev/wd0%c\n"
 430     "                                              (Enables SMART on first disk)\n\n"
 431     "  smartctl -t long /dev/wd0%c             (Executes extended disk self-test)\n\n"
 432     "  smartctl --attributes --log=selftest --quietmode=errorsonly /dev/wd0%c\n"
 433     "                                      (Prints Self-Test & Attribute errors)\n",
 434     p, p, p, p
 435     );
 436 #else
 437   printf(
 438     "  smartctl -a /dev/wd0%c                     (Prints all SMART information)\n"
 439     "  smartctl -s on -o on -S on /dev/wd0%c        (Enables SMART on first disk)\n"
 440     "  smartctl -t long /dev/wd0%c            (Executes extended disk self-test)\n"
 441     "  smartctl -A -l selftest -q errorsonly /dev/wd0%c"
 442     "                                      (Prints Self-Test & Attribute errors)\n",
 443     p, p, p, p
 444     );
 445 #endif
 446   return;
 447 }