miscutils/hdparm.c

   1 /* vi: set sw=4 ts=4: */
   2 /*
   3  * hdparm implementation for busybox
   4  *
   5  * Copyright (C) [2003] by [Matteo Croce] <3297627799@wind.it>
   6  * Hacked by Tito <farmatito@tiscali.it> for size optimization.
   7  *
   8  * Licensed under the GPL v2 or later, see the file LICENSE in this tarball.
   9  *
  10  * This program is based on the source code of hdparm: see below...
  11  * hdparm.c - Command line interface to get/set hard disk parameters
  12  *          - by Mark Lord (C) 1994-2002 -- freely distributable
  13  */
  14
  15 #include <unistd.h>
  16 #include <string.h>
  17 #include <stdlib.h>
  18 #include <fcntl.h>
  19 #include <errno.h>
  20 #include <ctype.h>
  21 #include <endian.h>
  22 #include <sys/ioctl.h>
  23 #include <sys/shm.h>
  24 #include <sys/sysmacros.h>
  25 #include <sys/time.h>
  26 #include <sys/times.h>
  27 #include <sys/mount.h>
  28 #include "busybox.h"
  29 #include <linux/types.h>
  30 #include <linux/hdreg.h>
  31 #include <asm/byteorder.h>
  32
  33
  34 #if BB_BIG_ENDIAN && !defined(__USE_XOPEN)
  35 # define __USE_XOPEN
  36 #endif
  37
  38 /* device types */
  39 /* ------------ */
  40 #define NO_DEV                  0xffff
  41 #define ATA_DEV                 0x0000
  42 #define ATAPI_DEV               0x0001
  43
  44 /* word definitions */
  45 /* ---------------- */
  46 #define GEN_CONFIG              0   /* general configuration */
  47 #define LCYLS                   1   /* number of logical cylinders */
  48 #define CONFIG                  2   /* specific configuration */
  49 #define LHEADS                  3   /* number of logical heads */
  50 #define TRACK_BYTES             4   /* number of bytes/track (ATA-1) */
  51 #define SECT_BYTES              5   /* number of bytes/sector (ATA-1) */
  52 #define LSECTS                  6   /* number of logical sectors/track */
  53 #define START_SERIAL            10  /* ASCII serial number */
  54 #define LENGTH_SERIAL           10  /* 10 words (20 bytes or characters) */
  55 #define BUF_TYPE                20  /* buffer type (ATA-1) */
  56 #define BUFFER__SIZE            21  /* buffer size (ATA-1) */
  57 #define RW_LONG                 22  /* extra bytes in R/W LONG cmd ( < ATA-4)*/
  58 #define START_FW_REV            23  /* ASCII firmware revision */
  59 #define LENGTH_FW_REV            4  /*  4 words (8 bytes or characters) */
  60 #define START_MODEL             27  /* ASCII model number */
  61 #define LENGTH_MODEL            20  /* 20 words (40 bytes or characters) */
  62 #define SECTOR_XFER_MAX         47  /* r/w multiple: max sectors xfered */
  63 #define DWORD_IO                48  /* can do double-word IO (ATA-1 only) */
  64 #define CAPAB_0                 49  /* capabilities */
  65 #define CAPAB_1                 50
  66 #define PIO_MODE                51  /* max PIO mode supported (obsolete)*/
  67 #define DMA_MODE                52  /* max Singleword DMA mode supported (obs)*/
  68 #define WHATS_VALID             53  /* what fields are valid */
  69 #define LCYLS_CUR               54  /* current logical cylinders */
  70 #define LHEADS_CUR              55  /* current logical heads */
  71 #define LSECTS_CUR              56  /* current logical sectors/track */
  72 #define CAPACITY_LSB            57  /* current capacity in sectors */
  73 #define CAPACITY_MSB            58
  74 #define SECTOR_XFER_CUR         59  /* r/w multiple: current sectors xfered */
  75 #define LBA_SECTS_LSB           60  /* LBA: total number of user */
  76 #define LBA_SECTS_MSB           61  /*      addressable sectors */
  77 #define SINGLE_DMA              62  /* singleword DMA modes */
  78 #define MULTI_DMA               63  /* multiword DMA modes */
  79 #define ADV_PIO_MODES           64  /* advanced PIO modes supported */
  80                                     /* multiword DMA xfer cycle time: */
  81 #define DMA_TIME_MIN            65  /*   - minimum */
  82 #define DMA_TIME_NORM           66  /*   - manufacturer's recommended   */
  83                                     /* minimum PIO xfer cycle time: */
  84 #define PIO_NO_FLOW             67  /*   - without flow control */
  85 #define PIO_FLOW                68  /*   - with IORDY flow control */
  86 #define PKT_REL                 71  /* typical #ns from PKT cmd to bus rel */
  87 #define SVC_NBSY                72  /* typical #ns from SERVICE cmd to !BSY */
  88 #define CDR_MAJOR               73  /* CD ROM: major version number */
  89 #define CDR_MINOR               74  /* CD ROM: minor version number */
  90 #define QUEUE_DEPTH             75  /* queue depth */
  91 #define MAJOR                   80  /* major version number */
  92 #define MINOR                   81  /* minor version number */
  93 #define CMDS_SUPP_0             82  /* command/feature set(s) supported */
  94 #define CMDS_SUPP_1             83
  95 #define CMDS_SUPP_2             84
  96 #define CMDS_EN_0               85  /* command/feature set(s) enabled */
  97 #define CMDS_EN_1               86
  98 #define CMDS_EN_2               87
  99 #define ULTRA_DMA               88  /* ultra DMA modes */
 100                                     /* time to complete security erase */
 101 #define ERASE_TIME              89  /*   - ordinary */
 102 #define ENH_ERASE_TIME          90  /*   - enhanced */
 103 #define ADV_PWR                 91  /* current advanced power management level
 104                                        in low byte, 0x40 in high byte. */
 105 #define PSWD_CODE               92  /* master password revision code    */
 106 #define HWRST_RSLT              93  /* hardware reset result */
 107 #define ACOUSTIC                94  /* acoustic mgmt values ( >= ATA-6) */
 108 #define LBA_LSB                 100 /* LBA: maximum.  Currently only 48 */
 109 #define LBA_MID                 101 /*      bits are used, but addr 103 */
 110 #define LBA_48_MSB              102 /*      has been reserved for LBA in */
 111 #define LBA_64_MSB              103 /*      the future. */
 112 #define RM_STAT                 127 /* removable media status notification feature set support */
 113 #define SECU_STATUS             128 /* security status */
 114 #define CFA_PWR_MODE            160 /* CFA power mode 1 */
 115 #define START_MEDIA             176 /* media serial number */
 116 #define LENGTH_MEDIA            20  /* 20 words (40 bytes or characters)*/
 117 #define START_MANUF             196 /* media manufacturer I.D. */
 118 #define LENGTH_MANUF            10  /* 10 words (20 bytes or characters) */
 119 #define INTEGRITY               255 /* integrity word */
 120
 121 /* bit definitions within the words */
 122 /* -------------------------------- */
 123
 124 /* many words are considered valid if bit 15 is 0 and bit 14 is 1 */
 125 #define VALID                   0xc000
 126 #define VALID_VAL               0x4000
 127 /* many words are considered invalid if they are either all-0 or all-1 */
 128 #define NOVAL_0                 0x0000
 129 #define NOVAL_1                 0xffff
 130
 131 /* word 0: gen_config */
 132 #define NOT_ATA                 0x8000
 133 #define NOT_ATAPI               0x4000  /* (check only if bit 15 == 1) */
 134 #define MEDIA_REMOVABLE         0x0080
 135 #define DRIVE_NOT_REMOVABLE     0x0040  /* bit obsoleted in ATA 6 */
 136 #define INCOMPLETE              0x0004
 137 #define CFA_SUPPORT_VAL         0x848a  /* 848a=CFA feature set support */
 138 #define DRQ_RESPONSE_TIME       0x0060
 139 #define DRQ_3MS_VAL             0x0000
 140 #define DRQ_INTR_VAL            0x0020
 141 #define DRQ_50US_VAL            0x0040
 142 #define PKT_SIZE_SUPPORTED      0x0003
 143 #define PKT_SIZE_12_VAL         0x0000
 144 #define PKT_SIZE_16_VAL         0x0001
 145 #define EQPT_TYPE               0x1f00
 146 #define SHIFT_EQPT              8
 147
 148 #define CDROM 0x0005
 149
 150 #ifdef CONFIG_FEATURE_HDPARM_GET_IDENTITY
 151 static const char * const pkt_str[] = {
 152         "Direct-access device",                 /* word 0, bits 12-8 = 00 */
 153         "Sequential-access device",             /* word 0, bits 12-8 = 01 */
 154         "Printer",                              /* word 0, bits 12-8 = 02 */
 155         "Processor",                            /* word 0, bits 12-8 = 03 */
 156         "Write-once device",                    /* word 0, bits 12-8 = 04 */
 157         "CD-ROM",                               /* word 0, bits 12-8 = 05 */
 158         "Scanner",                              /* word 0, bits 12-8 = 06 */
 159         "Optical memory",                       /* word 0, bits 12-8 = 07 */
 160         "Medium changer",                       /* word 0, bits 12-8 = 08 */
 161         "Communications device",                /* word 0, bits 12-8 = 09 */
 162         "ACS-IT8 device",                       /* word 0, bits 12-8 = 0a */
 163         "ACS-IT8 device",                       /* word 0, bits 12-8 = 0b */
 164         "Array controller",                     /* word 0, bits 12-8 = 0c */
 165         "Enclosure services",                   /* word 0, bits 12-8 = 0d */
 166         "Reduced block command device",         /* word 0, bits 12-8 = 0e */
 167         "Optical card reader/writer",           /* word 0, bits 12-8 = 0f */
 168         "",                                     /* word 0, bits 12-8 = 10 */
 169         "",                                     /* word 0, bits 12-8 = 11 */
 170         "",                                     /* word 0, bits 12-8 = 12 */
 171         "",                                     /* word 0, bits 12-8 = 13 */
 172         "",                                     /* word 0, bits 12-8 = 14 */
 173         "",                                     /* word 0, bits 12-8 = 15 */
 174         "",                                     /* word 0, bits 12-8 = 16 */
 175         "",                                     /* word 0, bits 12-8 = 17 */
 176         "",                                     /* word 0, bits 12-8 = 18 */
 177         "",                                     /* word 0, bits 12-8 = 19 */
 178         "",                                     /* word 0, bits 12-8 = 1a */
 179         "",                                     /* word 0, bits 12-8 = 1b */
 180         "",                                     /* word 0, bits 12-8 = 1c */
 181         "",                                     /* word 0, bits 12-8 = 1d */
 182         "",                                     /* word 0, bits 12-8 = 1e */
 183         "Unknown",                              /* word 0, bits 12-8 = 1f */
 184 };
 185
 186 static const char * const ata1_cfg_str[] = {                    /* word 0 in ATA-1 mode */
 187         "reserved",                             /* bit 0 */
 188         "hard sectored",                        /* bit 1 */
 189         "soft sectored",                        /* bit 2 */
 190         "not MFM encoded ",                     /* bit 3 */
 191         "head switch time > 15us",              /* bit 4 */
 192         "spindle motor control option",         /* bit 5 */
 193         "fixed drive",                          /* bit 6 */
 194         "removable drive",                      /* bit 7 */
 195         "disk xfer rate <= 5Mbs",               /* bit 8 */
 196         "disk xfer rate > 5Mbs, <= 10Mbs",      /* bit 9 */
 197         "disk xfer rate > 5Mbs",                /* bit 10 */
 198         "rotational speed tol.",                /* bit 11 */
 199         "data strobe offset option",            /* bit 12 */
 200         "track offset option",                  /* bit 13 */
 201         "format speed tolerance gap reqd",      /* bit 14 */
 202         "ATAPI"                                 /* bit 14 */
 203 };
 204 #endif
 205
 206 /* word 1: number of logical cylinders */
 207 #define LCYLS_MAX               0x3fff /* maximum allowable value */
 208
 209 /* word 2: specific configuration
 210  * (a) require SET FEATURES to spin-up
 211  * (b) require spin-up to fully reply to IDENTIFY DEVICE
 212  */
 213 #define STBY_NID_VAL            0x37c8  /*     (a) and     (b) */
 214 #define STBY_ID_VAL             0x738c  /*     (a) and not (b) */
 215 #define PWRD_NID_VAL            0x8c73  /* not (a) and     (b) */
 216 #define PWRD_ID_VAL             0xc837  /* not (a) and not (b) */
 217
 218 /* words 47 & 59: sector_xfer_max & sector_xfer_cur */
 219 #define SECTOR_XFER             0x00ff  /* sectors xfered on r/w multiple cmds*/
 220 #define MULTIPLE_SETTING_VALID  0x0100  /* 1=multiple sector setting is valid */
 221
 222 /* word 49: capabilities 0 */
 223 #define STD_STBY                0x2000  /* 1=standard values supported (ATA);
 224                                            0=vendor specific values */
 225 #define IORDY_SUP               0x0800  /* 1=support; 0=may be supported */
 226 #define IORDY_OFF               0x0400  /* 1=may be disabled */
 227 #define LBA_SUP                 0x0200  /* 1=Logical Block Address support */
 228 #define DMA_SUP                 0x0100  /* 1=Direct Memory Access support */
 229 #define DMA_IL_SUP              0x8000  /* 1=interleaved DMA support (ATAPI) */
 230 #define CMD_Q_SUP               0x4000  /* 1=command queuing support (ATAPI) */
 231 #define OVLP_SUP                0x2000  /* 1=overlap operation support (ATAPI) */
 232 #define SWRST_REQ               0x1000  /* 1=ATA SW reset required (ATAPI, obsolete */
 233
 234 /* word 50: capabilities 1 */
 235 #define MIN_STANDBY_TIMER       0x0001  /* 1=device specific standby timer value minimum */
 236
 237 /* words 51 & 52: PIO & DMA cycle times */
 238 #define MODE                    0xff00  /* the mode is in the MSBs */
 239
 240 /* word 53: whats_valid */
 241 #define OK_W88                  0x0004  /* the ultra_dma info is valid */
 242 #define OK_W64_70               0x0002  /* see above for word descriptions */
 243 #define OK_W54_58               0x0001  /* current cyl, head, sector, cap. info valid */
 244
 245 /*word 63,88: dma_mode, ultra_dma_mode*/
 246 #define MODE_MAX                7       /* bit definitions force udma <=7 (when
 247                                          * udma >=8 comes out it'll have to be
 248                                          * defined in a new dma_mode word!) */
 249
 250 /* word 64: PIO transfer modes */
 251 #define PIO_SUP                 0x00ff  /* only bits 0 & 1 are used so far,  */
 252 #define PIO_MODE_MAX            8       /* but all 8 bits are defined        */
 253
 254 /* word 75: queue_depth */
 255 #define DEPTH_BITS              0x001f  /* bits used for queue depth */
 256
 257 /* words 80-81: version numbers */
 258 /* NOVAL_0 or  NOVAL_1 means device does not report version */
 259
 260 /* word 81: minor version number */
 261 #define MINOR_MAX               0x22
 262 #ifdef CONFIG_FEATURE_HDPARM_GET_IDENTITY
 263 static const char *minor_str[MINOR_MAX+2] = {                   /* word 81 value: */
 264         "Unspecified",                                  /* 0x0000       */
 265         "ATA-1 X3T9.2 781D prior to revision 4",        /* 0x0001       */
 266         "ATA-1 published, ANSI X3.221-1994",            /* 0x0002       */
 267         "ATA-1 X3T9.2 781D revision 4",                 /* 0x0003       */
 268         "ATA-2 published, ANSI X3.279-1996",            /* 0x0004       */
 269         "ATA-2 X3T10 948D prior to revision 2k",        /* 0x0005       */
 270         "ATA-3 X3T10 2008D revision 1",                 /* 0x0006       */
 271         "ATA-2 X3T10 948D revision 2k",                 /* 0x0007       */
 272         "ATA-3 X3T10 2008D revision 0",                 /* 0x0008       */
 273         "ATA-2 X3T10 948D revision 3",                  /* 0x0009       */
 274         "ATA-3 published, ANSI X3.298-199x",            /* 0x000a       */
 275         "ATA-3 X3T10 2008D revision 6",                 /* 0x000b       */
 276         "ATA-3 X3T13 2008D revision 7 and 7a",          /* 0x000c       */
 277         "ATA/ATAPI-4 X3T13 1153D revision 6",           /* 0x000d       */
 278         "ATA/ATAPI-4 T13 1153D revision 13",            /* 0x000e       */
 279         "ATA/ATAPI-4 X3T13 1153D revision 7",           /* 0x000f       */
 280         "ATA/ATAPI-4 T13 1153D revision 18",            /* 0x0010       */
 281         "ATA/ATAPI-4 T13 1153D revision 15",            /* 0x0011       */
 282         "ATA/ATAPI-4 published, ANSI INCITS 317-1998",  /* 0x0012       */
 283         "ATA/ATAPI-5 T13 1321D revision 3",
 284         "ATA/ATAPI-4 T13 1153D revision 14",            /* 0x0014       */
 285         "ATA/ATAPI-5 T13 1321D revision 1",             /* 0x0015       */
 286         "ATA/ATAPI-5 published, ANSI INCITS 340-2000",  /* 0x0016       */
 287         "ATA/ATAPI-4 T13 1153D revision 17",            /* 0x0017       */
 288         "ATA/ATAPI-6 T13 1410D revision 0",             /* 0x0018       */
 289         "ATA/ATAPI-6 T13 1410D revision 3a",            /* 0x0019       */
 290         "ATA/ATAPI-7 T13 1532D revision 1",             /* 0x001a       */
 291         "ATA/ATAPI-6 T13 1410D revision 2",             /* 0x001b       */
 292         "ATA/ATAPI-6 T13 1410D revision 1",             /* 0x001c       */
 293         "ATA/ATAPI-7 published, ANSI INCITS 397-2005",  /* 0x001d       */
 294         "ATA/ATAPI-7 T13 1532D revision 0",             /* 0x001e       */
 295         "Reserved"                                      /* 0x001f       */
 296         "Reserved"                                      /* 0x0020       */
 297         "ATA/ATAPI-7 T13 1532D revision 4a",            /* 0x0021       */
 298         "ATA/ATAPI-6 published, ANSI INCITS 361-2002",  /* 0x0022       */
 299         "Reserved"                                      /* 0x0023-0xfffe*/
 300 };
 301 #endif
 302 static const char actual_ver[MINOR_MAX+2] = {
 303                         /* word 81 value: */
 304         0,              /* 0x0000       WARNING:        */
 305         1,              /* 0x0001       WARNING:        */
 306         1,              /* 0x0002       WARNING:        */
 307         1,              /* 0x0003       WARNING:        */
 308         2,              /* 0x0004       WARNING:   This array           */
 309         2,              /* 0x0005       WARNING:   corresponds          */
 310         3,              /* 0x0006       WARNING:   *exactly*            */
 311         2,              /* 0x0007       WARNING:   to the ATA/          */
 312         3,              /* 0x0008       WARNING:   ATAPI version        */
 313         2,              /* 0x0009       WARNING:   listed in            */
 314         3,              /* 0x000a       WARNING:   the                  */
 315         3,              /* 0x000b       WARNING:   minor_str            */
 316         3,              /* 0x000c       WARNING:   array                */
 317         4,              /* 0x000d       WARNING:   above.               */
 318         4,              /* 0x000e       WARNING:                        */
 319         4,              /* 0x000f       WARNING:   if you change        */
 320         4,              /* 0x0010       WARNING:   that one,            */
 321         4,              /* 0x0011       WARNING:   change this one      */
 322         4,              /* 0x0012       WARNING:   too!!!               */
 323         5,              /* 0x0013       WARNING:        */
 324         4,              /* 0x0014       WARNING:        */
 325         5,              /* 0x0015       WARNING:        */
 326         5,              /* 0x0016       WARNING:        */
 327         4,              /* 0x0017       WARNING:        */
 328         6,              /* 0x0018       WARNING:        */
 329         6,              /* 0x0019       WARNING:        */
 330         7,              /* 0x001a       WARNING:        */
 331         6,              /* 0x001b       WARNING:        */
 332         6,              /* 0x001c       WARNING:        */
 333         7,              /* 0x001d       WARNING:        */
 334         7,              /* 0x001e       WARNING:        */
 335         0,              /* 0x001f       WARNING:        */
 336         0,              /* 0x0020       WARNING:        */
 337         7,              /* 0x0021       WARNING:        */
 338         6,              /* 0x0022       WARNING:        */
 339         0               /* 0x0023-0xfffe        */
 340 };
 341
 342 /* words 82-84: cmds/feats supported */
 343 #define CMDS_W82                0x77ff  /* word 82: defined command locations*/
 344 #define CMDS_W83                0x3fff  /* word 83: defined command locations*/
 345 #define CMDS_W84                0x002f  /* word 83: defined command locations*/
 346 #define SUPPORT_48_BIT          0x0400
 347 #define NUM_CMD_FEAT_STR        48
 348
 349 #ifdef CONFIG_FEATURE_HDPARM_GET_IDENTITY
 350 static const char * const cmd_feat_str[] = {
 351         "",                                     /* word 82 bit 15: obsolete  */
 352         "NOP cmd",                              /* word 82 bit 14 */
 353         "READ BUFFER cmd",                      /* word 82 bit 13 */
 354         "WRITE BUFFER cmd",                     /* word 82 bit 12 */
 355         "",                                     /* word 82 bit 11: obsolete  */
 356         "Host Protected Area feature set",      /* word 82 bit 10 */
 357         "DEVICE RESET cmd",                     /* word 82 bit  9 */
 358         "SERVICE interrupt",                    /* word 82 bit  8 */
 359         "Release interrupt",                    /* word 82 bit  7 */
 360         "Look-ahead",                           /* word 82 bit  6 */
 361         "Write cache",                          /* word 82 bit  5 */
 362         "PACKET command feature set",           /* word 82 bit  4 */
 363         "Power Management feature set",         /* word 82 bit  3 */
 364         "Removable Media feature set",          /* word 82 bit  2 */
 365         "Security Mode feature set",            /* word 82 bit  1 */
 366         "SMART feature set",                    /* word 82 bit  0 */
 367                                                 /* --------------*/
 368         "",                                     /* word 83 bit 15: !valid bit */
 369         "",                                     /* word 83 bit 14:  valid bit */
 370         "FLUSH CACHE EXT command",              /* word 83 bit 13 */
 371         "Mandatory FLUSH CACHE command ",       /* word 83 bit 12 */
 372         "Device Configuration Overlay feature set ",
 373         "48-bit Address feature set ",          /* word 83 bit 10 */
 374         "",
 375         "SET MAX security extension",           /* word 83 bit  8 */
 376         "Address Offset Reserved Area Boot",    /* word 83 bit  7 */
 377         "SET FEATURES subcommand required to spinup after power up",
 378         "Power-Up In Standby feature set",      /* word 83 bit  5 */
 379         "Removable Media Status Notification feature set",
 380         "Adv. Power Management feature set",/* word 83 bit  3 */
 381         "CFA feature set",                      /* word 83 bit  2 */
 382         "READ/WRITE DMA QUEUED",                /* word 83 bit  1 */
 383         "DOWNLOAD MICROCODE cmd",               /* word 83 bit  0 */
 384                                                 /* --------------*/
 385         "",                                     /* word 84 bit 15: !valid bit */
 386         "",                                     /* word 84 bit 14:  valid bit */
 387         "",                                     /* word 84 bit 13:  reserved */
 388         "",                                     /* word 84 bit 12:  reserved */
 389         "",                                     /* word 84 bit 11:  reserved */
 390         "",                                     /* word 84 bit 10:  reserved */
 391         "",                                     /* word 84 bit  9:  reserved */
 392         "",                                     /* word 84 bit  8:  reserved */
 393         "",                                     /* word 84 bit  7:  reserved */
 394         "",                                     /* word 84 bit  6:  reserved */
 395         "General Purpose Logging feature set",  /* word 84 bit  5 */
 396         "",                                     /* word 84 bit  4:  reserved */
 397         "Media Card Pass Through Command feature set ",
 398         "Media serial number ",                 /* word 84 bit  2 */
 399         "SMART self-test ",                     /* word 84 bit  1 */
 400         "SMART error logging "                  /* word 84 bit  0 */
 401 };
 402 #endif
 403
 404
 405 /* words 85-87: cmds/feats enabled */
 406 /* use cmd_feat_str[] to display what commands and features have
 407  * been enabled with words 85-87
 408  */
 409
 410 /* words 89, 90, SECU ERASE TIME */
 411 #define ERASE_BITS              0x00ff
 412
 413 /* word 92: master password revision */
 414 /* NOVAL_0 or  NOVAL_1 means no support for master password revision */
 415
 416 /* word 93: hw reset result */
 417 #define CBLID                   0x2000  /* CBLID status */
 418 #define RST0                    0x0001  /* 1=reset to device #0 */
 419 #define DEV_DET                 0x0006  /* how device num determined */
 420 #define JUMPER_VAL              0x0002  /* device num determined by jumper */
 421 #define CSEL_VAL                0x0004  /* device num determined by CSEL_VAL */
 422
 423 /* word 127: removable media status notification feature set support */
 424 #define RM_STAT_BITS            0x0003
 425 #define RM_STAT_SUP             0x0001
 426
 427 /* word 128: security */
 428 #define SECU_ENABLED    0x0002
 429 #define SECU_LEVEL              0x0010
 430 #define NUM_SECU_STR    6
 431 #ifdef CONFIG_FEATURE_HDPARM_GET_IDENTITY
 432 static const char * const secu_str[] = {
 433         "supported",                    /* word 128, bit 0 */
 434         "enabled",                      /* word 128, bit 1 */
 435         "locked",                       /* word 128, bit 2 */
 436         "frozen",                       /* word 128, bit 3 */
 437         "expired: security count",      /* word 128, bit 4 */
 438         "supported: enhanced erase"     /* word 128, bit 5 */
 439 };
 440 #endif
 441
 442 /* word 160: CFA power mode */
 443 #define VALID_W160              0x8000  /* 1=word valid */
 444 #define PWR_MODE_REQ            0x2000  /* 1=CFA power mode req'd by some cmds*/
 445 #define PWR_MODE_OFF            0x1000  /* 1=CFA power moded disabled */
 446 #define MAX_AMPS                0x0fff  /* value = max current in ma */
 447
 448 /* word 255: integrity */
 449 #define SIG                     0x00ff  /* signature location */
 450 #define SIG_VAL                 0x00A5  /* signature value */
 451
 452 #define VERSION "v5.4"
 453
 454 #define TIMING_MB               64
 455 #define TIMING_BUF_MB           1
 456 #define TIMING_BUF_BYTES        (TIMING_BUF_MB * 1024 * 1024)
 457 #define TIMING_BUF_COUNT        (timing_MB / TIMING_BUF_MB)
 458 #define BUFCACHE_FACTOR         2
 459
 460 #undef DO_FLUSHCACHE            /* under construction: force cache flush on -W0 */
 461
 462 /* Busybox messages and functions */
 463
 464 static const char bb_msg_shared_mem[] = "could not %s sharedmem buf";
 465 static const char bb_msg_op_not_supp[] = " operation not supported on %s disks";
 466
 467 static int bb_ioctl(int fd, int request, void *argp, const char *string)
 468 {
 469         int e = ioctl(fd, request, argp);
 470         if (e && string)
 471                 bb_perror_msg(" %s", string);
 472         return e;
 473 }
 474
 475 static int bb_ioctl_alt(int fd, int cmd, unsigned char *args, int alt, const char *string)
 476 {
 477         if (!ioctl(fd, cmd, args))
 478                 return 0;
 479         args[0] = alt;
 480         return bb_ioctl(fd, cmd, args, string);
 481 }
 482
 483
 484 static void if_printf(unsigned long i, char *fmt, ... )
 485 {
 486         va_list ap;
 487         va_start(ap, fmt);
 488         if (i)
 489                 vprintf(fmt, ap);
 490         va_end(ap);
 491 }
 492
 493 static void on_off(unsigned int value);
 494
 495 static void if_printf_on_off(unsigned long get_arg,const char *fmt, unsigned long arg)
 496 {
 497         if (get_arg)
 498         {
 499                 printf(fmt, arg);
 500                 on_off(arg);
 501         }
 502 }
 503
 504 static void bb_ioctl_on_off(int fd, int request, void *argp, const char *string,
 505                                                          const char * fmt)
 506 {
 507         if (ioctl(fd, request, &argp) != 0)
 508                 bb_perror_msg(" %s", string);
 509         else
 510         {
 511                 printf(fmt, (unsigned long) argp);
 512                 on_off((unsigned long) argp);
 513         }
 514 }
 515
 516 #ifdef CONFIG_FEATURE_HDPARM_GET_IDENTITY
 517 static void if_else_printf(unsigned long i, char *fmt1, char *fmt2, ... )
 518 {
 519         va_list ap;
 520         va_start(ap, fmt2);
 521         if (i)
 522                 vprintf(fmt1, ap);
 523         else
 524                 vprintf(fmt2, ap);
 525         va_end(ap);
 526 }
 527
 528 static void print_ascii(uint16_t *p, uint8_t length);
 529
 530 static void xprint_ascii(uint16_t *val ,int i, char * string, int n)
 531 {
 532         if (val[i])
 533         {
 534                 printf("\t%-20s",string);
 535                 print_ascii(&val[i], n);
 536         }
 537 }
 538
 539 static void if_strcat(unsigned long test, char *modes, char *string)
 540 {
 541         if (test)
 542                 strcat(modes,string);
 543 }
 544 #endif
 545
 546 static void sync_and_sleep(int i)
 547 {
 548         sync();
 549         sleep(i);
 550 }
 551
 552 static uint16_t check_if_min_and_set_val(uint16_t a, uint16_t b)
 553 {
 554         if ( a < b)
 555                 a = b;
 556         return a;
 557 }
 558
 559 static uint16_t check_if_maj_and_set_val(uint16_t a, uint16_t b)
 560 {
 561         if ( a > b)
 562                 a = b;
 563         return a;
 564 }
 565
 566 static unsigned long int set_flag(char *p, char max)
 567 {
 568         if (*p >= '0' && *p <=  max )
 569                 return 1;
 570         return 0;
 571 }
 572
 573 /* end of  busybox specific stuff */
 574
 575 #ifdef CONFIG_FEATURE_HDPARM_GET_IDENTITY
 576 static uint8_t mode_loop(uint16_t mode_sup, uint16_t mode_sel, int cc, uint8_t *have_mode)
 577 {
 578         uint16_t ii;
 579         uint8_t err_dma = 0;
 580
 581         for (ii = 0; ii <= MODE_MAX; ii++)
 582         {
 583                 if (mode_sel & 0x0001)
 584                 {
 585                         printf("*%cdma%u ",cc,ii);
 586                         if (*have_mode)
 587                                 err_dma = 1;
 588                         *have_mode = 1;
 589                 }
 590                 else if (mode_sup & 0x0001)
 591                         printf("%cdma%u ",cc,ii);
 592
 593                 mode_sup >>=1;
 594                 mode_sel >>=1;
 595         }
 596         return err_dma;
 597 }
 598
 599 static void print_ascii(uint16_t *p, uint8_t length) {
 600         uint8_t ii;
 601         char cl;
 602
 603         /* find first non-space & print it */
 604         for (ii = 0; ii< length; ii++)
 605         {
 606                 if (((char) 0x00ff&((*p)>>8)) != ' ')
 607                         break;
 608                 if ((cl = (char) 0x00ff&(*p)) != ' ')
 609                 {
 610                         if_printf((cl != '\0'),"%c",cl);
 611                         p++;
 612                         ii++;
 613                         break;
 614                 }
 615                 p++;
 616         }
 617         /* print the rest */
 618         for (; ii< length; ii++)
 619         {
 620                 if (!(*p))
 621                         break; /* some older devices have NULLs */
 622                 printf("%c%c",(char)0x00ff&((*p)>>8),(char)(*p)&0x00ff);
 623                 p++;
 624         }
 625         printf("\n");
 626 }
 627
 628 /* identify() is the only extern function used across two source files.  The
 629    others, though, were declared in hdparm.c with global scope; since other
 630    functions in that file have static (file) scope, I assume the difference is
 631    intentional. */
 632 static void identify(uint16_t *id_supplied)
 633 {
 634         uint16_t buf[256];
 635         uint16_t *val, ii, jj, kk;
 636         uint16_t like_std = 1, std = 0, min_std = 0xffff;
 637         uint16_t dev = NO_DEV, eqpt = NO_DEV;
 638         uint8_t  have_mode = 0, err_dma = 0;
 639         uint8_t  chksum = 0;
 640         uint32_t ll, mm, nn, oo;
 641         uint64_t bbbig; /* (:) */
 642
 643         if (BB_BIG_ENDIAN) {
 644                 swab(id_supplied, buf, sizeof(buf));
 645                 val = buf;
 646         } else val = id_supplied;
 647
 648         chksum &= 0xff;
 649
 650         /* check if we recognise the device type */
 651         printf("\n");
 652         if(!(val[GEN_CONFIG] & NOT_ATA))
 653         {
 654                 dev = ATA_DEV;
 655                 printf("ATA device, with ");
 656         }
 657         else if(val[GEN_CONFIG]==CFA_SUPPORT_VAL)
 658         {
 659                 dev = ATA_DEV;
 660                 like_std = 4;
 661                 printf("CompactFlash ATA device, with ");
 662         }
 663         else if(!(val[GEN_CONFIG] & NOT_ATAPI))
 664         {
 665                 dev = ATAPI_DEV;
 666                 eqpt = (val[GEN_CONFIG] & EQPT_TYPE) >> SHIFT_EQPT;
 667                 printf("ATAPI %s, with ", pkt_str[eqpt]);
 668                 like_std = 3;
 669         }
 670         else
 671                 /*"Unknown device type:\n\tbits 15&14 of general configuration word 0 both set to 1.\n"*/
 672                 bb_error_msg_and_die("Unknown device type");
 673
 674         if_printf(!(val[GEN_CONFIG] & MEDIA_REMOVABLE),"non-");
 675         printf("removable media\n");
 676
 677         /* Info from the specific configuration word says whether or not the
 678          * ID command completed correctly.  It is only defined, however in
 679          * ATA/ATAPI-5 & 6; it is reserved (value theoretically 0) in prior
 680          * standards.  Since the values allowed for this word are extremely
 681          * specific, it should be safe to check it now, even though we don't
 682          * know yet what standard this device is using.
 683          */
 684         if ((val[CONFIG]==STBY_NID_VAL) || (val[CONFIG]==STBY_ID_VAL) ||
 685            (val[CONFIG]==PWRD_NID_VAL) || (val[CONFIG]==PWRD_ID_VAL) )
 686         {
 687                 like_std = 5;
 688                 if_printf(((val[CONFIG]==STBY_NID_VAL) || (val[CONFIG]==STBY_ID_VAL)),
 689                                         "powers-up in standby; SET FEATURES subcmd spins-up.\n");
 690                 if_printf((((val[CONFIG]==STBY_NID_VAL) || (val[CONFIG]==PWRD_NID_VAL)) && (val[GEN_CONFIG] & INCOMPLETE)),
 691                                         "\n\tWARNING: ID response incomplete.\n\tFollowing data may be incorrect.\n\n");
 692         }
 693
 694         /* output the model and serial numbers and the fw revision */
 695         xprint_ascii(val, START_MODEL,  "Model Number:",        LENGTH_MODEL);
 696         xprint_ascii(val, START_SERIAL, "Serial Number:",       LENGTH_SERIAL);
 697         xprint_ascii(val, START_FW_REV, "Firmware Revision:",   LENGTH_FW_REV);
 698         xprint_ascii(val, START_MEDIA,  "Media Serial Num:",    LENGTH_MEDIA);
 699         xprint_ascii(val, START_MANUF,  "Media Manufacturer:",  LENGTH_MANUF);
 700
 701         /* major & minor standards version number (Note: these words were not
 702          * defined until ATA-3 & the CDROM std uses different words.) */
 703         printf("Standards:");
 704         if (eqpt != CDROM)
 705         {
 706                 if (val[MINOR] && (val[MINOR] <= MINOR_MAX))
 707                 {
 708                         like_std=check_if_min_and_set_val(like_std, 3);
 709                         std = actual_ver[val[MINOR]];
 710                         if_printf(std,"\n\tUsed: %s ",minor_str[val[MINOR]]);
 711
 712                 }
 713                 /* looks like when they up-issue the std, they obsolete one;
 714                  * thus, only the newest 4 issues need be supported. (That's
 715                  * what "kk" and "min_std" are all about.) */
 716                 if (val[MAJOR] && (val[MAJOR] !=NOVAL_1))
 717                 {
 718                         printf("\n\tSupported: ");
 719                         jj = val[MAJOR] << 1;
 720                         kk = like_std >4 ? like_std-4: 0;
 721                         for (ii = 14; (ii >0)&&(ii>kk); ii--)
 722                         {
 723                                 if (jj & 0x8000)
 724                                 {
 725                                         printf("%u ", ii);
 726                                         if (like_std < ii)
 727                                         {
 728                                                 like_std = ii;
 729                                                 kk = like_std >4 ? like_std-4: 0;
 730                                         }
 731                                         min_std=check_if_maj_and_set_val(min_std, ii);
 732                                 }
 733                                 jj <<= 1;
 734                         }
 735                         like_std=check_if_min_and_set_val(like_std, 3);
 736                 }
 737                 /* Figure out what standard the device is using if it hasn't told
 738                  * us.  If we know the std, check if the device is using any of
 739                  * the words from the next level up.  It happens.
 740                  */
 741                 like_std=check_if_min_and_set_val(like_std, std);
 742
 743                 if (((std == 5) || (!std && (like_std < 6))) &&
 744                         ((((val[CMDS_SUPP_1] & VALID) == VALID_VAL) &&
 745                         ((      val[CMDS_SUPP_1] & CMDS_W83) > 0x00ff)) ||
 746                         (((     val[CMDS_SUPP_2] & VALID) == VALID_VAL) &&
 747                         (       val[CMDS_SUPP_2] & CMDS_W84) ) ) )
 748                 {
 749                         like_std = 6;
 750                 }
 751                 else if (((std == 4) || (!std && (like_std < 5))) &&
 752                         ((((val[INTEGRITY]      & SIG) == SIG_VAL) && !chksum) ||
 753                         ((      val[HWRST_RSLT] & VALID) == VALID_VAL) ||
 754                         (((     val[CMDS_SUPP_1] & VALID) == VALID_VAL) &&
 755                         ((      val[CMDS_SUPP_1] & CMDS_W83) > 0x001f)) ) )
 756                 {
 757                         like_std = 5;
 758                 }
 759                 else if (((std == 3) || (!std && (like_std < 4))) &&
 760                                 ((((val[CMDS_SUPP_1] & VALID) == VALID_VAL) &&
 761                                 (((     val[CMDS_SUPP_1] & CMDS_W83) > 0x0000) ||
 762                                 ((      val[CMDS_SUPP_0] & CMDS_W82) > 0x000f))) ||
 763                                 ((      val[CAPAB_1] & VALID) == VALID_VAL) ||
 764                                 ((      val[WHATS_VALID] & OK_W88) && val[ULTRA_DMA]) ||
 765                                 ((      val[RM_STAT] & RM_STAT_BITS) == RM_STAT_SUP) ) )
 766                 {
 767                         like_std = 4;
 768                 }
 769                 else if (((std == 2) || (!std && (like_std < 3))) &&
 770                            ((val[CMDS_SUPP_1] & VALID) == VALID_VAL) )
 771                 {
 772                         like_std = 3;
 773                 }
 774                 else if (((std == 1) || (!std && (like_std < 2))) &&
 775                                 ((val[CAPAB_0] & (IORDY_SUP | IORDY_OFF)) ||
 776                                 (val[WHATS_VALID] & OK_W64_70)) )
 777                 {
 778                         like_std = 2;
 779                 }
 780                 if (!std)
 781                         printf("\n\tLikely used: %u\n",like_std);
 782                 else if (like_std > std)
 783                         printf("& some of %u\n",like_std);
 784                 else
 785                         printf("\n");
 786         }
 787         else
 788         {
 789                 /* TBD: do CDROM stuff more thoroughly.  For now... */
 790                 kk = 0;
 791                 if (val[CDR_MINOR] == 9)
 792                 {
 793                         kk = 1;
 794                         printf("\n\tUsed: ATAPI for CD-ROMs, SFF-8020i, r2.5");
 795                 }
 796                 if (val[CDR_MAJOR] && (val[CDR_MAJOR] !=NOVAL_1))
 797                 {
 798                         kk = 1;
 799                         printf("\n\tSupported: CD-ROM ATAPI");
 800                         jj = val[CDR_MAJOR] >> 1;
 801                         for (ii = 1; ii <15; ii++)
 802                         {
 803                                 if_printf((jj & 0x0001),"-%u ", ii);
 804                                 jj >>= 1;
 805                         }
 806                 }
 807                 if_else_printf((!kk),"\n\tLikely used CD-ROM ATAPI-1\n","\n");
 808                 /* the cdrom stuff is more like ATA-2 than anything else, so: */
 809                 like_std = 2;
 810         }
 811
 812         if (min_std == 0xffff)
 813                 min_std = like_std > 4 ? like_std - 3 : 1;
 814
 815         printf("Configuration:\n");
 816         /* more info from the general configuration word */
 817         if ((eqpt != CDROM) && (like_std == 1))
 818         {
 819                 jj = val[GEN_CONFIG] >> 1;
 820                 for (ii = 1; ii < 15; ii++)
 821                 {
 822                         if_printf((jj & 0x0001),"\t%s\n",ata1_cfg_str[ii]);
 823                         jj >>=1;
 824                 }
 825         }
 826         if (dev == ATAPI_DEV)
 827         {
 828                 printf("\tDRQ response: "); /* Data Request (DRQ) */
 829                 switch(val[GEN_CONFIG] & DRQ_RESPONSE_TIME)
 830                 {
 831                         case DRQ_3MS_VAL :
 832                                 printf("3ms.\n");
 833                                 break;
 834                         case DRQ_INTR_VAL :
 835                                 printf("<=10ms with INTRQ\n");
 836                                 break;
 837                         case DRQ_50US_VAL :
 838                                 printf("50us.\n");
 839                                 break;
 840                         default :
 841                                 printf("unknown.\n");
 842                                 break;
 843                 }
 844                 printf("\tPacket size: ");
 845                 switch(val[GEN_CONFIG] & PKT_SIZE_SUPPORTED)
 846                 {
 847                         case PKT_SIZE_12_VAL :
 848                                 printf("12 bytes\n");
 849                                 break;
 850                         case PKT_SIZE_16_VAL :
 851                                 printf("16 bytes\n");
 852                                 break;
 853                         default :
 854                                 printf("Unknown\n");
 855                                 break;
 856                 }
 857         }
 858         else
 859         {
 860                 /* addressing...CHS? See section 6.2 of ATA specs 4 or 5 */
 861                 ll = (uint32_t)val[LBA_SECTS_MSB] << 16 | val[LBA_SECTS_LSB];
 862                 mm = 0; bbbig = 0;
 863                 if ( (ll > 0x00FBFC10) && (!val[LCYLS]))
 864                         printf("\tCHS addressing not supported\n");
 865                 else
 866                 {
 867                         jj = val[WHATS_VALID] & OK_W54_58;
 868                         printf("\tLogical\t\tmax\tcurrent\n\tcylinders\t%u\t%u\n\theads\t\t%u\t%u\n\tsectors/track\t%u\t%u\n\t--\n",
 869                                         val[LCYLS],jj?val[LCYLS_CUR]:0, val[LHEADS],jj?val[LHEADS_CUR]:0, val[LSECTS],jj?val[LSECTS_CUR]:0);
 870
 871                         if_printf(((min_std == 1) && (val[TRACK_BYTES] || val[SECT_BYTES])),
 872                                                 "\tbytes/track: %u\tbytes/sector: %u\n",val[TRACK_BYTES], val[SECT_BYTES]);
 873
 874                         if (jj)
 875                         {
 876                                 mm = (uint32_t)val[CAPACITY_MSB] << 16 | val[CAPACITY_LSB];
 877                                 if (like_std < 3)
 878                                 {
 879                                          /* check Endian of capacity bytes */
 880                                         nn = val[LCYLS_CUR] * val[LHEADS_CUR] * val[LSECTS_CUR];
 881                                         oo = (uint32_t)val[CAPACITY_LSB] << 16 | val[CAPACITY_MSB];
 882                                         if (abs(mm - nn) > abs(oo - nn))
 883                                                 mm = oo;
 884                                 }
 885                                 printf("\tCHS current addressable sectors:%11u\n",mm);
 886                         }
 887                 }
 888                 /* LBA addressing */
 889                 printf("\tLBA    user addressable sectors:%11u\n",ll);
 890                 if ( ((val[CMDS_SUPP_1] & VALID) == VALID_VAL) &&
 891                      (val[CMDS_SUPP_1] & SUPPORT_48_BIT) )
 892                 {
 893                         bbbig = (uint64_t)val[LBA_64_MSB]       << 48 |
 894                                 (uint64_t)val[LBA_48_MSB]       << 32 |
 895                                 (uint64_t)val[LBA_MID]  << 16 |
 896                                         val[LBA_LSB] ;
 897                         printf("\tLBA48  user addressable sectors:%11llu\n",bbbig);
 898                 }
 899
 900                 if (!bbbig)
 901                         bbbig = (uint64_t)(ll>mm ? ll : mm); /* # 512 byte blocks */
 902                 printf("\tdevice size with M = 1024*1024: %11llu MBytes\n",bbbig>>11);
 903                 bbbig = (bbbig<<9)/1000000;
 904                 printf("\tdevice size with M = 1000*1000: %11llu MBytes ",bbbig);
 905
 906                 if_else_printf((bbbig > 1000),"(%llu GB)\n","\n",bbbig/1000);
 907
 908         }
 909
 910         /* hw support of commands (capabilities) */
 911         printf("Capabilities:\n\t");
 912
 913         if (dev == ATAPI_DEV)
 914         {
 915                 if (eqpt != CDROM)
 916                         if_printf((val[CAPAB_0] & CMD_Q_SUP),"Cmd queuing, ");
 917
 918                 if_printf((val[CAPAB_0] & OVLP_SUP),"Cmd overlap, ");
 919         }
 920         if_printf((val[CAPAB_0] & LBA_SUP),"LBA, ");
 921
 922         if (like_std != 1)
 923         {
 924                 printf("IORDY");
 925                 if_printf((!(val[CAPAB_0] & IORDY_SUP)),"(may be)");
 926                 if_else_printf((val[CAPAB_0] & IORDY_OFF),"(can","(cannot");
 927                 printf(" be disabled)\n");
 928         }
 929         else
 930                 printf("no IORDY\n");
 931
 932         if ((like_std == 1) && val[BUF_TYPE])
 933         {
 934                 kk = val[BUF_TYPE];
 935                 printf("\tBuffer type: %04x: ",kk);
 936                 if_else_printf((kk < 2),"single port, single-sector","dual port, multi-sector");
 937                 if_printf((kk > 2)," with read caching ability");
 938                 printf("\n");
 939         }
 940         jj = 0;
 941         if ((min_std == 1) && (val[BUFFER__SIZE] && (val[BUFFER__SIZE] != NOVAL_1)))
 942         {
 943                 printf("\tBuffer size: %.1fkB",(float)val[BUFFER__SIZE]/2);
 944                 jj = 1;
 945         }
 946         if ((min_std < 4) && (val[RW_LONG]))
 947         {
 948                 printf("\tbytes avail on r/w long: %u",val[RW_LONG]);
 949                 jj = 1;
 950         }
 951         if ((eqpt != CDROM) && (like_std > 3))
 952         {
 953                 printf("\tQueue depth: %u",(val[QUEUE_DEPTH] & DEPTH_BITS)+1);
 954                 jj = 1;
 955         }
 956         if_printf(jj,"\n");
 957
 958         if (dev == ATA_DEV)
 959         {
 960                 if (like_std == 1)
 961                         printf("\tCan%s perform double-word IO\n",(!val[DWORD_IO]) ?"not":"");
 962                 else
 963                 {
 964                         printf("\tStandby timer values: spec'd by ");
 965                         if_else_printf((val[CAPAB_0] & STD_STBY),"Standard","Vendor");
 966                         if ((like_std > 3) && ((val[CAPAB_1] & VALID) == VALID_VAL))
 967                                 printf(", %s device specific minimum\n",(val[CAPAB_1] & MIN_STANDBY_TIMER)?"with":"no");
 968                         else
 969                           printf("\n");
 970                 }
 971                 printf("\tR/W multiple sector transfer: ");
 972                 if ((like_std < 3) && !(val[SECTOR_XFER_MAX] & SECTOR_XFER))
 973                         printf("not supported\n");
 974                 else
 975                 {
 976                         printf("Max = %u\tCurrent = ",val[SECTOR_XFER_MAX] & SECTOR_XFER);
 977                         if_else_printf((val[SECTOR_XFER_CUR] & MULTIPLE_SETTING_VALID),
 978                                                         "%u\n","?\n",val[SECTOR_XFER_CUR] & SECTOR_XFER);
 979                 }
 980                 if ((like_std > 3) && (val[CMDS_SUPP_1] & 0x0008))
 981                 {
 982                         /* We print out elsewhere whether the APM feature is enabled or
 983                            not.  If it's not enabled, let's not repeat the info; just print
 984                            nothing here. */
 985                         printf("\tAdvancedPM level: ");
 986                         if ( (val[ADV_PWR] & 0xFF00) == 0x4000 )
 987                         {
 988                                 uint8_t apm_level = val[ADV_PWR] & 0x00FF;
 989                                 printf("%u (0x%x)\n", apm_level, apm_level);
 990                         }
 991                         else
 992                                 printf("unknown setting (0x%04x)\n", val[ADV_PWR]);
 993                 }
 994                 if (like_std > 5)
 995                 {
 996                         if_printf(val[ACOUSTIC],"\tRecommended acoustic management value: %u, current value: %u\n",
 997                                                                         (val[ACOUSTIC] >> 8) & 0x00ff, val[ACOUSTIC] & 0x00ff);
 998                 }
 999         }
1000         else
1001         {
1002                  /* ATAPI */
1003                 if (eqpt != CDROM)
1004                         if_printf((val[CAPAB_0] & SWRST_REQ),"\tATA sw reset required\n");
1005
1006                 if (val[PKT_REL] || val[SVC_NBSY])
1007                 {
1008                         printf("\tOverlap support:");
1009                         if_printf(val[PKT_REL]," %uus to release bus.",val[PKT_REL]);
1010                         if_printf(val[SVC_NBSY]," %uus to clear BSY after SERVICE cmd.",val[SVC_NBSY]);
1011                         printf("\n");
1012                 }
1013         }
1014
1015         /* DMA stuff. Check that only one DMA mode is selected. */
1016         printf("\tDMA: ");
1017         if (!(val[CAPAB_0] & DMA_SUP))
1018                 printf("not supported\n");
1019         else
1020         {
1021                 if_printf((val[DMA_MODE] && !val[SINGLE_DMA] && !val[MULTI_DMA]),
1022                                         " sdma%u\n",(val[DMA_MODE] & MODE) >> 8);
1023                 if (val[SINGLE_DMA])
1024                 {
1025                         jj = val[SINGLE_DMA];
1026                         kk = val[SINGLE_DMA] >> 8;
1027                         err_dma += mode_loop(jj,kk,'s',&have_mode);
1028                 }
1029                 if (val[MULTI_DMA])
1030                 {
1031                         jj = val[MULTI_DMA];
1032                         kk = val[MULTI_DMA] >> 8;
1033                         err_dma += mode_loop(jj,kk,'m',&have_mode);
1034                 }
1035                 if ((val[WHATS_VALID] & OK_W88) && val[ULTRA_DMA])
1036                 {
1037                         jj = val[ULTRA_DMA];
1038                         kk = val[ULTRA_DMA] >> 8;
1039                         err_dma += mode_loop(jj,kk,'u',&have_mode);
1040                 }
1041                 if_printf((err_dma || !have_mode),"(?)");
1042                 printf("\n");
1043
1044                 if_printf(((dev == ATAPI_DEV) && (eqpt != CDROM) && (val[CAPAB_0] & DMA_IL_SUP)),
1045                                         "\t     Interleaved DMA support\n");
1046
1047                 if ((val[WHATS_VALID] & OK_W64_70) &&
1048                    (val[DMA_TIME_MIN] || val[DMA_TIME_NORM]))
1049                 {
1050                         printf("\t     Cycle time:");
1051                         if_printf(val[DMA_TIME_MIN]," min=%uns",val[DMA_TIME_MIN]);
1052                         if_printf(val[DMA_TIME_NORM]," recommended=%uns",val[DMA_TIME_NORM]);
1053                         printf("\n");
1054                 }
1055         }
1056
1057         /* Programmed IO stuff */
1058         printf("\tPIO: ");
1059         /* If a drive supports mode n (e.g. 3), it also supports all modes less
1060          * than n (e.g. 3, 2, 1 and 0).  Print all the modes. */
1061         if ((val[WHATS_VALID] & OK_W64_70) && (val[ADV_PIO_MODES] & PIO_SUP))
1062         {
1063                 jj = ((val[ADV_PIO_MODES] & PIO_SUP) << 3) | 0x0007;
1064                 for (ii = 0; ii <= PIO_MODE_MAX ; ii++)
1065                 {
1066                         if_printf((jj & 0x0001),"pio%d ",ii);
1067                         jj >>=1;
1068                 }
1069                 printf("\n");
1070         }
1071         else if (((min_std < 5) || (eqpt == CDROM)) && (val[PIO_MODE] & MODE) )
1072         {
1073                 for (ii = 0; ii <= val[PIO_MODE]>>8; ii++)
1074                         printf("pio%d ",ii);
1075                 printf("\n");
1076         }
1077         else
1078                 printf("unknown\n");
1079
1080         if (val[WHATS_VALID] & OK_W64_70)
1081         {
1082                 if (val[PIO_NO_FLOW] || val[PIO_FLOW])
1083                 {
1084                         printf("\t     Cycle time:");
1085                         if_printf(val[PIO_NO_FLOW]," no flow control=%uns", val[PIO_NO_FLOW]);
1086                         if_printf(val[PIO_FLOW],"  IORDY flow control=%uns", val[PIO_FLOW]);
1087                         printf("\n");
1088                 }
1089         }
1090
1091         if ((val[CMDS_SUPP_1] & VALID) == VALID_VAL)
1092         {
1093                 printf("Commands/features:\n\tEnabled\tSupported:\n");
1094                 jj = val[CMDS_SUPP_0];
1095                 kk = val[CMDS_EN_0];
1096                 for (ii = 0; ii < NUM_CMD_FEAT_STR; ii++)
1097                 {
1098                         if ((jj & 0x8000) && (*cmd_feat_str[ii] != '\0'))
1099                         {
1100                                 if_else_printf((kk & 0x8000),"\t   *","\t");
1101                                 printf("\t%s\n",cmd_feat_str[ii]);
1102                         }
1103                         jj <<=1; kk<<=1;
1104                         if (ii%16 == 15)
1105                         {
1106                                 jj = val[CMDS_SUPP_0+1+(ii/16)];
1107                                 kk = val[CMDS_EN_0+1+(ii/16)];
1108                         }
1109                         if (ii == 31)
1110                         {
1111                                 if ((val[CMDS_SUPP_2] & VALID) != VALID_VAL)
1112                                         ii +=16;
1113                         }
1114                 }
1115         }
1116         if_printf(((val[RM_STAT] & RM_STAT_BITS) == RM_STAT_SUP),
1117                                 "\tRemovable Media Status Notification feature set supported\n");
1118
1119
1120         /* security */
1121         if ((eqpt != CDROM) && (like_std > 3) &&
1122            (val[SECU_STATUS] || val[ERASE_TIME] || val[ENH_ERASE_TIME]))
1123         {
1124                 printf("Security: \n");
1125                 if_printf((val[PSWD_CODE] && (val[PSWD_CODE] != NOVAL_1)),
1126                                         "\tMaster password revision code = %u\n",val[PSWD_CODE]);
1127                 jj = val[SECU_STATUS];
1128                 if (jj)
1129                 {
1130                         for (ii = 0; ii < NUM_SECU_STR; ii++)
1131                         {
1132                                 if_else_printf((!(jj & 0x0001)),"\tnot\t%s\n", "\t\t%s\n", secu_str[ii]);
1133                                 jj >>=1;
1134                         }
1135                         if (val[SECU_STATUS] & SECU_ENABLED)
1136                         {
1137                                 printf("\tSecurity level ");
1138                                 if_else_printf((val[SECU_STATUS] & SECU_LEVEL),"maximum\n","high\n");
1139                         }
1140                 }
1141                 jj =  val[ERASE_TIME]     & ERASE_BITS;
1142                 kk =  val[ENH_ERASE_TIME] & ERASE_BITS;
1143                 if (jj || kk)
1144                 {
1145                         printf("\t");
1146                         if_printf(jj,"%umin for SECURITY ERASE UNIT. ", jj==ERASE_BITS ? 508 : jj<<1);
1147                         if_printf(kk,"%umin for ENHANCED SECURITY ERASE UNIT.", kk==ERASE_BITS ? 508 : kk<<1);
1148                         printf("\n");
1149                 }
1150         }
1151
1152         /* reset result */
1153         if ((val[HWRST_RSLT] & VALID) == VALID_VAL)
1154         {
1155                 printf("HW reset results:\n");
1156                 if_else_printf((val[HWRST_RSLT] & CBLID),"\tCBLID- above Vih\n","\tCBLID- below Vih\n");
1157
1158                 if (val[HWRST_RSLT] & RST0)
1159                 {
1160                         printf("\tDevice num = 0");
1161                         jj = val[HWRST_RSLT];
1162                 }
1163                 else
1164                 {
1165                         printf("\tDevice num = 1");
1166                         jj = val[HWRST_RSLT] >> 8;
1167                 }
1168
1169                 if ((jj & DEV_DET) == JUMPER_VAL)
1170                         printf(" determined by the jumper");
1171                 else if ((jj & DEV_DET) == CSEL_VAL)
1172                         printf(" determined by CSEL");
1173                 printf("\n");
1174         }
1175
1176         /* more stuff from std 5 */
1177         if ((like_std > 4) && (eqpt != CDROM))
1178         {
1179                 if (val[CFA_PWR_MODE] & VALID_W160)
1180                 {
1181                         printf("CFA power mode 1:\n\t");
1182                         if_else_printf((val[CFA_PWR_MODE] & PWR_MODE_OFF),"disabled","enabled");
1183
1184                         if_printf((val[CFA_PWR_MODE] & PWR_MODE_REQ)," and required by some commands");
1185                         printf("\n");
1186
1187                         if_printf((val[CFA_PWR_MODE] & MAX_AMPS),"\tMaximum current = %uma\n",val[CFA_PWR_MODE] & MAX_AMPS);
1188                 }
1189                 if ((val[INTEGRITY] & SIG) == SIG_VAL)
1190                 {
1191                         printf("Checksum: ");
1192                         if_printf(chksum,"in");
1193                         printf("correct\n");
1194                 }
1195         }
1196
1197         exit(0);
1198 }
1199 #endif
1200
1201 static int verbose, get_identity, get_geom, noisy = 1, quiet;
1202 static int flagcount, do_flush;
1203 static int do_ctimings, do_timings;
1204
1205 static unsigned long set_readahead, get_readahead, Xreadahead;
1206 static unsigned long set_readonly, get_readonly, readonly;
1207 static unsigned long set_unmask, get_unmask, unmask;
1208 static unsigned long set_mult, get_mult, mult;
1209 #ifdef CONFIG_FEATURE_HDPARM_HDIO_GETSET_DMA
1210 static unsigned long set_dma, get_dma, dma;
1211 #endif
1212 static unsigned long set_dma_q, get_dma_q, dma_q;
1213 static unsigned long set_nowerr, get_nowerr, nowerr;
1214 static unsigned long set_keep, get_keep, keep;
1215 static unsigned long set_io32bit, get_io32bit, io32bit;
1216 static unsigned long set_piomode, noisy_piomode;
1217 static int piomode;
1218 #ifdef HDIO_DRIVE_CMD
1219 static unsigned long set_dkeep, get_dkeep, dkeep;
1220 static unsigned long set_standby, get_standby, standby_requested;
1221 static unsigned long set_xfermode, get_xfermode;
1222 static int xfermode_requested;
1223 static unsigned long set_lookahead, get_lookahead, lookahead;
1224 static unsigned long set_prefetch, get_prefetch, prefetch;
1225 static unsigned long set_defects, get_defects, defects;
1226 static unsigned long set_wcache, get_wcache, wcache;
1227 static unsigned long set_doorlock, get_doorlock, doorlock;
1228 static unsigned long set_seagate, get_seagate;
1229 static unsigned long set_standbynow, get_standbynow;
1230 static unsigned long set_sleepnow, get_sleepnow;
1231 static unsigned long get_powermode;
1232 static unsigned long set_apmmode, get_apmmode, apmmode;
1233 #endif
1234 #ifdef CONFIG_FEATURE_HDPARM_GET_IDENTITY
1235 static int get_IDentity;
1236 #endif
1237 #ifdef CONFIG_FEATURE_HDPARM_HDIO_UNREGISTER_HWIF
1238 static int      unregister_hwif;
1239 static int      hwif;
1240 #endif
1241 #ifdef CONFIG_FEATURE_HDPARM_HDIO_SCAN_HWIF
1242 static int      scan_hwif;
1243 static int      hwif_data;
1244 static int      hwif_ctrl;
1245 static int      hwif_irq;
1246 #endif
1247 #ifdef CONFIG_FEATURE_HDPARM_HDIO_TRISTATE_HWIF
1248 static int      set_busstate, get_busstate, busstate;
1249 #endif
1250 static int      reread_partn;
1251
1252 #ifdef CONFIG_FEATURE_HDPARM_HDIO_DRIVE_RESET
1253 static int      perform_reset;
1254 #endif /* CONFIG_FEATURE_HDPARM_HDIO_DRIVE_RESET */
1255 #ifdef CONFIG_FEATURE_HDPARM_HDIO_TRISTATE_HWIF
1256 static int      perform_tristate,       tristate;
1257 #endif /* CONFIG_FEATURE_HDPARM_HDIO_TRISTATE_HWIF */
1258
1259 // Historically, if there was no HDIO_OBSOLETE_IDENTITY, then
1260 // then the HDIO_GET_IDENTITY only returned 142 bytes.
1261 // Otherwise, HDIO_OBSOLETE_IDENTITY returns 142 bytes,
1262 // and HDIO_GET_IDENTITY returns 512 bytes.  But the latest
1263 // 2.5.xx kernels no longer define HDIO_OBSOLETE_IDENTITY
1264 // (which they should, but they should just return -EINVAL).
1265 //
1266 // So.. we must now assume that HDIO_GET_IDENTITY returns 512 bytes.
1267 // On a really old system, it will not, and we will be confused.
1268 // Too bad, really.
1269
1270 #ifdef CONFIG_FEATURE_HDPARM_GET_IDENTITY
1271 static const char * const cfg_str[] =
1272 {       "",          " HardSect",   " SoftSect",  " NotMFM",
1273         " HdSw>15uSec", " SpinMotCtl", " Fixed",     " Removeable",
1274         " DTR<=5Mbs",   " DTR>5Mbs",   " DTR>10Mbs", " RotSpdTol>.5%",
1275         " dStbOff",     " TrkOff",     " FmtGapReq", " nonMagnetic"
1276 };
1277
1278 static const char * const BuffType[] = {"unknown", "1Sect", "DualPort", "DualPortCache"};
1279
1280 static void dump_identity(const struct hd_driveid *id)
1281 {
1282         int i;
1283         char pmodes[64], dmodes[128], umodes[128];
1284         const unsigned short int *id_regs= (const void*) id;
1285         unsigned long capacity;
1286
1287         pmodes[0] = dmodes[0] = umodes[0] = '\0';
1288
1289         printf("\n Model=%.40s, FwRev=%.8s, SerialNo=%.20s\n Config={",
1290                                 id->model, id->fw_rev, id->serial_no);
1291         for (i=0; i<=15; i++)
1292                 if_printf((id->config & (1<<i)),"%s", cfg_str[i]);
1293
1294         printf(" }\n RawCHS=%u/%u/%u, TrkSize=%u, SectSize=%u, ECCbytes=%u\n",
1295                                 id->cyls, id->heads, id->sectors, id->track_bytes,
1296                                 id->sector_bytes, id->ecc_bytes);
1297
1298         if (id->buf_type > 3)
1299                 printf("%s%u", " BuffType=", id->buf_type);
1300         else
1301                 printf("%s%s", " BuffType=", BuffType[id->buf_type]);
1302
1303         printf(", BuffSize=%ukB, MaxMultSect=%u", id->buf_size/2, id->max_multsect);
1304         if (id->max_multsect)
1305         {
1306                 printf(", MultSect=");
1307                 if (!(id->multsect_valid&1))
1308                         printf("?%u?", id->multsect);
1309                 else if (id->multsect)
1310                         printf("%u", id->multsect);
1311                 else
1312                         printf("off");
1313         }
1314         printf("\n");
1315         if (id->tPIO <= 5)
1316         {
1317                 strcat(pmodes, "pio0 ");
1318                 if_strcat((id->tPIO >= 1), pmodes, "pio1 ");
1319                 if_strcat((id->tPIO >= 2), pmodes, "pio2 ");
1320
1321         }
1322         if_printf((!(id->field_valid&1))," (maybe):");
1323 #if __BYTE_ORDER == __BIG_ENDIAN
1324         capacity = (id->cur_capacity0 << 16) | id->cur_capacity1;
1325 #else
1326         capacity = (id->cur_capacity1 << 16) | id->cur_capacity0;
1327 #endif
1328         printf(" CurCHS=%u/%u/%u, CurSects=%lu, LBA=%s",id->cur_cyls, id->cur_heads,
1329                                                                                                         id->cur_sectors, capacity ,
1330                                                                                         ((id->capability&2)==0)?"no":"yes");
1331
1332         if_printf((id->capability&2),", LBAsects=%u", id->lba_capacity);
1333
1334         if (id->capability&1)
1335         {
1336                 if (id->dma_1word | id->dma_mword)
1337                 {
1338                         if_strcat((id->dma_1word & 0x100),      dmodes, "*");
1339                         if_strcat((id->dma_1word & 1),          dmodes, "sdma0 ");
1340                         if_strcat((id->dma_1word & 0x200),      dmodes, "*");
1341                         if_strcat((id->dma_1word & 2),          dmodes, "sdma1 ");
1342                         if_strcat((id->dma_1word & 0x400),      dmodes, "*");
1343                         if_strcat((id->dma_1word & 4),          dmodes, "sdma2 ");
1344                         if_strcat((id->dma_1word & 0xf800),     dmodes, "*");
1345                         if_strcat((id->dma_1word & 0xf8),       dmodes, "sdma? ");
1346                         if_strcat((id->dma_mword & 0x100),      dmodes, "*");
1347                         if_strcat((id->dma_mword & 1),          dmodes, "mdma0 ");
1348                         if_strcat((id->dma_mword & 0x200),      dmodes, "*");
1349                         if_strcat((id->dma_mword & 2),          dmodes, "mdma1 ");
1350                         if_strcat((id->dma_mword & 0x400),      dmodes, "*");
1351                         if_strcat((id->dma_mword & 4),          dmodes, "mdma2 ");
1352                         if_strcat((id->dma_mword & 0xf800),     dmodes, "*");
1353                         if_strcat((id->dma_mword & 0xf8),       dmodes, "mdma? ");
1354                 }
1355         }
1356         printf("\n IORDY=");
1357         if (id->capability&8)
1358                 printf((id->capability&4) ? "on/off" : "yes");
1359         else
1360                 printf("no");
1361
1362         if ((id->capability&8) || (id->field_valid&2))
1363         {
1364                 if (id->field_valid&2)
1365                 {
1366                         printf(", tPIO={min:%u,w/IORDY:%u}", id->eide_pio, id->eide_pio_iordy);
1367                         if_strcat((id->eide_pio_modes & 1), pmodes, "pio3 ");
1368                         if_strcat((id->eide_pio_modes & 2), pmodes, "pio4 ");
1369                         if_strcat((id->eide_pio_modes &~3), pmodes, "pio? ");
1370                 }
1371                 if (id->field_valid&4)
1372                 {
1373                         if_strcat((id->dma_ultra & 0x100),umodes,"*");
1374                         if_strcat((id->dma_ultra & 0x001),umodes,"udma0 ");
1375                         if_strcat((id->dma_ultra & 0x200),umodes,"*");
1376                         if_strcat((id->dma_ultra & 0x002),umodes,"udma1 ");
1377                         if_strcat((id->dma_ultra & 0x400),umodes,"*");
1378                         if_strcat((id->dma_ultra & 0x004),umodes,"udma2 ");
1379 #ifdef __NEW_HD_DRIVE_ID
1380                         if (id->hw_config & 0x2000)
1381                         {
1382 #else /* !__NEW_HD_DRIVE_ID */
1383                         if (id->word93 & 0x2000)
1384                         {
1385 #endif /* __NEW_HD_DRIVE_ID */
1386                                 if_strcat((id->dma_ultra & 0x0800),umodes,"*");
1387                                 if_strcat((id->dma_ultra & 0x0008),umodes,"udma3 ");
1388                                 if_strcat((id->dma_ultra & 0x1000),umodes,"*");
1389                                 if_strcat((id->dma_ultra & 0x0010),umodes,"udma4 ");
1390                                 if_strcat((id->dma_ultra & 0x2000),umodes,"*");
1391                                 if_strcat((id->dma_ultra & 0x0020),umodes,"udma5 ");
1392                                 if_strcat((id->dma_ultra & 0x4000),umodes,"*");
1393                                 if_strcat((id->dma_ultra & 0x0040),umodes,"udma6 ");
1394                                 if_strcat((id->dma_ultra & 0x8000),umodes,"*");
1395                                 if_strcat((id->dma_ultra & 0x0080),umodes,"udma7 ");
1396                         }
1397                 }
1398         }
1399         if_printf(((id->capability&1) && (id->field_valid&2)),
1400                                 ", tDMA={min:%u,rec:%u}", id->eide_dma_min, id->eide_dma_time);
1401         printf("\n PIO modes:  %s", pmodes);
1402         if_printf((*dmodes),"\n DMA modes:  %s", dmodes);
1403         if_printf((*umodes),"\n UDMA modes: %s", umodes);
1404
1405         printf("\n AdvancedPM=%s",((id_regs[83]&8)==0)?"no":"yes");
1406         if (id_regs[83] & 8)
1407         {
1408                 if (!(id_regs[86]&8))
1409                         printf(": disabled (255)");
1410                 else if ((id_regs[91]&0xFF00)!=0x4000)
1411                         printf(": unknown setting");
1412                 else
1413                         printf(": mode=0x%02X (%u)",id_regs[91]&0xFF,id_regs[91]&0xFF);
1414         }
1415         if_printf( (id_regs[82]&0x20)," WriteCache=%s",(id_regs[85]&0x20) ? "enabled" : "disabled");
1416 #ifdef __NEW_HD_DRIVE_ID
1417         if ((id->minor_rev_num && id->minor_rev_num <= 31) || (id->major_rev_num && id->minor_rev_num <= 31))
1418         {
1419                 printf("\n Drive conforms to: ");
1420                 if_else_printf((id->minor_rev_num <= 31),"%s: ","unknown: ", minor_str[id->minor_rev_num]);
1421                 if (id->major_rev_num != 0x0000 &&  /* NOVAL_0 */
1422                     id->major_rev_num != 0xFFFF) {  /* NOVAL_1 */
1423                         for (i=0; i <= 15; i++)
1424                                 if_printf((id->major_rev_num & (1<<i))," ATA/ATAPI-%u", i);
1425                 }
1426         }
1427 #endif /* __NEW_HD_DRIVE_ID */
1428         printf("\n\n * signifies the current active mode\n\n");
1429 }
1430 #endif
1431
1432 static void flush_buffer_cache(int fd)
1433 {
1434         fsync(fd);                              /* flush buffers */
1435         bb_ioctl(fd, BLKFLSBUF, NULL,"BLKFLSBUF" ) ;/* do it again, big time */
1436 #ifdef HDIO_DRIVE_CMD
1437         sleep(1);
1438         if (ioctl(fd, HDIO_DRIVE_CMD, NULL) && errno != EINVAL) /* await completion */
1439                 bb_perror_msg("HDIO_DRIVE_CMD");
1440 #endif
1441 }
1442
1443 static int seek_to_zero(int fd)
1444 {
1445         if (lseek(fd, (off_t) 0, SEEK_SET))
1446                 return 1;
1447         return 0;
1448 }
1449
1450 static int read_big_block(int fd, char *buf)
1451 {
1452         const char *string;
1453         int i, rc;
1454         if ((rc = read(fd, buf, TIMING_BUF_BYTES)) != TIMING_BUF_BYTES)
1455         {
1456                 switch(rc)
1457                 {
1458                         case -1:
1459                                 string = "read()";
1460                                 break;
1461                         case  0:
1462                                 string = "read() hit EOF - device too small";
1463                                 break;
1464                         default:
1465                                 string = "read(%u) returned %u bytes";
1466                 }
1467                 bb_error_msg(string, TIMING_BUF_BYTES, rc);
1468                 return 1;
1469         }
1470
1471         /* access all sectors of buf to ensure the read fully completed */
1472         for (i = 0; i < TIMING_BUF_BYTES; i += 512)
1473                 buf[i] &= 1;
1474         return 0;
1475 }
1476
1477 static double correction;
1478
1479 static void do_time(int flag, int fd)
1480 /*
1481         flag = 0 time_cache
1482         flag = 1 time_device
1483 */
1484 {
1485         int i;
1486         char *buf;
1487         double elapsed;
1488         struct itimerval e1, e2;
1489         int shmid;
1490         int timing_MB = TIMING_MB;
1491
1492         if ((shmid = shmget(IPC_PRIVATE, TIMING_BUF_BYTES, 0600)) == -1)
1493         {
1494                 bb_error_msg(bb_msg_shared_mem,"allocate"); /*"could not allocate sharedmem buf"*/
1495                 return;
1496         }
1497         if (shmctl(shmid, SHM_LOCK, NULL) == -1)
1498         {
1499                 bb_error_msg(bb_msg_shared_mem,"lock"); /*"could not lock sharedmem buf"*/
1500                 (void) shmctl(shmid, IPC_RMID, NULL);
1501                 return;
1502         }
1503         if ((buf = shmat(shmid, (char *) 0, 0)) == (char *) -1)
1504         {
1505                 bb_error_msg(bb_msg_shared_mem,"attach"); /*"could not attach sharedmem buf"*/
1506                 (void) shmctl(shmid, IPC_RMID, NULL);
1507                 return;
1508         }
1509         if (shmctl(shmid, IPC_RMID, NULL) == -1)
1510                 bb_error_msg("shmctl(,IPC_RMID,)");
1511
1512         /* Clear out the device request queues & give them time to complete */
1513         sync_and_sleep(3);
1514
1515         if (flag  == 0) /* Time cache */
1516         {
1517                 /* Calculate a correction factor for the basic
1518                 * overhead of doing a read() from the buffer cache.
1519                 * To do this, we read the data once to "cache it" and
1520                 * to force full preallocation of our timing buffer,
1521                 * and then we re-read it 10 times while timing it.
1522                 *
1523                 * getitimer() is used rather than gettimeofday() because
1524                 * it is much more consistent (on my machine, at least).
1525                 */
1526                 setitimer(ITIMER_REAL, &(struct itimerval){{1000,0},{1000,0}}, NULL);
1527                 if (seek_to_zero(fd))
1528                         return;
1529                 if (read_big_block(fd, buf))
1530                         return;
1531                 printf(" Timing buffer-cache reads:   ");
1532                 fflush(stdout);
1533
1534                 /* Clear out the device request queues & give them time to complete */
1535                 sync_and_sleep(1);
1536
1537                 /* Time re-reading from the buffer-cache */
1538                 getitimer(ITIMER_REAL, &e1);
1539                 for (i = (BUFCACHE_FACTOR * TIMING_BUF_COUNT) ; i > 0; --i)
1540                 {
1541                         if (seek_to_zero(fd))
1542                                 goto quit;
1543                         if (read_big_block(fd, buf))
1544                                 goto quit;
1545                 }
1546                 getitimer(ITIMER_REAL, &e2);
1547                 correction = (e1.it_value.tv_sec - e2.it_value.tv_sec) + ((e1.it_value.tv_usec - e2.it_value.tv_usec) / 1000000.0);
1548
1549                 /* Now remove the lseek() from the correction factor */
1550                 getitimer(ITIMER_REAL, &e1);
1551                 for (i = (BUFCACHE_FACTOR * TIMING_BUF_COUNT) ; i > 0; --i)
1552                 {
1553                         if (seek_to_zero(fd))
1554                                 goto quit;
1555                 }
1556                 getitimer(ITIMER_REAL, &e2);
1557                 correction -= (e1.it_value.tv_sec - e2.it_value.tv_sec)
1558                 + ((e1.it_value.tv_usec - e2.it_value.tv_usec) / 1000000.0);
1559
1560                 if ((BUFCACHE_FACTOR * timing_MB) >= correction)  /* more than 1MB/s */
1561                         printf("%2d MB in %5.2f seconds =%6.2f MB/sec\n",
1562                                 (BUFCACHE_FACTOR * timing_MB),  correction,
1563                                 (BUFCACHE_FACTOR * timing_MB) / correction);
1564                 else
1565                         printf("%2d MB in %5.2f seconds =%6.2f kB/sec\n",
1566                                 (BUFCACHE_FACTOR * timing_MB),  correction,
1567                                 (BUFCACHE_FACTOR * timing_MB) / correction * 1024);
1568                 correction /= BUFCACHE_FACTOR;
1569
1570                 flush_buffer_cache(fd);
1571                 sleep(1);
1572         }
1573         else /* Time device */
1574         {
1575                 printf(" Timing buffered disk reads:  ");
1576                 fflush(stdout);
1577
1578                 /*
1579                 * getitimer() is used rather than gettimeofday() because
1580                 * it is much more consistent (on my machine, at least).
1581                 */
1582                 setitimer(ITIMER_REAL, &(struct itimerval){{1000,0},{1000,0}}, NULL);
1583
1584                 /* Now do the timings for real */
1585                 getitimer(ITIMER_REAL, &e1);
1586                 for (i = TIMING_BUF_COUNT; i > 0; --i)
1587                 {
1588                         if (read_big_block(fd, buf))
1589                                 goto quit;
1590                 }
1591                 getitimer(ITIMER_REAL, &e2);
1592
1593                 elapsed =       (e1.it_value.tv_sec - e2.it_value.tv_sec) + ((e1.it_value.tv_usec - e2.it_value.tv_usec) / 1000000.0);
1594
1595                 if (timing_MB >= elapsed)  /* more than 1MB/s */
1596                         printf("%2d MB in %5.2f seconds =%6.2f MB/sec\n",timing_MB, elapsed, timing_MB / elapsed);
1597                 else
1598                         printf("%2d MB in %5.2f seconds =%6.2f kB/sec\n",timing_MB, elapsed, timing_MB / elapsed * 1024);
1599
1600                 /*"Hmm.. suspicious results: probably not enough free memory for a proper test.");*/
1601                 if (elapsed <= (correction * 2))
1602                                         bb_error_msg(bb_msg_memory_exhausted);
1603
1604 #if 0  /* the "estimate" is just plain wrong for many systems.. */
1605                 else if (correction != 0.0) {
1606                         printf(" Estimating raw driver speed: ");
1607                         elapsed -= correction;
1608                         if (timing_MB >= elapsed)  /* more than 1MB/s */
1609                                 printf("%2d MB in %5.2f seconds =%6.2f MB/sec\n",
1610                                         timing_MB, elapsed, timing_MB / elapsed);
1611                         else
1612                                 printf("%2d MB in %5.2f seconds =%6.2f kB/sec\n",
1613                                         timing_MB, elapsed, timing_MB / elapsed * 1024);
1614                 }
1615 #endif
1616         }
1617 quit:
1618         if (-1 == shmdt(buf))
1619                 bb_error_msg(bb_msg_shared_mem,"detach"); /*"could not detach sharedmem buf"*/
1620 }
1621
1622 static void on_off (unsigned int value)
1623 {
1624         printf(value ? " (on)\n" : " (off)\n");
1625 }
1626
1627 #ifdef CONFIG_FEATURE_HDPARM_HDIO_TRISTATE_HWIF
1628 static void bus_state_value(unsigned int value)
1629 {
1630         const char *string;
1631
1632         switch (value)
1633         {
1634                 case BUSSTATE_ON:
1635                         string = " (on)\n";
1636                         break;
1637                 case BUSSTATE_OFF:
1638                         string = " (off)\n";
1639                         break;
1640                 case BUSSTATE_TRISTATE:
1641                         string = " (tristate)\n";
1642                         break;
1643                 default:
1644                         string = " (unknown: %d)\n";
1645                         break;
1646         }
1647         printf(string, value);
1648 }
1649 #endif
1650
1651 #ifdef HDIO_DRIVE_CMD
1652 static void interpret_standby(unsigned int standby)
1653 {
1654         printf(" (");
1655         switch(standby)
1656         {
1657                 case 0:
1658                         printf("off");
1659                         break;
1660                 case 252:
1661                         printf("21 minutes");
1662                         break;
1663                 case 253:
1664                         printf("vendor-specific");
1665                         break;
1666                 case 254:
1667                         printf("?reserved");
1668                         break;
1669                 case 255:
1670                         printf("21 minutes + 15 seconds");
1671                         break;
1672                 default:
1673                         if (standby <= 240)
1674                         {
1675                                 unsigned int secs = standby * 5;
1676                                 unsigned int mins = secs / 60;
1677                                 secs %= 60;
1678                                 if_printf(mins,"%u minutes", mins);
1679                                 if_printf((mins && secs)," + ");
1680                                 if_printf(secs,"%u seconds", secs);
1681                         }
1682                         else if (standby <= 251)
1683                         {
1684                                 unsigned int mins = (standby - 240) * 30;
1685                                 unsigned int hrs  = mins / 60;
1686                                 mins %= 60;
1687                                 if_printf(hrs,"%u hours", hrs);
1688                                 if_printf((hrs && mins)," + ");
1689                                 if_printf(mins,"%u minutes", mins);
1690                         }
1691                         else
1692                                 printf("illegal value");
1693                         break;
1694         }
1695         printf(")\n");
1696 }
1697
1698 struct xfermode_entry {
1699     int val;
1700     const char *name;
1701 };
1702
1703 static const struct xfermode_entry xfermode_table[] = {
1704     { 8,    "pio0" },
1705     { 9,    "pio1" },
1706     { 10,   "pio2" },
1707     { 11,   "pio3" },
1708     { 12,   "pio4" },
1709     { 13,   "pio5" },
1710     { 14,   "pio6" },
1711     { 15,   "pio7" },
1712     { 16,   "sdma0" },
1713     { 17,   "sdma1" },
1714     { 18,   "sdma2" },
1715     { 19,   "sdma3" },
1716     { 20,   "sdma4" },
1717     { 21,   "sdma5" },
1718     { 22,   "sdma6" },
1719     { 23,   "sdma7" },
1720     { 32,   "mdma0" },
1721     { 33,   "mdma1" },
1722     { 34,   "mdma2" },
1723     { 35,   "mdma3" },
1724     { 36,   "mdma4" },
1725     { 37,   "mdma5" },
1726     { 38,   "mdma6" },
1727     { 39,   "mdma7" },
1728     { 64,   "udma0" },
1729     { 65,   "udma1" },
1730     { 66,   "udma2" },
1731     { 67,   "udma3" },
1732     { 68,   "udma4" },
1733     { 69,   "udma5" },
1734     { 70,   "udma6" },
1735     { 71,   "udma7" },
1736     { 0, NULL }
1737 };
1738
1739 static int translate_xfermode(char * name)
1740 {
1741         const struct xfermode_entry *tmp;
1742         char *endptr;
1743         int val = -1;
1744
1745
1746         for (tmp = xfermode_table; tmp->name != NULL; ++tmp)
1747         {
1748                 if (!strcmp(name, tmp->name))
1749                         return tmp->val;
1750
1751         }
1752
1753         val = strtol(name, &endptr, 10);
1754         if (*endptr == '\0')
1755                 return val;
1756
1757         return -1;
1758 }
1759
1760 static void interpret_xfermode(unsigned int xfermode)
1761 {
1762         printf(" (");
1763         switch(xfermode) {
1764                 case 0:
1765                         printf("default PIO mode");
1766                         break;
1767                 case 1:
1768                         printf("default PIO mode, disable IORDY");
1769                         break;
1770                 case 8:
1771                 case 9:
1772                 case 10:
1773                 case 11:
1774                 case 12:
1775                 case 13:
1776                 case 14:
1777                 case 15:
1778                         printf("PIO flow control mode%u", xfermode-8);
1779                         break;
1780                 case 16:
1781                 case 17:
1782                 case 18:
1783                 case 19:
1784                 case 20:
1785                 case 21:
1786                 case 22:
1787                 case 23:
1788                         printf("singleword DMA mode%u", xfermode-16);
1789                         break;
1790                 case 32:
1791                 case 33:
1792                 case 34:
1793                 case 35:
1794                 case 36:
1795                 case 37:
1796                 case 38:
1797                 case 39:
1798                         printf("multiword DMA mode%u", xfermode-32);
1799                         break;
1800                 case 64:
1801                 case 65:
1802                 case 66:
1803                 case 67:
1804                 case 68:
1805                 case 69:
1806                 case 70:
1807                 case 71:
1808                         printf("UltraDMA mode%u", xfermode-64);
1809                         break;
1810                 default:
1811                         printf("unknown, probably not valid");
1812                         break;
1813         }
1814         printf(")\n");
1815 }
1816 #endif /* HDIO_DRIVE_CMD */
1817
1818 static void process_dev(char *devname)
1819 {
1820         int fd;
1821         static long parm, multcount;
1822 #ifndef HDIO_DRIVE_CMD
1823         int force_operation = 0;
1824 #endif
1825         unsigned char args[4] = {WIN_SETFEATURES,0,0,0};
1826
1827         fd = bb_xopen(devname, O_RDONLY|O_NONBLOCK);
1828         if_printf(!quiet, "\n%s:\n", devname);
1829
1830         if (set_readahead)
1831         {
1832                 if_printf(get_readahead," setting fs readahead to %ld\n", Xreadahead);
1833                 bb_ioctl(fd, BLKRASET,(int *)Xreadahead,"BLKRASET");
1834         }
1835 #ifdef CONFIG_FEATURE_HDPARM_HDIO_UNREGISTER_HWIF
1836         if (unregister_hwif)
1837         {
1838                 printf(" attempting to unregister hwif#%u\n", hwif);
1839                 bb_ioctl(fd, HDIO_UNREGISTER_HWIF,(int *)(unsigned long)hwif,"HDIO_UNREGISTER_HWIF");
1840         }
1841 #endif
1842 #ifdef CONFIG_FEATURE_HDPARM_HDIO_SCAN_HWIF
1843         if (scan_hwif)
1844         {
1845                 printf(" attempting to scan hwif (0x%x, 0x%x, %u)\n", hwif_data, hwif_ctrl, hwif_irq);
1846                 args[0] = hwif_data;
1847                 args[1] = hwif_ctrl;
1848                 args[2] = hwif_irq;
1849                 bb_ioctl(fd, HDIO_SCAN_HWIF, args, "HDIO_SCAN_HWIF");
1850         }
1851 #endif
1852         if (set_piomode)
1853         {
1854                 if (noisy_piomode)
1855                 {
1856                         printf(" attempting to ");
1857                         if (piomode == 255)
1858                                 printf("auto-tune PIO mode\n");
1859                         else if (piomode < 100)
1860                                 printf("set PIO mode to %d\n", piomode);
1861                         else if (piomode < 200)
1862                                 printf("set MDMA mode to %d\n", (piomode-100));
1863                         else
1864                                 printf("set UDMA mode to %d\n", (piomode-200));
1865                 }
1866                 bb_ioctl(fd, HDIO_SET_PIO_MODE, (int *)(unsigned long)piomode, "HDIO_SET_PIO_MODE");
1867         }
1868         if (set_io32bit)
1869         {
1870                 if_printf(get_io32bit," setting 32-bit IO_support flag to %ld\n", io32bit);
1871                 bb_ioctl(fd, HDIO_SET_32BIT, (int *)io32bit, "HDIO_SET_32BIT");
1872         }
1873         if (set_mult)
1874         {
1875                 if_printf(get_mult, " setting multcount to %ld\n", mult);
1876                 if (ioctl(fd, HDIO_SET_MULTCOUNT, mult))
1877                         bb_perror_msg("HDIO_SET_MULTCOUNT");
1878 #ifndef HDIO_DRIVE_CMD
1879                 else
1880                         force_operation = 1;
1881 #endif
1882         }
1883         if (set_readonly)
1884         {
1885                 if_printf_on_off(get_readonly," setting readonly to %ld", readonly);
1886                 bb_ioctl(fd, BLKROSET, &readonly, "BLKROSET");
1887         }
1888         if (set_unmask)
1889         {
1890                 if_printf_on_off(get_unmask," setting unmaskirq to %ld", unmask);
1891                 bb_ioctl(fd, HDIO_SET_UNMASKINTR, (int *)unmask, "HDIO_SET_UNMASKINTR");
1892         }
1893 #ifdef CONFIG_FEATURE_HDPARM_HDIO_GETSET_DMA
1894         if (set_dma)
1895         {
1896                 if_printf_on_off(get_dma," setting using_dma to %ld", dma);
1897                 bb_ioctl(fd, HDIO_SET_DMA, (int *)dma, "HDIO_SET_DMA");
1898         }
1899 #endif /* CONFIG_FEATURE_HDPARM_HDIO_GETSET_DMA */
1900         if (set_dma_q)
1901         {
1902                 if_printf_on_off(get_dma_q," setting DMA queue_depth to %ld", dma_q);
1903                 bb_ioctl(fd, HDIO_SET_QDMA, (int *)dma_q, "HDIO_SET_QDMA");
1904         }
1905         if (set_nowerr)
1906         {
1907                 if_printf_on_off(get_nowerr," setting nowerr to %ld", nowerr);
1908                 bb_ioctl(fd, HDIO_SET_NOWERR, (int *)nowerr,"HDIO_SET_NOWERR");
1909         }
1910         if (set_keep)
1911         {
1912                 if_printf_on_off(get_keep," setting keep_settings to %ld", keep);
1913                 bb_ioctl(fd, HDIO_SET_KEEPSETTINGS, (int *)keep,"HDIO_SET_KEEPSETTINGS");
1914         }
1915 #ifdef HDIO_DRIVE_CMD
1916         if (set_doorlock)
1917         {
1918                 args[0] = doorlock ? WIN_DOORLOCK : WIN_DOORUNLOCK;
1919                 if_printf_on_off(get_doorlock," setting drive doorlock to %ld", doorlock);
1920                 bb_ioctl(fd, HDIO_DRIVE_CMD, &args,"HDIO_DRIVE_CMD(doorlock)");
1921         }
1922         if (set_dkeep)
1923         {
1924                 /* lock/unlock the drive's "feature" settings */
1925                 if_printf_on_off(get_dkeep," setting drive keep features to %ld", dkeep);
1926                 args[2] = dkeep ? 0x66 : 0xcc;
1927                 bb_ioctl(fd, HDIO_DRIVE_CMD, &args,"HDIO_DRIVE_CMD(keepsettings)");
1928         }
1929         if (set_defects)
1930         {
1931                 args[2] = defects ? 0x04 : 0x84;
1932                 if_printf(get_defects," setting drive defect-mgmt to %ld\n", defects);
1933                 bb_ioctl(fd, HDIO_DRIVE_CMD, &args,"HDIO_DRIVE_CMD(defectmgmt)");
1934         }
1935         if (set_prefetch)
1936         {
1937                 args[1] = prefetch;
1938                 args[2] = 0xab;
1939                 if_printf(get_prefetch," setting drive prefetch to %ld\n", prefetch);
1940                 bb_ioctl(fd, HDIO_DRIVE_CMD, &args, "HDIO_DRIVE_CMD(setprefetch)");
1941         }
1942         if (set_xfermode)
1943         {
1944                 args[1] = xfermode_requested;
1945                 args[2] = 3;
1946                 if (get_xfermode)
1947                 {
1948                         printf(" setting xfermode to %d", xfermode_requested);
1949                         interpret_xfermode(xfermode_requested);
1950                 }
1951                 bb_ioctl(fd, HDIO_DRIVE_CMD, &args,"HDIO_DRIVE_CMD(setxfermode)");
1952         }
1953         if (set_lookahead)
1954         {
1955                 args[2] = lookahead ? 0xaa : 0x55;
1956                 if_printf_on_off(get_lookahead," setting drive read-lookahead to %ld", lookahead);
1957                 bb_ioctl(fd, HDIO_DRIVE_CMD, &args, "HDIO_DRIVE_CMD(setreadahead)");
1958         }
1959         if (set_apmmode)
1960         {
1961                 apmmode=check_if_min_and_set_val(apmmode,1);
1962                 apmmode=check_if_maj_and_set_val(apmmode,255);
1963                 if_printf(get_apmmode," setting APM level to");
1964                 if (apmmode==255)
1965                 {
1966                         /* disable Advanced Power Management */
1967                         args[2] = 0x85; /* feature register */
1968                         if_printf(get_apmmode," disabled\n");
1969                 }
1970                 else
1971                 {
1972                         /* set Advanced Power Management mode */
1973                         args[2] = 0x05; /* feature register */
1974                         args[1] = apmmode; /* sector count register */
1975                         if_printf(get_apmmode," 0x%02lX (%ld)\n",apmmode,apmmode);
1976                 }
1977                 bb_ioctl(fd, HDIO_DRIVE_CMD, &args,"HDIO_DRIVE_CMD");
1978         }
1979         if (set_wcache)
1980         {
1981 #ifdef DO_FLUSHCACHE
1982 #ifndef WIN_FLUSHCACHE
1983 #define WIN_FLUSHCACHE 0xe7
1984 #endif
1985                 static unsigned char flushcache[4] = {WIN_FLUSHCACHE,0,0,0};
1986 #endif /* DO_FLUSHCACHE */
1987                 args[2] = wcache ? 0x02 : 0x82;
1988                 if_printf_on_off(get_wcache," setting drive write-caching to %ld", wcache);
1989 #ifdef DO_FLUSHCACHE
1990                 if (!wcache)
1991                         bb_ioctl(fd, HDIO_DRIVE_CMD, &flushcache, "HDIO_DRIVE_CMD(flushcache)");
1992 #endif /* DO_FLUSHCACHE */
1993                 bb_ioctl(fd, HDIO_DRIVE_CMD, &args, "HDIO_DRIVE_CMD(setcache)");
1994 #ifdef DO_FLUSHCACHE
1995                 if (!wcache)
1996                         bb_ioctl(fd, HDIO_DRIVE_CMD, &flushcache, "HDIO_DRIVE_CMD(flushcache)");
1997 #endif /* DO_FLUSHCACHE */
1998         }
1999         if (set_standbynow)
2000         {
2001 #ifndef WIN_STANDBYNOW1
2002 #define WIN_STANDBYNOW1 0xE0
2003 #endif
2004 #ifndef WIN_STANDBYNOW2
2005 #define WIN_STANDBYNOW2 0x94
2006 #endif
2007                 if_printf(get_standbynow," issuing standby command\n");
2008                 args[0] = WIN_STANDBYNOW1;
2009                 bb_ioctl_alt(fd, HDIO_DRIVE_CMD, args, WIN_STANDBYNOW2, "HDIO_DRIVE_CMD(standby)");
2010         }
2011         if (set_sleepnow)
2012         {
2013 #ifndef WIN_SLEEPNOW1
2014 #define WIN_SLEEPNOW1 0xE6
2015 #endif
2016 #ifndef WIN_SLEEPNOW2
2017 #define WIN_SLEEPNOW2 0x99
2018 #endif
2019                 if_printf(get_sleepnow," issuing sleep command\n");
2020                 args[0] = WIN_SLEEPNOW1;
2021                 bb_ioctl_alt(fd, HDIO_DRIVE_CMD, args, WIN_SLEEPNOW2, "HDIO_DRIVE_CMD(sleep)");
2022         }
2023         if (set_seagate)
2024         {
2025                 args[0] = 0xfb;
2026                 if_printf(get_seagate," disabling Seagate auto powersaving mode\n");
2027                 bb_ioctl(fd, HDIO_DRIVE_CMD, &args, "HDIO_DRIVE_CMD(seagatepwrsave)");
2028         }
2029         if (set_standby)
2030         {
2031                 args[0] = WIN_SETIDLE1;
2032                 args[1] = standby_requested;
2033                 if (get_standby)
2034                 {
2035                         printf(" setting standby to %lu", standby_requested);
2036                         interpret_standby(standby_requested);
2037                 }
2038                 bb_ioctl(fd, HDIO_DRIVE_CMD, &args, "HDIO_DRIVE_CMD(setidle1)");
2039         }
2040 #else   /* HDIO_DRIVE_CMD */
2041         if (force_operation)
2042         {
2043                 char buf[512];
2044                 flush_buffer_cache(fd);
2045                 if (-1 == read(fd, buf, sizeof(buf)))
2046                         bb_error_msg("access failed");
2047         }
2048 #endif  /* HDIO_DRIVE_CMD */
2049
2050         if (!flagcount)
2051                 verbose = 1;
2052
2053         if (verbose || get_mult || get_identity)
2054         {
2055                 multcount = -1;
2056                 if (ioctl(fd, HDIO_GET_MULTCOUNT, &multcount))
2057                 {
2058                         if (verbose || get_mult)
2059                                 bb_perror_msg("HDIO_GET_MULTCOUNT");
2060                 }
2061                 else if (verbose | get_mult)
2062                 {
2063                         printf(" multcount    = %2ld", multcount);
2064                         on_off(multcount);
2065                 }
2066         }
2067         if (verbose || get_io32bit)
2068         {
2069                 if (!bb_ioctl(fd, HDIO_GET_32BIT, &parm, "HDIO_GET_32BIT"))
2070                 {
2071                         printf(" IO_support   =%3ld (", parm);
2072                         switch (parm)
2073                         {
2074                                 case 0:
2075                                         printf("default ");
2076                                 case 2:
2077                                         printf("16-bit)\n");
2078                                         break;
2079                                 case 1:
2080                                         printf("32-bit)\n");
2081                                         break;
2082                                 case 3:
2083                                         printf("32-bit w/sync)\n");
2084                                         break;
2085                                 case 8:
2086                                         printf("Request-Queue-Bypass)\n");
2087                                         break;
2088                                 default:
2089                                         printf("\?\?\?)\n");
2090                                 /*esac*/
2091                         }
2092                 }
2093         }
2094         if (verbose || get_unmask)
2095         {
2096                 bb_ioctl_on_off(fd, HDIO_GET_UNMASKINTR,(unsigned long *)parm,
2097                                                 "HDIO_GET_UNMASKINTR"," unmaskirq    = %2ld");
2098         }
2099
2100
2101 #ifdef CONFIG_FEATURE_HDPARM_HDIO_GETSET_DMA
2102         if (verbose || get_dma) {
2103                 if (!bb_ioctl(fd, HDIO_GET_DMA, &parm, "HDIO_GET_DMA"))
2104                 {
2105                         printf(" using_dma    = %2ld", parm);
2106                         if (parm == 8)
2107                                 printf(" (DMA-Assisted-PIO)\n");
2108                         else
2109                                 on_off(parm);
2110                 }
2111         }
2112 #endif
2113         if (get_dma_q)
2114         {
2115                 bb_ioctl_on_off (fd, HDIO_GET_QDMA,(unsigned long *)parm,
2116                                                   "HDIO_GET_QDMA"," queue_depth  = %2ld");
2117         }
2118         if (verbose || get_keep)
2119         {
2120                 bb_ioctl_on_off (fd, HDIO_GET_KEEPSETTINGS,(unsigned long *)parm,
2121                                                         "HDIO_GET_KEEPSETTINGS"," keepsettings = %2ld");
2122         }
2123
2124         if (get_nowerr)
2125         {
2126                 bb_ioctl_on_off  (fd, HDIO_GET_NOWERR,(unsigned long *)&parm,
2127                                                         " HDIO_GET_NOWERR"," nowerr       = %2ld");
2128         }
2129         if (verbose || get_readonly)
2130         {
2131                 bb_ioctl_on_off(fd, BLKROGET,(unsigned long *)parm,
2132                                                   " BLKROGET"," readonly     = %2ld");
2133         }
2134         if (verbose || get_readahead)
2135         {
2136                 bb_ioctl_on_off (fd, BLKRAGET, (unsigned long *) parm,
2137                                                         " BLKRAGET"," readahead    = %2ld");
2138         }
2139         if (verbose || get_geom)
2140         {
2141                 static const char msg[] = " geometry     = %u/%u/%u, sectors = %ld, start = %ld\n";
2142                 static struct hd_geometry g;
2143 #ifdef HDIO_GETGEO_BIG
2144                 static struct hd_big_geometry bg;
2145 #endif
2146
2147                 if (!bb_ioctl(fd, BLKGETSIZE, &parm, "BLKGETSIZE"))
2148                 {
2149 #ifdef HDIO_GETGEO_BIG
2150                         if (!bb_ioctl(fd, HDIO_GETGEO_BIG, &bg, "HDIO_GETGEO_BIG"))
2151                                 printf(msg, bg.cylinders, bg.heads, bg.sectors, parm, bg.start);
2152                         else
2153 #endif
2154                         if (!bb_ioctl(fd, HDIO_GETGEO, &g, "HDIO_GETGEO"))
2155                                 printf(msg, g.cylinders, g.heads, g.sectors, parm, g.start);
2156                 }
2157         }
2158 #ifdef HDIO_DRIVE_CMD
2159         if (get_powermode)
2160         {
2161 #ifndef WIN_CHECKPOWERMODE1
2162 #define WIN_CHECKPOWERMODE1 0xE5
2163 #endif
2164 #ifndef WIN_CHECKPOWERMODE2
2165 #define WIN_CHECKPOWERMODE2 0x98
2166 #endif
2167                 const char *state;
2168
2169                 args[0] = WIN_CHECKPOWERMODE1;
2170                 if (bb_ioctl_alt(fd, HDIO_DRIVE_CMD, args, WIN_CHECKPOWERMODE2, 0))
2171                 {
2172                         if (errno != EIO || args[0] != 0 || args[1] != 0)
2173                                 state = "unknown";
2174                         else
2175                                 state = "sleeping";
2176                 }
2177                 else
2178                         state = (args[2] == 255) ? "active/idle" : "standby";
2179
2180                 printf(" drive state is:  %s\n", state);
2181         }
2182 #endif
2183 #ifdef CONFIG_FEATURE_HDPARM_HDIO_DRIVE_RESET
2184         if (perform_reset)
2185         {
2186                 bb_ioctl(fd, HDIO_DRIVE_RESET, NULL, "HDIO_DRIVE_RESET");
2187         }
2188 #endif /* CONFIG_FEATURE_HDPARM_HDIO_DRIVE_RESET */
2189 #ifdef CONFIG_FEATURE_HDPARM_HDIO_TRISTATE_HWIF
2190         if (perform_tristate)
2191         {
2192                 args[0] = 0;
2193                 args[1] = tristate;
2194                 bb_ioctl(fd, HDIO_TRISTATE_HWIF, &args, "HDIO_TRISTATE_HWIF");
2195         }
2196 #endif /* CONFIG_FEATURE_HDPARM_HDIO_TRISTATE_HWIF */
2197 #ifdef CONFIG_FEATURE_HDPARM_GET_IDENTITY
2198         if (get_identity)
2199         {
2200                 static struct hd_driveid id;
2201
2202                 if (!ioctl(fd, HDIO_GET_IDENTITY, &id))
2203                 {
2204                         if (multcount != -1)
2205                         {
2206                                 id.multsect = multcount;
2207                                 id.multsect_valid |= 1;
2208                         }
2209                         else
2210                                 id.multsect_valid &= ~1;
2211                         dump_identity(&id);
2212                 }
2213                 else if (errno == -ENOMSG)
2214                         printf(" no identification info available\n");
2215                 else
2216                         bb_perror_msg("HDIO_GET_IDENTITY");
2217         }
2218
2219         if (get_IDentity)
2220         {
2221                 unsigned char args1[4+512]; /* = { ... } will eat 0.5k of rodata! */
2222                 unsigned i;
2223
2224                 memset(args1, 0, sizeof(args1));
2225                 args1[0] = WIN_IDENTIFY;
2226                 args1[3] = 1;
2227                 if (bb_ioctl_alt(fd, HDIO_DRIVE_CMD, args1, WIN_PIDENTIFY, "HDIO_DRIVE_CMD(identify)"))
2228                         goto identify_abort;
2229
2230                 for (i=0; i<(sizeof args1)/2; i+=2)
2231                         __le16_to_cpus((uint16_t *)(&args1[i]));
2232                 identify((void *)&args1[4]);
2233 identify_abort:
2234         /* VOID */;
2235         }
2236 #endif
2237 #ifdef CONFIG_FEATURE_HDPARM_HDIO_TRISTATE_HWIF
2238         if (set_busstate)
2239         {
2240                 if (get_busstate)
2241                 {
2242                         printf(" setting bus state to %d", busstate);
2243                         bus_state_value(busstate);
2244                 }
2245                 bb_ioctl(fd, HDIO_SET_BUSSTATE, (int *)(unsigned long)busstate, "HDIO_SET_BUSSTATE");
2246         }
2247 #endif
2248 #ifdef CONFIG_FEATURE_HDPARM_HDIO_TRISTATE_HWIF
2249         if (get_busstate)
2250         {
2251                 if (!bb_ioctl(fd, HDIO_GET_BUSSTATE, &parm, "HDIO_GET_BUSSTATE"))
2252                 {
2253                         printf(" busstate     = %2ld", parm);
2254                         bus_state_value(parm);
2255                 }
2256         }
2257 #endif
2258         if (reread_partn)
2259                 bb_ioctl(fd, BLKRRPART, NULL, "BLKRRPART");
2260
2261
2262         if (do_ctimings)
2263                 do_time(0,fd);          /*time cache  */
2264         if (do_timings)
2265                 do_time(1,fd);          /*time device */
2266         if (do_flush)
2267                 flush_buffer_cache(fd);
2268         close(fd);
2269 }
2270
2271 static char * GET_NUMBER(char *p, unsigned long *flag, unsigned long *num)
2272 {
2273         *num = 0;
2274         while (isdigit(*p)) {
2275                 *flag = 1;
2276                 *num = (*num * 10) + (*p++ - '0');
2277         }
2278         return p;
2279 }
2280
2281 static char * GET_STRING(char *p, unsigned long *flag, int *num)
2282 {
2283         char *tmpstr;
2284         char name[32];
2285         tmpstr = name;
2286         tmpstr[0] = '\0';
2287         while (isalnum(*p) && (tmpstr - name) < 31) {
2288                 tmpstr[0] = *p++;
2289                 tmpstr[1] = '\0';
2290                 ++tmpstr;
2291         }
2292         *num = translate_xfermode(name);
2293         if (*num == -1)
2294                 *flag = 0;
2295         else
2296                 *flag = 1;
2297         return p;
2298 }
2299
2300 #ifdef CONFIG_FEATURE_HDPARM_GET_IDENTITY
2301 static int fromhex(unsigned char c)
2302 {
2303         if (c >= 'a' && c <= 'f')
2304                 return 10 + (c - 'a');
2305         if (c >= '0' && c <= '9')
2306                 return (c - '0');
2307         bb_error_msg_and_die("bad char: '%c' 0x%02x", c, c);
2308 }
2309
2310 static int identify_from_stdin(void)
2311 {
2312         unsigned short sbuf[800];
2313         unsigned char  buf[1600], *b = (unsigned char *)buf;
2314         int i, count = read(0, buf, 1280);
2315
2316         if (count != 1280)
2317                 bb_error_msg_and_die("read(1280 bytes) failed (rc=%d)", count);
2318         for (i = 0; count >= 4; ++i)
2319         {
2320                 sbuf[i] = (fromhex(b[0]) << 12) | (fromhex(b[1]) << 8) | (fromhex(b[2]) << 4) | fromhex(b[3]);
2321                 __le16_to_cpus((uint16_t *)(&sbuf[i]));
2322                 b += 5;
2323                 count -= 5;
2324         }
2325         identify(sbuf);
2326         return 0;
2327 }
2328 #endif
2329
2330 static void missing_arg(int arg, char c, char* add)
2331 {
2332         if (!arg)
2333                 bb_error_msg("-%c: missing value %s", c, (add!=NULL)? add :"");
2334 }
2335
2336 /* our main() routine: */
2337 int hdparm_main(int argc, char **argv)
2338 {
2339         char c, *p;
2340
2341         ++argv;
2342         if (!--argc)
2343                 bb_show_usage();
2344
2345         while (argc--)
2346         {
2347 #ifdef CONFIG_FEATURE_HDPARM_GET_IDENTITY
2348                 if (!strcmp("-Istdin", *argv))
2349                 {
2350                         return identify_from_stdin();
2351                 }
2352 #endif
2353                 p = *argv++;
2354                 if (*p == '-')
2355                 {
2356                         if (!*++p)
2357                                 bb_show_usage();
2358                         while ((c = *p++))
2359                         {
2360                                 ++flagcount;
2361                                 switch (c)
2362                                 {
2363                                         case 'V':
2364                                                 /*bb_error_msg_and_die("%s", VERSION);*/
2365                                                 /* We have to return 0 here and not 1 */
2366                                                 printf("%s %s\n",bb_applet_name, VERSION);
2367                                                 return EXIT_SUCCESS;
2368                                         case 'v':
2369                                                 verbose = 1;
2370                                                 break;
2371 #ifdef CONFIG_FEATURE_HDPARM_GET_IDENTITY
2372                                         case 'I':
2373                                                 get_IDentity = 1;
2374                                                 break;
2375                                         case 'i':
2376                                                 get_identity = 1;
2377                                                 break;
2378 #endif
2379                                         case 'g':
2380                                                 get_geom = 1;
2381                                                 break;
2382                                         case 'f':
2383                                                 do_flush = 1;
2384                                                 break;
2385                                         case 'q':
2386                                                 quiet = 1;
2387                                                 noisy = 0;
2388                                                 break;
2389                                         case 'u':
2390                                                 get_unmask = noisy;
2391                                                 noisy = 1;
2392                                                 if (!*p && argc && isdigit(**argv))
2393                                                         p = *argv++, --argc;
2394                                                 if ((set_unmask = set_flag(p,'1'))==1)
2395                                                         unmask  = *p++ - '0';
2396                                                 break;
2397 #ifdef CONFIG_FEATURE_HDPARM_HDIO_GETSET_DMA
2398                                         case 'd':
2399                                                 get_dma = noisy;
2400                                                 noisy = 1;
2401                                                 if (!*p && argc && isdigit(**argv))
2402                                                         p = *argv++, --argc;
2403                                                 if ((set_dma = set_flag(p,'9'))==1)
2404                                                         dma = *p++ - '0';
2405                                                 break;
2406 #endif /* CONFIG_FEATURE_HDPARM_HDIO_GETSET_DMA */
2407                                         case 'n':
2408                                                 get_nowerr = noisy;
2409                                                 noisy = 1;
2410                                                 if (!*p && argc && isdigit(**argv))
2411                                                         p = *argv++, --argc;
2412                                                 if ((set_nowerr = set_flag(p,'1'))==1)
2413                                                         nowerr  = *p++ - '0';
2414                                                 break;
2415                                         case 'p':
2416                                                 noisy_piomode = noisy;
2417                                                 noisy = 1;
2418                                                 if (!*p && argc && isalnum(**argv))
2419                                                         p = *argv++, --argc;
2420                                                 p=GET_STRING(p,&set_piomode,&piomode);
2421                                                 break;
2422                                         case 'r':
2423                                                 get_readonly = noisy;
2424                                                 noisy = 1;
2425                                                 if (!*p && argc && isdigit(**argv))
2426                                                         p = *argv++, --argc;
2427                                                 if ((set_readonly = set_flag(p,'1'))==1)
2428                                                         readonly  = *p++ - '0';
2429                                                 break;
2430                                         case 'm':
2431                                                 get_mult = noisy;
2432                                                 noisy = 1;
2433                                                 if (!*p && argc && isalnum(**argv))
2434                                                         p = *argv++, --argc;
2435                                                 p=GET_NUMBER(p,&set_mult,&mult);
2436                                                 break;
2437                                         case 'c':
2438                                                 get_io32bit = noisy;
2439                                                 noisy = 1;
2440                                                 if (!*p && argc && isalnum(**argv))
2441                                                         p = *argv++, --argc;
2442                                                 p=GET_NUMBER(p,&set_io32bit,&io32bit);
2443                                                 break;
2444 #ifdef HDIO_DRIVE_CMD
2445                                         case 'S':
2446                                                 get_standby = noisy;
2447                                                 noisy = 1;
2448                                                 if (!*p && argc && isalnum(**argv))
2449                                                         p = *argv++, --argc;
2450                                                 p=GET_NUMBER(p,&set_standby,&standby_requested);
2451                                                 missing_arg(set_standby, c, NULL);
2452                                                 break;
2453
2454                                         case 'D':
2455                                                 get_defects = noisy;
2456                                                 noisy = 1;
2457                                                 if (!*p && argc && isalnum(**argv))
2458                                                         p = *argv++, --argc;
2459                                                 p=GET_NUMBER(p,&set_defects,&defects);
2460                                                 missing_arg(set_defects, c, NULL);
2461                                                 break;
2462                                         case 'P':
2463                                                 get_prefetch = noisy;
2464                                                 noisy = 1;
2465                                                 if (!*p && argc && isalnum(**argv))
2466                                                         p = *argv++, --argc;
2467                                                 p=GET_NUMBER(p,&set_prefetch,&prefetch);
2468                                                 missing_arg(set_prefetch, c, NULL);
2469                                                 break;
2470
2471                                         case 'X':
2472                                                 get_xfermode = noisy;
2473                                                 noisy = 1;
2474                                                 if (!*p && argc && isalnum(**argv))
2475                                                         p = *argv++, --argc;
2476                                                 p=GET_STRING(p,&set_xfermode,&xfermode_requested);
2477                                                 missing_arg(set_xfermode, c, NULL);
2478                                                 break;
2479
2480                                         case 'K':
2481                                                 get_dkeep = noisy;
2482                                                 noisy = 1;
2483                                                 if (!*p && argc && isdigit(**argv))
2484                                                         p = *argv++, --argc;
2485                                                 if ((set_dkeep = set_flag(p,'1'))==1)
2486                                                         dkeep  = *p++ - '0';
2487                                                 else
2488                                                         goto missing_arg_error;
2489                                                 break;
2490
2491                                         case 'A':
2492                                                 get_lookahead = noisy;
2493                                                 noisy = 1;
2494                                                 if (!*p && argc && isdigit(**argv))
2495                                                         p = *argv++, --argc;
2496                                                 if ((set_lookahead = set_flag(p,'1'))==1)
2497                                                         lookahead  = *p++ - '0';
2498                                                 else
2499                                                         goto missing_arg_error;
2500                                                 break;
2501
2502                                         case 'L':
2503                                                 get_doorlock = noisy;
2504                                                 noisy = 1;
2505                                                 if (!*p && argc && isdigit(**argv))
2506                                                         p = *argv++, --argc;
2507                                                 if ((set_doorlock = set_flag(p,'1'))==1)
2508                                                         doorlock  = *p++ - '0';
2509                                                 else
2510                                                         goto missing_arg_error;
2511                                                 break;
2512
2513                                         case 'W':
2514                                                 get_wcache = noisy;
2515                                                 noisy = 1;
2516                                                 if (!*p && argc && isdigit(**argv))
2517                                                         p = *argv++, --argc;
2518                                                 if ((set_wcache = set_flag(p,'1'))==1)
2519                                                         wcache  = *p++ - '0';
2520                                                 else
2521 missing_arg_error:
2522                                                         missing_arg(1, c, "(0/1)");
2523                                                 break;
2524
2525                                         case 'C':
2526                                                 get_powermode = noisy;
2527                                                 noisy = 1;
2528                                                 break;
2529
2530                                         case 'y':
2531                                                 get_standbynow = noisy;
2532                                                 noisy = 1;
2533                                                 set_standbynow = 1;
2534                                                 break;
2535
2536                                         case 'Y':
2537                                                 get_sleepnow = noisy;
2538                                                 noisy = 1;
2539                                                 set_sleepnow = 1;
2540                                                 break;
2541
2542                                         case 'z':
2543                                                 reread_partn = 1;
2544                                                 break;
2545
2546                                         case 'Z':
2547                                                 get_seagate = noisy;
2548                                                 noisy = 1;
2549                                                 set_seagate = 1;
2550                                                 break;
2551 #endif /* HDIO_DRIVE_CMD */
2552                                         case 'k':
2553                                                 get_keep = noisy;
2554                                                 noisy = 1;
2555                                                 if (!*p && argc && isdigit(**argv))
2556                                                         p = *argv++, --argc;
2557                                                 if ((set_keep = set_flag(p,'1'))==1)
2558                                                         keep  = *p++ - '0';
2559                                                 break;
2560 #ifdef CONFIG_FEATURE_HDPARM_HDIO_UNREGISTER_HWIF
2561                                         case 'U':
2562                                                 if (!*p && argc && isdigit(**argv))
2563                                                         p = *argv++, --argc;
2564                                                 if (! p)
2565                                                         goto expected_hwif_error; /* "expected hwif_nr" */
2566
2567                                                 sscanf(p++, "%i", &hwif);
2568
2569                                                 unregister_hwif = 1;
2570                                                 break;
2571 #endif /* CONFIG_FEATURE_HDPARM_HDIO_UNREGISTER_HWIF */
2572 #ifdef CONFIG_FEATURE_HDPARM_HDIO_SCAN_HWIF
2573                                         case 'R':
2574                                                 if (!*p && argc && isdigit(**argv))
2575                                                         p = *argv++, --argc;
2576                                                 if (! p)
2577                                                         goto expected_hwif_error; /* "expected hwif_data" */
2578
2579                                                 sscanf(p++, "%i", &hwif_data);
2580
2581                                                 if (argc && isdigit(**argv))
2582                                                         p = *argv++, --argc;
2583                                                 else
2584                                                         goto expected_hwif_error; /* "expected hwif_ctrl" */
2585
2586                                                 sscanf(p, "%i", &hwif_ctrl);
2587
2588                                                 if (argc && isdigit(**argv))
2589                                                         p = *argv++, --argc;
2590                                                 else
2591 #endif /* CONFIG_FEATURE_HDPARM_HDIO_SCAN_HWIF */
2592 #if defined CONFIG_FEATURE_HDPARM_HDIO_UNREGISTER_HWIF || defined CONFIG_FEATURE_HDPARM_HDIO_SCAN_HWIF
2593 expected_hwif_error:
2594                                                         bb_error_msg_and_die("expected hwif value"); /* "expected hwif_irq" */
2595 #endif /* CONFIG_FEATURE_HDPARM_HDIO_UNREGISTER_HWIF || CONFIG_FEATURE_HDPARM_HDIO_SCAN_HWIF */
2596 #ifdef CONFIG_FEATURE_HDPARM_HDIO_SCAN_HWIF
2597
2598                                                 sscanf(p, "%i", &hwif_irq);
2599
2600                                                 *p = '\0';
2601
2602                                                 scan_hwif = 1;
2603                                                 break;
2604 #endif /* CONFIG_FEATURE_HDPARM_HDIO_SCAN_HWIF */
2605                                         case 'Q':
2606 #ifdef HDIO_GET_QDMA
2607                                                 get_dma_q = noisy;
2608                                                 noisy = 1;
2609 #ifdef HDIO_SET_QDMA
2610                                                 if (!*p && argc && isalnum(**argv))
2611                                                         p = *argv++, --argc;
2612                                                 p=GET_NUMBER(p,&set_dma_q,&dma_q);
2613 #ifdef HDIO_GET_QDMA
2614                                                 dma_q = -dma_q;
2615 #endif
2616 #endif
2617 #endif
2618                                                 break;
2619
2620 #ifdef CONFIG_FEATURE_HDPARM_HDIO_DRIVE_RESET
2621                                         case 'w':
2622                                                 perform_reset = 1;
2623                                                 break;
2624 #endif /* CONFIG_FEATURE_HDPARM_HDIO_DRIVE_RESET */
2625 #ifdef CONFIG_FEATURE_HDPARM_HDIO_TRISTATE_HWIF
2626                                         case 'x':
2627                                                 if (!*p && argc && isdigit(**argv))
2628                                                         p = *argv++, --argc;
2629                                                 if ((perform_tristate = set_flag(p,'1'))==1)
2630                                                         tristate  = *p++ - '0';
2631                                                 else
2632                                                         missing_arg(1, c, "(0/1)");
2633                                                 break;
2634
2635 #endif /* CONFIG_FEATURE_HDPARM_HDIO_TRISTATE_HWIF */
2636                                         case 'a':
2637                                                 get_readahead = noisy;
2638                                                 noisy = 1;
2639                                                 if (!*p && argc && isalnum(**argv))
2640                                                         p = *argv++, --argc;
2641                                                 p=GET_NUMBER(p,&set_readahead,&Xreadahead);
2642                                                 break;
2643                                         case 'B':
2644                                                 get_apmmode = noisy;
2645                                                 noisy = 1;
2646                                                 if (!*p && argc && isalnum(**argv))
2647                                                         p = *argv++, --argc;
2648                                                 p=GET_NUMBER(p,&set_apmmode,&apmmode);
2649                                                 missing_arg(set_apmmode, c, "(1-255)");
2650                                                 break;
2651                                         case 't':
2652                                                 do_timings = 1;
2653                                                 do_flush = 1;
2654                                                 break;
2655                                         case 'T':
2656                                                 do_ctimings = 1;
2657                                                 do_flush = 1;
2658                                                 break;
2659 #ifdef CONFIG_FEATURE_HDPARM_HDIO_TRISTATE_HWIF
2660                                         case 'b':
2661                                                 get_busstate = noisy;
2662                                                 noisy = 1;
2663                                                 if (!*p && argc && isdigit(**argv))
2664                                                         p = *argv++, --argc;
2665                                                 if ((set_busstate = set_flag(p,'2'))==1)
2666                                                         busstate  = *p++ - '0';
2667                                                 break;
2668 #endif
2669                                         case 'h':
2670                                         default:
2671                                                 bb_show_usage();
2672                                 }
2673                         }
2674                         if (!argc)
2675                                 bb_show_usage();
2676                 } else {
2677                         process_dev(p);
2678                 }
2679         }
2680         return 0 ;
2681 }