chiark / gitweb /
846a73b5470bb4d2a860e4f58fcebe6848c2451e
[elogind.git] / src / udev / ata_id / ata_id.c
1 /*
2  * ata_id - reads product/serial number from ATA drives
3  *
4  * Copyright (C) 2005-2008 Kay Sievers <kay.sievers@vrfy.org>
5  * Copyright (C) 2009 Lennart Poettering <lennart@poettering.net>
6  * Copyright (C) 2009-2010 David Zeuthen <zeuthen@gmail.com>
7  *
8  * This program is free software: you can redistribute it and/or modify
9  * it under the terms of the GNU General Public License as published by
10  * the Free Software Foundation, either version 2 of the License, or
11  * (at your option) any later version.
12  *
13  * This program is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16  * GNU General Public License for more details.
17  *
18  * You should have received a copy of the GNU General Public License
19  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
20  */
21
22 #include <stdio.h>
23 #include <stdlib.h>
24 #include <stdint.h>
25 #include <unistd.h>
26 #include <fcntl.h>
27 #include <ctype.h>
28 #include <assert.h>
29 #include <string.h>
30 #include <errno.h>
31 #include <getopt.h>
32 #include <scsi/scsi.h>
33 #include <scsi/sg.h>
34 #include <scsi/scsi_ioctl.h>
35 #include <sys/ioctl.h>
36 #include <sys/types.h>
37 #include <sys/stat.h>
38 #include <linux/types.h>
39 #include <linux/hdreg.h>
40 #include <linux/fs.h>
41 #include <linux/cdrom.h>
42 #include <linux/bsg.h>
43 #include <arpa/inet.h>
44
45 #include "libudev.h"
46 #include "libudev-private.h"
47
48 #define COMMAND_TIMEOUT_MSEC (30 * 1000)
49
50 static int disk_scsi_inquiry_command(int      fd,
51                                      void    *buf,
52                                      size_t   buf_len)
53 {
54         struct sg_io_v4 io_v4;
55         uint8_t cdb[6];
56         uint8_t sense[32];
57         int ret;
58
59         /*
60          * INQUIRY, see SPC-4 section 6.4
61          */
62         memset(cdb, 0, sizeof(cdb));
63         cdb[0] = 0x12;                         /* OPERATION CODE: INQUIRY */
64         cdb[3] = (buf_len >> 8);         /* ALLOCATION LENGTH */
65         cdb[4] = (buf_len & 0xff);
66
67         memset(sense, 0, sizeof(sense));
68
69         memset(&io_v4, 0, sizeof(struct sg_io_v4));
70         io_v4.guard = 'Q';
71         io_v4.protocol = BSG_PROTOCOL_SCSI;
72         io_v4.subprotocol = BSG_SUB_PROTOCOL_SCSI_CMD;
73         io_v4.request_len = sizeof (cdb);
74         io_v4.request = (uintptr_t) cdb;
75         io_v4.max_response_len = sizeof (sense);
76         io_v4.response = (uintptr_t) sense;
77         io_v4.din_xfer_len = buf_len;
78         io_v4.din_xferp = (uintptr_t) buf;
79         io_v4.timeout = COMMAND_TIMEOUT_MSEC;
80
81         ret = ioctl(fd, SG_IO, &io_v4);
82         if (ret != 0) {
83                 /* could be that the driver doesn't do version 4, try version 3 */
84                 if (errno == EINVAL) {
85                         struct sg_io_hdr io_hdr;
86
87                         memset(&io_hdr, 0, sizeof(struct sg_io_hdr));
88                         io_hdr.interface_id = 'S';
89                         io_hdr.cmdp = (unsigned char*) cdb;
90                         io_hdr.cmd_len = sizeof (cdb);
91                         io_hdr.dxferp = buf;
92                         io_hdr.dxfer_len = buf_len;
93                         io_hdr.sbp = sense;
94                         io_hdr.mx_sb_len = sizeof (sense);
95                         io_hdr.dxfer_direction = SG_DXFER_FROM_DEV;
96                         io_hdr.timeout = COMMAND_TIMEOUT_MSEC;
97
98                         ret = ioctl(fd, SG_IO, &io_hdr);
99                         if (ret != 0)
100                                 goto out;
101
102                         /* even if the ioctl succeeds, we need to check the return value */
103                         if (!(io_hdr.status == 0 &&
104                               io_hdr.host_status == 0 &&
105                               io_hdr.driver_status == 0)) {
106                                 errno = EIO;
107                                 ret = -1;
108                                 goto out;
109                         }
110                 } else {
111                         goto out;
112                 }
113         }
114
115         /* even if the ioctl succeeds, we need to check the return value */
116         if (!(io_v4.device_status == 0 &&
117               io_v4.transport_status == 0 &&
118               io_v4.driver_status == 0)) {
119                 errno = EIO;
120                 ret = -1;
121                 goto out;
122         }
123
124  out:
125         return ret;
126 }
127
128 static int disk_identify_command(int          fd,
129                                  void         *buf,
130                                  size_t          buf_len)
131 {
132         struct sg_io_v4 io_v4;
133         uint8_t cdb[12];
134         uint8_t sense[32];
135         uint8_t *desc = sense+8;
136         int ret;
137
138         /*
139          * ATA Pass-Through 12 byte command, as described in
140          *
141          *  T10 04-262r8 ATA Command Pass-Through
142          *
143          * from http://www.t10.org/ftp/t10/document.04/04-262r8.pdf
144          */
145         memset(cdb, 0, sizeof(cdb));
146         cdb[0] = 0xa1;                        /* OPERATION CODE: 12 byte pass through */
147         cdb[1] = 4 << 1;                /* PROTOCOL: PIO Data-in */
148         cdb[2] = 0x2e;                        /* OFF_LINE=0, CK_COND=1, T_DIR=1, BYT_BLOK=1, T_LENGTH=2 */
149         cdb[3] = 0;                        /* FEATURES */
150         cdb[4] = 1;                        /* SECTORS */
151         cdb[5] = 0;                        /* LBA LOW */
152         cdb[6] = 0;                        /* LBA MID */
153         cdb[7] = 0;                        /* LBA HIGH */
154         cdb[8] = 0 & 0x4F;                /* SELECT */
155         cdb[9] = 0xEC;                        /* Command: ATA IDENTIFY DEVICE */;
156         memset(sense, 0, sizeof(sense));
157
158         memset(&io_v4, 0, sizeof(struct sg_io_v4));
159         io_v4.guard = 'Q';
160         io_v4.protocol = BSG_PROTOCOL_SCSI;
161         io_v4.subprotocol = BSG_SUB_PROTOCOL_SCSI_CMD;
162         io_v4.request_len = sizeof (cdb);
163         io_v4.request = (uintptr_t) cdb;
164         io_v4.max_response_len = sizeof (sense);
165         io_v4.response = (uintptr_t) sense;
166         io_v4.din_xfer_len = buf_len;
167         io_v4.din_xferp = (uintptr_t) buf;
168         io_v4.timeout = COMMAND_TIMEOUT_MSEC;
169
170         ret = ioctl(fd, SG_IO, &io_v4);
171         if (ret != 0) {
172                 /* could be that the driver doesn't do version 4, try version 3 */
173                 if (errno == EINVAL) {
174                         struct sg_io_hdr io_hdr;
175
176                         memset(&io_hdr, 0, sizeof(struct sg_io_hdr));
177                         io_hdr.interface_id = 'S';
178                         io_hdr.cmdp = (unsigned char*) cdb;
179                         io_hdr.cmd_len = sizeof (cdb);
180                         io_hdr.dxferp = buf;
181                         io_hdr.dxfer_len = buf_len;
182                         io_hdr.sbp = sense;
183                         io_hdr.mx_sb_len = sizeof (sense);
184                         io_hdr.dxfer_direction = SG_DXFER_FROM_DEV;
185                         io_hdr.timeout = COMMAND_TIMEOUT_MSEC;
186
187                         ret = ioctl(fd, SG_IO, &io_hdr);
188                         if (ret != 0)
189                                 goto out;
190                 } else {
191                         goto out;
192                 }
193         }
194
195         if (!(sense[0] == 0x72 && desc[0] == 0x9 && desc[1] == 0x0c)) {
196                 errno = EIO;
197                 ret = -1;
198                 goto out;
199         }
200
201  out:
202         return ret;
203 }
204
205 static int disk_identify_packet_device_command(int          fd,
206                                                void         *buf,
207                                                size_t          buf_len)
208 {
209         struct sg_io_v4 io_v4;
210         uint8_t cdb[16];
211         uint8_t sense[32];
212         uint8_t *desc = sense+8;
213         int ret;
214
215         /*
216          * ATA Pass-Through 16 byte command, as described in
217          *
218          *  T10 04-262r8 ATA Command Pass-Through
219          *
220          * from http://www.t10.org/ftp/t10/document.04/04-262r8.pdf
221          */
222         memset(cdb, 0, sizeof(cdb));
223         cdb[0] = 0x85;                        /* OPERATION CODE: 16 byte pass through */
224         cdb[1] = 4 << 1;                /* PROTOCOL: PIO Data-in */
225         cdb[2] = 0x2e;                        /* OFF_LINE=0, CK_COND=1, T_DIR=1, BYT_BLOK=1, T_LENGTH=2 */
226         cdb[3] = 0;                        /* FEATURES */
227         cdb[4] = 0;                        /* FEATURES */
228         cdb[5] = 0;                        /* SECTORS */
229         cdb[6] = 1;                        /* SECTORS */
230         cdb[7] = 0;                        /* LBA LOW */
231         cdb[8] = 0;                        /* LBA LOW */
232         cdb[9] = 0;                        /* LBA MID */
233         cdb[10] = 0;                        /* LBA MID */
234         cdb[11] = 0;                        /* LBA HIGH */
235         cdb[12] = 0;                        /* LBA HIGH */
236         cdb[13] = 0;                        /* DEVICE */
237         cdb[14] = 0xA1;                        /* Command: ATA IDENTIFY PACKET DEVICE */;
238         cdb[15] = 0;                        /* CONTROL */
239         memset(sense, 0, sizeof(sense));
240
241         memset(&io_v4, 0, sizeof(struct sg_io_v4));
242         io_v4.guard = 'Q';
243         io_v4.protocol = BSG_PROTOCOL_SCSI;
244         io_v4.subprotocol = BSG_SUB_PROTOCOL_SCSI_CMD;
245         io_v4.request_len = sizeof (cdb);
246         io_v4.request = (uintptr_t) cdb;
247         io_v4.max_response_len = sizeof (sense);
248         io_v4.response = (uintptr_t) sense;
249         io_v4.din_xfer_len = buf_len;
250         io_v4.din_xferp = (uintptr_t) buf;
251         io_v4.timeout = COMMAND_TIMEOUT_MSEC;
252
253         ret = ioctl(fd, SG_IO, &io_v4);
254         if (ret != 0) {
255                 /* could be that the driver doesn't do version 4, try version 3 */
256                 if (errno == EINVAL) {
257                         struct sg_io_hdr io_hdr;
258
259                         memset(&io_hdr, 0, sizeof(struct sg_io_hdr));
260                         io_hdr.interface_id = 'S';
261                         io_hdr.cmdp = (unsigned char*) cdb;
262                         io_hdr.cmd_len = sizeof (cdb);
263                         io_hdr.dxferp = buf;
264                         io_hdr.dxfer_len = buf_len;
265                         io_hdr.sbp = sense;
266                         io_hdr.mx_sb_len = sizeof (sense);
267                         io_hdr.dxfer_direction = SG_DXFER_FROM_DEV;
268                         io_hdr.timeout = COMMAND_TIMEOUT_MSEC;
269
270                         ret = ioctl(fd, SG_IO, &io_hdr);
271                         if (ret != 0)
272                                 goto out;
273                 } else {
274                         goto out;
275                 }
276         }
277
278         if (!(sense[0] == 0x72 && desc[0] == 0x9 && desc[1] == 0x0c)) {
279                 errno = EIO;
280                 ret = -1;
281                 goto out;
282         }
283
284  out:
285         return ret;
286 }
287
288 /**
289  * disk_identify_get_string:
290  * @identify: A block of IDENTIFY data
291  * @offset_words: Offset of the string to get, in words.
292  * @dest: Destination buffer for the string.
293  * @dest_len: Length of destination buffer, in bytes.
294  *
295  * Copies the ATA string from @identify located at @offset_words into @dest.
296  */
297 static void disk_identify_get_string(uint8_t identify[512],
298                                      unsigned int offset_words,
299                                      char *dest,
300                                      size_t dest_len)
301 {
302         unsigned int c1;
303         unsigned int c2;
304
305         assert(identify != NULL);
306         assert(dest != NULL);
307         assert((dest_len & 1) == 0);
308
309         while (dest_len > 0) {
310                 c1 = identify[offset_words * 2 + 1];
311                 c2 = identify[offset_words * 2];
312                 *dest = c1;
313                 dest++;
314                 *dest = c2;
315                 dest++;
316                 offset_words++;
317                 dest_len -= 2;
318         }
319 }
320
321 static void disk_identify_fixup_string(uint8_t identify[512],
322                                        unsigned int offset_words,
323                                        size_t len)
324 {
325         disk_identify_get_string(identify, offset_words,
326                                  (char *) identify + offset_words * 2, len);
327 }
328
329 static void disk_identify_fixup_uint16 (uint8_t identify[512], unsigned int offset_words)
330 {
331         uint16_t *p;
332
333         p = (uint16_t *) identify;
334         p[offset_words] = le16toh (p[offset_words]);
335 }
336
337 /**
338  * disk_identify:
339  * @udev: The libudev context.
340  * @fd: File descriptor for the block device.
341  * @out_identify: Return location for IDENTIFY data.
342  * @out_is_packet_device: Return location for whether returned data is from a IDENTIFY PACKET DEVICE.
343  *
344  * Sends the IDENTIFY DEVICE or IDENTIFY PACKET DEVICE command to the
345  * device represented by @fd. If successful, then the result will be
346  * copied into @out_identify and @out_is_packet_device.
347  *
348  * This routine is based on code from libatasmart, Copyright 2008
349  * Lennart Poettering, LGPL v2.1.
350  *
351  * Returns: 0 if the data was successfully obtained, otherwise
352  * non-zero with errno set.
353  */
354 static int disk_identify(struct udev *udev,
355                          int               fd,
356                          uint8_t      out_identify[512],
357                          int              *out_is_packet_device)
358 {
359         int ret;
360         uint8_t inquiry_buf[36];
361         int peripheral_device_type;
362         int all_nul_bytes;
363         int n;
364         int is_packet_device;
365
366         assert(out_identify != NULL);
367
368         /* init results */
369         ret = -1;
370         memset(out_identify, '\0', 512);
371         is_packet_device = 0;
372
373         /* If we were to use ATA PASS_THROUGH (12) on an ATAPI device
374          * we could accidentally blank media. This is because MMC's BLANK
375          * command has the same op-code (0x61).
376          *
377          * To prevent this from happening we bail out if the device
378          * isn't a Direct Access Block Device, e.g. SCSI type 0x00
379          * (CD/DVD devices are type 0x05). So we send a SCSI INQUIRY
380          * command first... libata is handling this via its SCSI
381          * emulation layer.
382          *
383          * This also ensures that we're actually dealing with a device
384          * that understands SCSI commands.
385          *
386          * (Yes, it is a bit perverse that we're tunneling the ATA
387          * command through SCSI and relying on the ATA driver
388          * emulating SCSI well-enough...)
389          *
390          * (See commit 160b069c25690bfb0c785994c7c3710289179107 for
391          * the original bug-fix and see http://bugs.debian.org/cgi-bin/bugreport.cgi?bug=556635
392          * for the original bug-report.)
393          */
394         ret = disk_scsi_inquiry_command (fd, inquiry_buf, sizeof (inquiry_buf));
395         if (ret != 0)
396                 goto out;
397
398         /* SPC-4, section 6.4.2: Standard INQUIRY data */
399         peripheral_device_type = inquiry_buf[0] & 0x1f;
400         if (peripheral_device_type == 0x05)
401           {
402             is_packet_device = 1;
403             ret = disk_identify_packet_device_command(fd, out_identify, 512);
404             goto check_nul_bytes;
405           }
406         if (peripheral_device_type != 0x00) {
407                 ret = -1;
408                 errno = EIO;
409                 goto out;
410         }
411
412         /* OK, now issue the IDENTIFY DEVICE command */
413         ret = disk_identify_command(fd, out_identify, 512);
414         if (ret != 0)
415                 goto out;
416
417  check_nul_bytes:
418          /* Check if IDENTIFY data is all NUL bytes - if so, bail */
419         all_nul_bytes = 1;
420         for (n = 0; n < 512; n++) {
421                 if (out_identify[n] != '\0') {
422                         all_nul_bytes = 0;
423                         break;
424                 }
425         }
426
427         if (all_nul_bytes) {
428                 ret = -1;
429                 errno = EIO;
430                 goto out;
431         }
432
433 out:
434         if (out_is_packet_device != NULL)
435           *out_is_packet_device = is_packet_device;
436         return ret;
437 }
438
439 static void log_fn(struct udev *udev, int priority,
440                    const char *file, int line, const char *fn,
441                    const char *format, va_list args)
442 {
443         vsyslog(priority, format, args);
444 }
445
446 int main(int argc, char *argv[])
447 {
448         struct udev *udev;
449         struct hd_driveid id;
450         uint8_t identify[512];
451         uint16_t *identify_words;
452         char model[41];
453         char model_enc[256];
454         char serial[21];
455         char revision[9];
456         const char *node = NULL;
457         int export = 0;
458         int fd;
459         uint16_t word;
460         int rc = 0;
461         int is_packet_device = 0;
462         static const struct option options[] = {
463                 { "export", no_argument, NULL, 'x' },
464                 { "help", no_argument, NULL, 'h' },
465                 {}
466         };
467
468         udev = udev_new();
469         if (udev == NULL)
470                 goto exit;
471
472         udev_log_init("ata_id");
473         udev_set_log_fn(udev, log_fn);
474
475         while (1) {
476                 int option;
477
478                 option = getopt_long(argc, argv, "xh", options, NULL);
479                 if (option == -1)
480                         break;
481
482                 switch (option) {
483                 case 'x':
484                         export = 1;
485                         break;
486                 case 'h':
487                         printf("Usage: ata_id [--export] [--help] <device>\n"
488                                "  --export    print values as environment keys\n"
489                                "  --help      print this help text\n\n");
490                         goto exit;
491                 }
492         }
493
494         node = argv[optind];
495         if (node == NULL) {
496                 err(udev, "no node specified\n");
497                 rc = 1;
498                 goto exit;
499         }
500
501         fd = open(node, O_RDONLY|O_NONBLOCK);
502         if (fd < 0) {
503                 err(udev, "unable to open '%s'\n", node);
504                 rc = 1;
505                 goto exit;
506         }
507
508         if (disk_identify(udev, fd, identify, &is_packet_device) == 0) {
509                 /*
510                  * fix up only the fields from the IDENTIFY data that we are going to
511                  * use and copy it into the hd_driveid struct for convenience
512                  */
513                 disk_identify_fixup_string (identify,  10, 20); /* serial */
514                 disk_identify_fixup_string (identify,  23,  6); /* fwrev */
515                 disk_identify_fixup_string (identify,  27, 40); /* model */
516                 disk_identify_fixup_uint16 (identify,  0);      /* configuration */
517                 disk_identify_fixup_uint16 (identify,  75);     /* queue depth */
518                 disk_identify_fixup_uint16 (identify,  75);     /* SATA capabilities */
519                 disk_identify_fixup_uint16 (identify,  82);     /* command set supported */
520                 disk_identify_fixup_uint16 (identify,  83);     /* command set supported */
521                 disk_identify_fixup_uint16 (identify,  84);     /* command set supported */
522                 disk_identify_fixup_uint16 (identify,  85);     /* command set supported */
523                 disk_identify_fixup_uint16 (identify,  86);     /* command set supported */
524                 disk_identify_fixup_uint16 (identify,  87);     /* command set supported */
525                 disk_identify_fixup_uint16 (identify,  89);     /* time required for SECURITY ERASE UNIT */
526                 disk_identify_fixup_uint16 (identify,  90);     /* time required for enhanced SECURITY ERASE UNIT */
527                 disk_identify_fixup_uint16 (identify,  91);     /* current APM values */
528                 disk_identify_fixup_uint16 (identify,  94);     /* current AAM value */
529                 disk_identify_fixup_uint16 (identify, 128);     /* device lock function */
530                 disk_identify_fixup_uint16 (identify, 217);     /* nominal media rotation rate */
531                 memcpy(&id, identify, sizeof id);
532         } else {
533                 /* If this fails, then try HDIO_GET_IDENTITY */
534                 if (ioctl(fd, HDIO_GET_IDENTITY, &id) != 0) {
535                         info(udev, "HDIO_GET_IDENTITY failed for '%s': %m\n", node);
536                         rc = 2;
537                         goto close;
538                 }
539         }
540         identify_words = (uint16_t *) identify;
541
542         memcpy (model, id.model, 40);
543         model[40] = '\0';
544         udev_util_encode_string(model, model_enc, sizeof(model_enc));
545         util_replace_whitespace((char *) id.model, model, 40);
546         util_replace_chars(model, NULL);
547         util_replace_whitespace((char *) id.serial_no, serial, 20);
548         util_replace_chars(serial, NULL);
549         util_replace_whitespace((char *) id.fw_rev, revision, 8);
550         util_replace_chars(revision, NULL);
551
552         if (export) {
553                 /* Set this to convey the disk speaks the ATA protocol */
554                 printf("ID_ATA=1\n");
555
556                 if ((id.config >> 8) & 0x80) {
557                         /* This is an ATAPI device */
558                         switch ((id.config >> 8) & 0x1f) {
559                         case 0:
560                                 printf("ID_TYPE=cd\n");
561                                 break;
562                         case 1:
563                                 printf("ID_TYPE=tape\n");
564                                 break;
565                         case 5:
566                                 printf("ID_TYPE=cd\n");
567                                 break;
568                         case 7:
569                                 printf("ID_TYPE=optical\n");
570                                 break;
571                         default:
572                                 printf("ID_TYPE=generic\n");
573                                 break;
574                         }
575                 } else {
576                         printf("ID_TYPE=disk\n");
577                 }
578                 printf("ID_BUS=ata\n");
579                 printf("ID_MODEL=%s\n", model);
580                 printf("ID_MODEL_ENC=%s\n", model_enc);
581                 printf("ID_REVISION=%s\n", revision);
582                 if (serial[0] != '\0') {
583                         printf("ID_SERIAL=%s_%s\n", model, serial);
584                         printf("ID_SERIAL_SHORT=%s\n", serial);
585                 } else {
586                         printf("ID_SERIAL=%s\n", model);
587                 }
588
589                 if (id.command_set_1 & (1<<5)) {
590                         printf ("ID_ATA_WRITE_CACHE=1\n");
591                         printf ("ID_ATA_WRITE_CACHE_ENABLED=%d\n", (id.cfs_enable_1 & (1<<5)) ? 1 : 0);
592                 }
593                 if (id.command_set_1 & (1<<10)) {
594                         printf("ID_ATA_FEATURE_SET_HPA=1\n");
595                         printf("ID_ATA_FEATURE_SET_HPA_ENABLED=%d\n", (id.cfs_enable_1 & (1<<10)) ? 1 : 0);
596
597                         /*
598                          * TODO: use the READ NATIVE MAX ADDRESS command to get the native max address
599                          * so it is easy to check whether the protected area is in use.
600                          */
601                 }
602                 if (id.command_set_1 & (1<<3)) {
603                         printf("ID_ATA_FEATURE_SET_PM=1\n");
604                         printf("ID_ATA_FEATURE_SET_PM_ENABLED=%d\n", (id.cfs_enable_1 & (1<<3)) ? 1 : 0);
605                 }
606                 if (id.command_set_1 & (1<<1)) {
607                         printf("ID_ATA_FEATURE_SET_SECURITY=1\n");
608                         printf("ID_ATA_FEATURE_SET_SECURITY_ENABLED=%d\n", (id.cfs_enable_1 & (1<<1)) ? 1 : 0);
609                         printf("ID_ATA_FEATURE_SET_SECURITY_ERASE_UNIT_MIN=%d\n", id.trseuc * 2);
610                         if ((id.cfs_enable_1 & (1<<1))) /* enabled */ {
611                                 if (id.dlf & (1<<8))
612                                         printf("ID_ATA_FEATURE_SET_SECURITY_LEVEL=maximum\n");
613                                 else
614                                         printf("ID_ATA_FEATURE_SET_SECURITY_LEVEL=high\n");
615                         }
616                         if (id.dlf & (1<<5))
617                                 printf("ID_ATA_FEATURE_SET_SECURITY_ENHANCED_ERASE_UNIT_MIN=%d\n", id.trsEuc * 2);
618                         if (id.dlf & (1<<4))
619                                 printf("ID_ATA_FEATURE_SET_SECURITY_EXPIRE=1\n");
620                         if (id.dlf & (1<<3))
621                                 printf("ID_ATA_FEATURE_SET_SECURITY_FROZEN=1\n");
622                         if (id.dlf & (1<<2))
623                                 printf("ID_ATA_FEATURE_SET_SECURITY_LOCKED=1\n");
624                 }
625                 if (id.command_set_1 & (1<<0)) {
626                         printf("ID_ATA_FEATURE_SET_SMART=1\n");
627                         printf("ID_ATA_FEATURE_SET_SMART_ENABLED=%d\n", (id.cfs_enable_1 & (1<<0)) ? 1 : 0);
628                 }
629                 if (id.command_set_2 & (1<<9)) {
630                         printf("ID_ATA_FEATURE_SET_AAM=1\n");
631                         printf("ID_ATA_FEATURE_SET_AAM_ENABLED=%d\n", (id.cfs_enable_2 & (1<<9)) ? 1 : 0);
632                         printf("ID_ATA_FEATURE_SET_AAM_VENDOR_RECOMMENDED_VALUE=%d\n", id.acoustic >> 8);
633                         printf("ID_ATA_FEATURE_SET_AAM_CURRENT_VALUE=%d\n", id.acoustic & 0xff);
634                 }
635                 if (id.command_set_2 & (1<<5)) {
636                         printf("ID_ATA_FEATURE_SET_PUIS=1\n");
637                         printf("ID_ATA_FEATURE_SET_PUIS_ENABLED=%d\n", (id.cfs_enable_2 & (1<<5)) ? 1 : 0);
638                 }
639                 if (id.command_set_2 & (1<<3)) {
640                         printf("ID_ATA_FEATURE_SET_APM=1\n");
641                         printf("ID_ATA_FEATURE_SET_APM_ENABLED=%d\n", (id.cfs_enable_2 & (1<<3)) ? 1 : 0);
642                         if ((id.cfs_enable_2 & (1<<3)))
643                                 printf("ID_ATA_FEATURE_SET_APM_CURRENT_VALUE=%d\n", id.CurAPMvalues & 0xff);
644                 }
645                 if (id.command_set_2 & (1<<0))
646                         printf("ID_ATA_DOWNLOAD_MICROCODE=1\n");
647
648                 /*
649                  * Word 76 indicates the capabilities of a SATA device. A PATA device shall set
650                  * word 76 to 0000h or FFFFh. If word 76 is set to 0000h or FFFFh, then
651                  * the device does not claim compliance with the Serial ATA specification and words
652                  * 76 through 79 are not valid and shall be ignored.
653                  */
654                 word = *((uint16_t *) identify + 76);
655                 if (word != 0x0000 && word != 0xffff) {
656                         printf("ID_ATA_SATA=1\n");
657                         /*
658                          * If bit 2 of word 76 is set to one, then the device supports the Gen2
659                          * signaling rate of 3.0 Gb/s (see SATA 2.6).
660                          *
661                          * If bit 1 of word 76 is set to one, then the device supports the Gen1
662                          * signaling rate of 1.5 Gb/s (see SATA 2.6).
663                          */
664                         if (word & (1<<2))
665                                 printf("ID_ATA_SATA_SIGNAL_RATE_GEN2=1\n");
666                         if (word & (1<<1))
667                                 printf("ID_ATA_SATA_SIGNAL_RATE_GEN1=1\n");
668                 }
669
670                 /* Word 217 indicates the nominal media rotation rate of the device */
671                 word = *((uint16_t *) identify + 217);
672                 if (word != 0x0000) {
673                         if (word == 0x0001) {
674                                 printf ("ID_ATA_ROTATION_RATE_RPM=0\n"); /* non-rotating e.g. SSD */
675                         } else if (word >= 0x0401 && word <= 0xfffe) {
676                                 printf ("ID_ATA_ROTATION_RATE_RPM=%d\n", word);
677                         }
678                 }
679
680                 /*
681                  * Words 108-111 contain a mandatory World Wide Name (WWN) in the NAA IEEE Registered identifier
682                  * format. Word 108 bits (15:12) shall contain 5h, indicating that the naming authority is IEEE.
683                  * All other values are reserved.
684                  */
685                 word = *((uint16_t *) identify + 108);
686                 if ((word & 0xf000) == 0x5000) {
687                         uint64_t wwwn;
688
689                         wwwn   = *((uint16_t *) identify + 108);
690                         wwwn <<= 16;
691                         wwwn  |= *((uint16_t *) identify + 109);
692                         wwwn <<= 16;
693                         wwwn  |= *((uint16_t *) identify + 110);
694                         wwwn <<= 16;
695                         wwwn  |= *((uint16_t *) identify + 111);
696                         printf("ID_WWN=0x%llx\n", (unsigned long long int) wwwn);
697                         /* ATA devices have no vendor extension */
698                         printf("ID_WWN_WITH_EXTENSION=0x%llx\n", (unsigned long long int) wwwn);
699                 }
700
701                 /* from Linux's include/linux/ata.h */
702                 if (identify_words[0] == 0x848a || identify_words[0] == 0x844a) {
703                         printf("ID_ATA_CFA=1\n");
704                 } else {
705                         if ((identify_words[83] & 0xc004) == 0x4004) {
706                                 printf("ID_ATA_CFA=1\n");
707                         }
708                 }
709         } else {
710                 if (serial[0] != '\0')
711                         printf("%s_%s\n", model, serial);
712                 else
713                         printf("%s\n", model);
714         }
715 close:
716         close(fd);
717 exit:
718         udev_unref(udev);
719         udev_log_close();
720         return rc;
721 }