qemu-io: Optionally verify only part of read data
[qemu] / qemu-io.c
1 /*
2  * Command line utility to exercise the QEMU I/O path.
3  *
4  * Copyright (C) 2009 Red Hat, Inc.
5  * Copyright (c) 2003-2005 Silicon Graphics, Inc.
6  *
7  * This work is licensed under the terms of the GNU GPL, version 2 or later.
8  * See the COPYING file in the top-level directory.
9  */
10 #include <sys/types.h>
11 #include <stdarg.h>
12 #include <stdio.h>
13 #include <getopt.h>
14
15 #include "qemu-common.h"
16 #include "block_int.h"
17 #include "cmd.h"
18
19 #define VERSION "0.0.1"
20
21 #define CMD_NOFILE_OK   0x01
22
23 char *progname;
24 static BlockDriverState *bs;
25
26 static int misalign;
27
28 /*
29  * Memory allocation helpers.
30  *
31  * Make sure memory is aligned by default, or purposefully misaligned if
32  * that is specified on the command line.
33  */
34
35 #define MISALIGN_OFFSET         16
36 static void *qemu_io_alloc(size_t len, int pattern)
37 {
38         void *buf;
39
40         if (misalign)
41                 len += MISALIGN_OFFSET;
42         buf = qemu_memalign(512, len);
43         memset(buf, pattern, len);
44         if (misalign)
45                 buf += MISALIGN_OFFSET;
46         return buf;
47 }
48
49 static void qemu_io_free(void *p)
50 {
51         if (misalign)
52                 p -= MISALIGN_OFFSET;
53         qemu_vfree(p);
54 }
55
56 static void
57 dump_buffer(char *buffer, int64_t offset, int len)
58 {
59         int i, j;
60         char *p;
61
62         for (i = 0, p = buffer; i < len; i += 16) {
63                 char    *s = p;
64
65                 printf("%08llx:  ", (unsigned long long)offset + i);
66                 for (j = 0; j < 16 && i + j < len; j++, p++)
67                         printf("%02x ", *p);
68                 printf(" ");
69                 for (j = 0; j < 16 && i + j < len; j++, s++) {
70                         if (isalnum((int)*s))
71                                 printf("%c", *s);
72                         else
73                                 printf(".");
74                 }
75                 printf("\n");
76         }
77 }
78
79 static void
80 print_report(const char *op, struct timeval *t, int64_t offset,
81                 int count, int total, int cnt, int Cflag)
82 {
83         char s1[64], s2[64], ts[64];
84
85         timestr(t, ts, sizeof(ts), Cflag ? VERBOSE_FIXED_TIME : 0);
86         if (!Cflag) {
87                 cvtstr((double)total, s1, sizeof(s1));
88                 cvtstr(tdiv((double)total, *t), s2, sizeof(s2));
89                 printf("%s %d/%d bytes at offset %lld\n",
90                         op, total, count, (long long)offset);
91                 printf("%s, %d ops; %s (%s/sec and %.4f ops/sec)\n",
92                         s1, cnt, ts, s2, tdiv((double)cnt, *t));
93         } else {/* bytes,ops,time,bytes/sec,ops/sec */
94                 printf("%d,%d,%s,%.3f,%.3f\n",
95                         total, cnt, ts,
96                         tdiv((double)total, *t),
97                         tdiv((double)cnt, *t));
98         }
99 }
100
101 static int do_read(char *buf, int64_t offset, int count, int *total)
102 {
103         int ret;
104
105         ret = bdrv_read(bs, offset >> 9, (uint8_t *)buf, count >> 9);
106         if (ret < 0)
107                 return ret;
108         *total = count;
109         return 1;
110 }
111
112 static int do_write(char *buf, int64_t offset, int count, int *total)
113 {
114         int ret;
115
116         ret = bdrv_write(bs, offset >> 9, (uint8_t *)buf, count >> 9);
117         if (ret < 0)
118                 return ret;
119         *total = count;
120         return 1;
121 }
122
123 static int do_pread(char *buf, int64_t offset, int count, int *total)
124 {
125         *total = bdrv_pread(bs, offset, (uint8_t *)buf, count);
126         if (*total < 0)
127                 return *total;
128         return 1;
129 }
130
131 static int do_pwrite(char *buf, int64_t offset, int count, int *total)
132 {
133         *total = bdrv_pwrite(bs, offset, (uint8_t *)buf, count);
134         if (*total < 0)
135                 return *total;
136         return 1;
137 }
138
139 #define NOT_DONE 0x7fffffff
140 static void aio_rw_done(void *opaque, int ret)
141 {
142         *(int *)opaque = ret;
143 }
144
145 static int do_aio_readv(QEMUIOVector *qiov, int64_t offset, int *total)
146 {
147         BlockDriverAIOCB *acb;
148         int async_ret = NOT_DONE;
149
150         acb = bdrv_aio_readv(bs, offset >> 9, qiov, qiov->size >> 9,
151                              aio_rw_done, &async_ret);
152         if (!acb)
153                 return -EIO;
154
155         while (async_ret == NOT_DONE)
156                 qemu_aio_wait();
157
158         *total = qiov->size;
159         return async_ret < 0 ? async_ret : 1;
160 }
161
162 static int do_aio_writev(QEMUIOVector *qiov, int64_t offset, int *total)
163 {
164         BlockDriverAIOCB *acb;
165         int async_ret = NOT_DONE;
166
167         acb = bdrv_aio_writev(bs, offset >> 9, qiov, qiov->size >> 9,
168                               aio_rw_done, &async_ret);
169         if (!acb)
170                 return -EIO;
171
172         while (async_ret == NOT_DONE)
173                 qemu_aio_wait();
174
175         *total = qiov->size;
176         return async_ret < 0 ? async_ret : 1;
177 }
178
179
180 static const cmdinfo_t read_cmd;
181
182 static void
183 read_help(void)
184 {
185         printf(
186 "\n"
187 " reads a range of bytes from the given offset\n"
188 "\n"
189 " Example:\n"
190 " 'read -v 512 1k' - dumps 1 kilobyte read from 512 bytes into the file\n"
191 "\n"
192 " Reads a segment of the currently open file, optionally dumping it to the\n"
193 " standard output stream (with -v option) for subsequent inspection.\n"
194 " -C, -- report statistics in a machine parsable format\n"
195 " -l, -- length for pattern verification (only with -P)\n"
196 " -p, -- use bdrv_pread to read the file\n"
197 " -P, -- use a pattern to verify read data\n"
198 " -q, -- quite mode, do not show I/O statistics\n"
199 " -s, -- start offset for pattern verification (only with -P)\n"
200 " -v, -- dump buffer to standard output\n"
201 "\n");
202 }
203
204 static int
205 read_f(int argc, char **argv)
206 {
207         struct timeval t1, t2;
208         int Cflag = 0, pflag = 0, qflag = 0, vflag = 0;
209         int Pflag = 0, sflag = 0, lflag = 0;
210         int c, cnt;
211         char *buf;
212         int64_t offset;
213         int count, total;
214         int pattern = 0, pattern_offset = 0, pattern_count = 0;
215
216         while ((c = getopt(argc, argv, "Cl:pP:qs:v")) != EOF) {
217                 switch (c) {
218                 case 'C':
219                         Cflag = 1;
220                         break;
221                 case 'l':
222                         lflag = 1;
223                         pattern_count = cvtnum(optarg);
224                         if (pattern_count < 0) {
225                                 printf("non-numeric length argument -- %s\n", optarg);
226                                 return 0;
227                         }
228                         break;
229                 case 'p':
230                         pflag = 1;
231                         break;
232                 case 'P':
233                         Pflag = 1;
234                         pattern = atoi(optarg);
235                         break;
236                 case 'q':
237                         qflag = 1;
238                         break;
239                 case 's':
240                         sflag = 1;
241                         pattern_offset = cvtnum(optarg);
242                         if (pattern_offset < 0) {
243                                 printf("non-numeric length argument -- %s\n", optarg);
244                                 return 0;
245                         }
246                         break;
247                 case 'v':
248                         vflag = 1;
249                         break;
250                 default:
251                         return command_usage(&read_cmd);
252                 }
253         }
254
255         if (optind != argc - 2)
256                 return command_usage(&read_cmd);
257
258         offset = cvtnum(argv[optind]);
259         if (offset < 0) {
260                 printf("non-numeric length argument -- %s\n", argv[optind]);
261                 return 0;
262         }
263
264         optind++;
265         count = cvtnum(argv[optind]);
266         if (count < 0) {
267                 printf("non-numeric length argument -- %s\n", argv[optind]);
268                 return 0;
269         }
270
271     if (!Pflag && (lflag || sflag)) {
272         return command_usage(&read_cmd);
273     }
274
275     if (!lflag) {
276         pattern_count = count - pattern_offset;
277     }
278
279     if ((pattern_count < 0) || (pattern_count + pattern_offset > count))  {
280         printf("pattern verfication range exceeds end of read data\n");
281         return 0;
282     }
283
284         if (!pflag)
285                 if (offset & 0x1ff) {
286                         printf("offset %lld is not sector aligned\n",
287                                 (long long)offset);
288                         return 0;
289
290                 if (count & 0x1ff) {
291                         printf("count %d is not sector aligned\n",
292                                 count);
293                         return 0;
294                 }
295         }
296
297         buf = qemu_io_alloc(count, 0xab);
298
299         gettimeofday(&t1, NULL);
300         if (pflag)
301                 cnt = do_pread(buf, offset, count, &total);
302         else
303                 cnt = do_read(buf, offset, count, &total);
304         gettimeofday(&t2, NULL);
305
306         if (cnt < 0) {
307                 printf("read failed: %s\n", strerror(-cnt));
308                 return 0;
309         }
310
311         if (Pflag) {
312                 void* cmp_buf = malloc(pattern_count);
313                 memset(cmp_buf, pattern, pattern_count);
314                 if (memcmp(buf + pattern_offset, cmp_buf, pattern_count)) {
315                         printf("Pattern verification failed at offset %lld, "
316                                 "%d bytes\n",
317                                 (long long) offset + pattern_offset, pattern_count);
318                 }
319                 free(cmp_buf);
320         }
321
322         if (qflag)
323                 return 0;
324
325         if (vflag)
326                 dump_buffer(buf, offset, count);
327
328         /* Finally, report back -- -C gives a parsable format */
329         t2 = tsub(t2, t1);
330         print_report("read", &t2, offset, count, total, cnt, Cflag);
331
332         qemu_io_free(buf);
333
334         return 0;
335 }
336
337 static const cmdinfo_t read_cmd = {
338         .name           = "read",
339         .altname        = "r",
340         .cfunc          = read_f,
341         .argmin         = 2,
342         .argmax         = -1,
343         .args           = "[-aCpqv] [-P pattern [-s off] [-l len]] off len",
344         .oneline        = "reads a number of bytes at a specified offset",
345         .help           = read_help,
346 };
347
348 static const cmdinfo_t readv_cmd;
349
350 static void
351 readv_help(void)
352 {
353         printf(
354 "\n"
355 " reads a range of bytes from the given offset into multiple buffers\n"
356 "\n"
357 " Example:\n"
358 " 'readv -v 512 1k 1k ' - dumps 2 kilobytes read from 512 bytes into the file\n"
359 "\n"
360 " Reads a segment of the currently open file, optionally dumping it to the\n"
361 " standard output stream (with -v option) for subsequent inspection.\n"
362 " Uses multiple iovec buffers if more than one byte range is specified.\n"
363 " -C, -- report statistics in a machine parsable format\n"
364 " -P, -- use a pattern to verify read data\n"
365 " -v, -- dump buffer to standard output\n"
366 " -q, -- quite mode, do not show I/O statistics\n"
367 "\n");
368 }
369
370 static int
371 readv_f(int argc, char **argv)
372 {
373         struct timeval t1, t2;
374         int Cflag = 0, qflag = 0, vflag = 0;
375         int c, cnt;
376         char *buf, *p;
377         int64_t offset;
378         int count = 0, total;
379         int nr_iov, i;
380         QEMUIOVector qiov;
381         int pattern = 0;
382         int Pflag = 0;
383
384         while ((c = getopt(argc, argv, "CP:qv")) != EOF) {
385                 switch (c) {
386                 case 'C':
387                         Cflag = 1;
388                         break;
389                 case 'P':
390                         Pflag = 1;
391                         pattern = atoi(optarg);
392                         break;
393                 case 'q':
394                         qflag = 1;
395                         break;
396                 case 'v':
397                         vflag = 1;
398                         break;
399                 default:
400                         return command_usage(&readv_cmd);
401                 }
402         }
403
404         if (optind > argc - 2)
405                 return command_usage(&readv_cmd);
406
407
408         offset = cvtnum(argv[optind]);
409         if (offset < 0) {
410                 printf("non-numeric length argument -- %s\n", argv[optind]);
411                 return 0;
412         }
413         optind++;
414
415         if (offset & 0x1ff) {
416                 printf("offset %lld is not sector aligned\n",
417                         (long long)offset);
418                 return 0;
419         }
420
421         if (count & 0x1ff) {
422                 printf("count %d is not sector aligned\n",
423                         count);
424                 return 0;
425         }
426
427         for (i = optind; i < argc; i++) {
428                 size_t len;
429
430                 len = cvtnum(argv[i]);
431                 if (len < 0) {
432                         printf("non-numeric length argument -- %s\n", argv[i]);
433                         return 0;
434                 }
435                 count += len;
436         }
437
438         nr_iov = argc - optind;
439         qemu_iovec_init(&qiov, nr_iov);
440         buf = p = qemu_io_alloc(count, 0xab);
441         for (i = 0; i < nr_iov; i++) {
442                 size_t len;
443
444                 len = cvtnum(argv[optind]);
445                 if (len < 0) {
446                         printf("non-numeric length argument -- %s\n",
447                                 argv[optind]);
448                         return 0;
449                 }
450
451                 qemu_iovec_add(&qiov, p, len);
452                 p += len;
453                 optind++;
454         }
455
456         gettimeofday(&t1, NULL);
457         cnt = do_aio_readv(&qiov, offset, &total);
458         gettimeofday(&t2, NULL);
459
460         if (cnt < 0) {
461                 printf("readv failed: %s\n", strerror(-cnt));
462                 return 0;
463         }
464
465         if (Pflag) {
466                 void* cmp_buf = malloc(count);
467                 memset(cmp_buf, pattern, count);
468                 if (memcmp(buf, cmp_buf, count)) {
469                         printf("Pattern verification failed at offset %lld, "
470                                 "%d bytes\n",
471                                 (long long) offset, count);
472                 }
473                 free(cmp_buf);
474         }
475
476         if (qflag)
477                 return 0;
478
479         if (vflag)
480                 dump_buffer(buf, offset, qiov.size);
481
482         /* Finally, report back -- -C gives a parsable format */
483         t2 = tsub(t2, t1);
484         print_report("read", &t2, offset, qiov.size, total, cnt, Cflag);
485
486         qemu_io_free(buf);
487
488         return 0;
489 }
490
491 static const cmdinfo_t readv_cmd = {
492         .name           = "readv",
493         .cfunc          = readv_f,
494         .argmin         = 2,
495         .argmax         = -1,
496         .args           = "[-Cqv] [-P pattern ] off len [len..]",
497         .oneline        = "reads a number of bytes at a specified offset",
498         .help           = readv_help,
499 };
500
501 static const cmdinfo_t write_cmd;
502
503 static void
504 write_help(void)
505 {
506         printf(
507 "\n"
508 " writes a range of bytes from the given offset\n"
509 "\n"
510 " Example:\n"
511 " 'write 512 1k' - writes 1 kilobyte at 512 bytes into the open file\n"
512 "\n"
513 " Writes into a segment of the currently open file, using a buffer\n"
514 " filled with a set pattern (0xcdcdcdcd).\n"
515 " -p, -- use bdrv_pwrite to write the file\n"
516 " -P, -- use different pattern to fill file\n"
517 " -C, -- report statistics in a machine parsable format\n"
518 " -q, -- quite mode, do not show I/O statistics\n"
519 "\n");
520 }
521
522 static int
523 write_f(int argc, char **argv)
524 {
525         struct timeval t1, t2;
526         int Cflag = 0, pflag = 0, qflag = 0;
527         int c, cnt;
528         char *buf;
529         int64_t offset;
530         int count, total;
531         int pattern = 0xcd;
532
533         while ((c = getopt(argc, argv, "CpP:q")) != EOF) {
534                 switch (c) {
535                 case 'C':
536                         Cflag = 1;
537                         break;
538                 case 'p':
539                         pflag = 1;
540                         break;
541                 case 'P':
542                         pattern = atoi(optarg);
543                         break;
544                 case 'q':
545                         qflag = 1;
546                         break;
547                 default:
548                         return command_usage(&write_cmd);
549                 }
550         }
551
552         if (optind != argc - 2)
553                 return command_usage(&write_cmd);
554
555         offset = cvtnum(argv[optind]);
556         if (offset < 0) {
557                 printf("non-numeric length argument -- %s\n", argv[optind]);
558                 return 0;
559         }
560
561         optind++;
562         count = cvtnum(argv[optind]);
563         if (count < 0) {
564                 printf("non-numeric length argument -- %s\n", argv[optind]);
565                 return 0;
566         }
567
568         if (!pflag) {
569                 if (offset & 0x1ff) {
570                         printf("offset %lld is not sector aligned\n",
571                                 (long long)offset);
572                         return 0;
573                 }
574
575                 if (count & 0x1ff) {
576                         printf("count %d is not sector aligned\n",
577                                 count);
578                         return 0;
579                 }
580         }
581
582         buf = qemu_io_alloc(count, pattern);
583
584         gettimeofday(&t1, NULL);
585         if (pflag)
586                 cnt = do_pwrite(buf, offset, count, &total);
587         else
588                 cnt = do_write(buf, offset, count, &total);
589         gettimeofday(&t2, NULL);
590
591         if (cnt < 0) {
592                 printf("write failed: %s\n", strerror(-cnt));
593                 return 0;
594         }
595
596         if (qflag)
597                 return 0;
598
599         /* Finally, report back -- -C gives a parsable format */
600         t2 = tsub(t2, t1);
601         print_report("wrote", &t2, offset, count, total, cnt, Cflag);
602
603         qemu_io_free(buf);
604
605         return 0;
606 }
607
608 static const cmdinfo_t write_cmd = {
609         .name           = "write",
610         .altname        = "w",
611         .cfunc          = write_f,
612         .argmin         = 2,
613         .argmax         = -1,
614         .args           = "[-aCpq] [-P pattern ] off len",
615         .oneline        = "writes a number of bytes at a specified offset",
616         .help           = write_help,
617 };
618
619 static const cmdinfo_t writev_cmd;
620
621 static void
622 writev_help(void)
623 {
624         printf(
625 "\n"
626 " writes a range of bytes from the given offset source from multiple buffers\n"
627 "\n"
628 " Example:\n"
629 " 'write 512 1k 1k' - writes 2 kilobytes at 512 bytes into the open file\n"
630 "\n"
631 " Writes into a segment of the currently open file, using a buffer\n"
632 " filled with a set pattern (0xcdcdcdcd).\n"
633 " -P, -- use different pattern to fill file\n"
634 " -C, -- report statistics in a machine parsable format\n"
635 " -q, -- quite mode, do not show I/O statistics\n"
636 "\n");
637 }
638
639 static int
640 writev_f(int argc, char **argv)
641 {
642         struct timeval t1, t2;
643         int Cflag = 0, qflag = 0;
644         int c, cnt;
645         char *buf, *p;
646         int64_t offset;
647         int count = 0, total;
648         int nr_iov, i;
649         int pattern = 0xcd;
650         QEMUIOVector qiov;
651
652         while ((c = getopt(argc, argv, "CqP:")) != EOF) {
653                 switch (c) {
654                 case 'C':
655                         Cflag = 1;
656                         break;
657                 case 'q':
658                         qflag = 1;
659                         break;
660                 case 'P':
661                         pattern = atoi(optarg);
662                         break;
663                 default:
664                         return command_usage(&writev_cmd);
665                 }
666         }
667
668         if (optind > argc - 2)
669                 return command_usage(&writev_cmd);
670
671         offset = cvtnum(argv[optind]);
672         if (offset < 0) {
673                 printf("non-numeric length argument -- %s\n", argv[optind]);
674                 return 0;
675         }
676         optind++;
677
678         if (offset & 0x1ff) {
679                 printf("offset %lld is not sector aligned\n",
680                         (long long)offset);
681                 return 0;
682         }
683
684         if (count & 0x1ff) {
685                 printf("count %d is not sector aligned\n",
686                         count);
687                 return 0;
688         }
689
690
691         for (i = optind; i < argc; i++) {
692                 size_t len;
693
694                 len = cvtnum(argv[optind]);
695                 if (len < 0) {
696                         printf("non-numeric length argument -- %s\n", argv[i]);
697                         return 0;
698                 }
699                 count += len;
700         }
701
702         nr_iov = argc - optind;
703         qemu_iovec_init(&qiov, nr_iov);
704         buf = p = qemu_io_alloc(count, pattern);
705         for (i = 0; i < nr_iov; i++) {
706                 size_t len;
707
708                 len = cvtnum(argv[optind]);
709                 if (len < 0) {
710                         printf("non-numeric length argument -- %s\n",
711                                 argv[optind]);
712                         return 0;
713                 }
714
715                 qemu_iovec_add(&qiov, p, len);
716                 p += len;
717                 optind++;
718         }
719
720         gettimeofday(&t1, NULL);
721         cnt = do_aio_writev(&qiov, offset, &total);
722         gettimeofday(&t2, NULL);
723
724         if (cnt < 0) {
725                 printf("writev failed: %s\n", strerror(-cnt));
726                 return 0;
727         }
728
729         if (qflag)
730                 return 0;
731
732         /* Finally, report back -- -C gives a parsable format */
733         t2 = tsub(t2, t1);
734         print_report("wrote", &t2, offset, qiov.size, total, cnt, Cflag);
735
736         qemu_io_free(buf);
737
738         return 0;
739 }
740
741 static const cmdinfo_t writev_cmd = {
742         .name           = "writev",
743         .cfunc          = writev_f,
744         .argmin         = 2,
745         .argmax         = -1,
746         .args           = "[-Cq] [-P pattern ] off len [len..]",
747         .oneline        = "writes a number of bytes at a specified offset",
748         .help           = writev_help,
749 };
750
751 static int
752 flush_f(int argc, char **argv)
753 {
754         bdrv_flush(bs);
755         return 0;
756 }
757
758 static const cmdinfo_t flush_cmd = {
759         .name           = "flush",
760         .altname        = "f",
761         .cfunc          = flush_f,
762         .oneline        = "flush all in-core file state to disk",
763 };
764
765 static int
766 truncate_f(int argc, char **argv)
767 {
768         int64_t offset;
769         int ret;
770
771         offset = cvtnum(argv[1]);
772         if (offset < 0) {
773                 printf("non-numeric truncate argument -- %s\n", argv[1]);
774                 return 0;
775         }
776
777         ret = bdrv_truncate(bs, offset);
778         if (ret < 0) {
779                 printf("truncate: %s", strerror(ret));
780                 return 0;
781         }
782
783         return 0;
784 }
785
786 static const cmdinfo_t truncate_cmd = {
787         .name           = "truncate",
788         .altname        = "t",
789         .cfunc          = truncate_f,
790         .argmin         = 1,
791         .argmax         = 1,
792         .args           = "off",
793         .oneline        = "truncates the current file at the given offset",
794 };
795
796 static int
797 length_f(int argc, char **argv)
798 {
799         int64_t size;
800         char s1[64];
801
802         size = bdrv_getlength(bs);
803         if (size < 0) {
804                 printf("getlength: %s", strerror(size));
805                 return 0;
806         }
807
808         cvtstr(size, s1, sizeof(s1));
809         printf("%s\n", s1);
810         return 0;
811 }
812
813
814 static const cmdinfo_t length_cmd = {
815         .name           = "length",
816         .altname        = "l",
817         .cfunc          = length_f,
818         .oneline        = "gets the length of the current file",
819 };
820
821
822 static int
823 info_f(int argc, char **argv)
824 {
825         BlockDriverInfo bdi;
826         char s1[64], s2[64];
827         int ret;
828
829         if (bs->drv && bs->drv->format_name)
830                 printf("format name: %s\n", bs->drv->format_name);
831         if (bs->drv && bs->drv->protocol_name)
832                 printf("format name: %s\n", bs->drv->protocol_name);
833
834         ret = bdrv_get_info(bs, &bdi);
835         if (ret)
836                 return 0;
837
838         cvtstr(bdi.cluster_size, s1, sizeof(s1));
839         cvtstr(bdi.vm_state_offset, s2, sizeof(s2));
840
841         printf("cluster size: %s\n", s1);
842         printf("vm state offset: %s\n", s2);
843
844         return 0;
845 }
846
847
848
849 static const cmdinfo_t info_cmd = {
850         .name           = "info",
851         .altname        = "i",
852         .cfunc          = info_f,
853         .oneline        = "prints information about the current file",
854 };
855
856 static int
857 alloc_f(int argc, char **argv)
858 {
859         int64_t offset;
860         int nb_sectors;
861         char s1[64];
862         int num;
863         int ret;
864         const char *retstr;
865
866         offset = cvtnum(argv[1]);
867         if (offset & 0x1ff) {
868                 printf("offset %lld is not sector aligned\n",
869                         (long long)offset);
870                 return 0;
871         }
872
873         if (argc == 3)
874                 nb_sectors = cvtnum(argv[2]);
875         else
876                 nb_sectors = 1;
877
878         ret = bdrv_is_allocated(bs, offset >> 9, nb_sectors, &num);
879
880         cvtstr(offset, s1, sizeof(s1));
881
882         retstr = ret ? "allocated" : "not allocated";
883         if (nb_sectors == 1)
884                 printf("sector %s at offset %s\n", retstr, s1);
885         else
886                 printf("%d/%d sectors %s at offset %s\n",
887                         num, nb_sectors, retstr, s1);
888         return 0;
889 }
890
891 static const cmdinfo_t alloc_cmd = {
892         .name           = "alloc",
893         .altname        = "a",
894         .argmin         = 1,
895         .argmax         = 2,
896         .cfunc          = alloc_f,
897         .args           = "off [sectors]",
898         .oneline        = "checks if a sector is present in the file",
899 };
900
901 static int
902 close_f(int argc, char **argv)
903 {
904         bdrv_close(bs);
905         bs = NULL;
906         return 0;
907 }
908
909 static const cmdinfo_t close_cmd = {
910         .name           = "close",
911         .altname        = "c",
912         .cfunc          = close_f,
913         .oneline        = "close the current open file",
914 };
915
916 static int openfile(char *name, int flags)
917 {
918         if (bs) {
919                 fprintf(stderr, "file open already, try 'help close'\n");
920                 return 1;
921         }
922
923         bs = bdrv_new("hda");
924         if (!bs)
925                 return 1;
926
927         if (bdrv_open(bs, name, flags) == -1) {
928                 fprintf(stderr, "%s: can't open device %s\n", progname, name);
929                 bs = NULL;
930                 return 1;
931         }
932
933         return 0;
934 }
935
936 static void
937 open_help(void)
938 {
939         printf(
940 "\n"
941 " opens a new file in the requested mode\n"
942 "\n"
943 " Example:\n"
944 " 'open -Cn /tmp/data' - creates/opens data file read-write and uncached\n"
945 "\n"
946 " Opens a file for subsequent use by all of the other qemu-io commands.\n"
947 " -C, -- create new file if it doesn't exist\n"
948 " -r, -- open file read-only\n"
949 " -s, -- use snapshot file\n"
950 " -n, -- disable host cache\n"
951 "\n");
952 }
953
954 static const cmdinfo_t open_cmd;
955
956 static int
957 open_f(int argc, char **argv)
958 {
959         int flags = 0;
960         int readonly = 0;
961         int c;
962
963         while ((c = getopt(argc, argv, "snCr")) != EOF) {
964                 switch (c) {
965                 case 's':
966                         flags |= BDRV_O_SNAPSHOT;
967                         break;
968                 case 'n':
969                         flags |= BDRV_O_NOCACHE;
970                         break;
971                 case 'C':
972                         flags |= BDRV_O_CREAT;
973                         break;
974                 case 'r':
975                         readonly = 1;
976                         break;
977                 default:
978                         return command_usage(&open_cmd);
979                 }
980         }
981
982         if (readonly)
983                 flags |= BDRV_O_RDONLY;
984         else
985                 flags |= BDRV_O_RDWR;
986
987         if (optind != argc - 1)
988                 return command_usage(&open_cmd);
989
990         return openfile(argv[optind], flags);
991 }
992
993 static const cmdinfo_t open_cmd = {
994         .name           = "open",
995         .altname        = "o",
996         .cfunc          = open_f,
997         .argmin         = 1,
998         .argmax         = -1,
999         .flags          = CMD_NOFILE_OK,
1000         .args           = "[-Crsn] [path]",
1001         .oneline        = "open the file specified by path",
1002         .help           = open_help,
1003 };
1004
1005 static int
1006 init_args_command(
1007         int     index)
1008 {
1009         /* only one device allowed so far */
1010         if (index >= 1)
1011                 return 0;
1012         return ++index;
1013 }
1014
1015 static int
1016 init_check_command(
1017         const cmdinfo_t *ct)
1018 {
1019         if (ct->flags & CMD_FLAG_GLOBAL)
1020                 return 1;
1021         if (!(ct->flags & CMD_NOFILE_OK) && !bs) {
1022                 fprintf(stderr, "no file open, try 'help open'\n");
1023                 return 0;
1024         }
1025         return 1;
1026 }
1027
1028 static void usage(const char *name)
1029 {
1030         printf(
1031 "Usage: %s [-h] [-V] [-Crsnm] [-c cmd] ... [file]\n"
1032 "QEMU Disk excerciser\n"
1033 "\n"
1034 "  -C, --create         create new file if it doesn't exist\n"
1035 "  -c, --cmd            command to execute\n"
1036 "  -r, --read-only      export read-only\n"
1037 "  -s, --snapshot       use snapshot file\n"
1038 "  -n, --nocache        disable host cache\n"
1039 "  -m, --misalign       misalign allocations for O_DIRECT\n"
1040 "  -h, --help           display this help and exit\n"
1041 "  -V, --version        output version information and exit\n"
1042 "\n",
1043         name);
1044 }
1045
1046
1047 int main(int argc, char **argv)
1048 {
1049         int readonly = 0;
1050         const char *sopt = "hVc:Crsnm";
1051         struct option lopt[] = {
1052                 { "help", 0, 0, 'h' },
1053                 { "version", 0, 0, 'V' },
1054                 { "offset", 1, 0, 'o' },
1055                 { "cmd", 1, 0, 'c' },
1056                 { "create", 0, 0, 'C' },
1057                 { "read-only", 0, 0, 'r' },
1058                 { "snapshot", 0, 0, 's' },
1059                 { "nocache", 0, 0, 'n' },
1060                 { "misalign", 0, 0, 'm' },
1061                 { NULL, 0, 0, 0 }
1062         };
1063         int c;
1064         int opt_index = 0;
1065         int flags = 0;
1066
1067         progname = basename(argv[0]);
1068
1069         while ((c = getopt_long(argc, argv, sopt, lopt, &opt_index)) != -1) {
1070                 switch (c) {
1071                 case 's':
1072                         flags |= BDRV_O_SNAPSHOT;
1073                         break;
1074                 case 'n':
1075                         flags |= BDRV_O_NOCACHE;
1076                         break;
1077                 case 'c':
1078                         add_user_command(optarg);
1079                         break;
1080                 case 'C':
1081                         flags |= BDRV_O_CREAT;
1082                         break;
1083                 case 'r':
1084                         readonly = 1;
1085                         break;
1086                 case 'm':
1087                         misalign = 1;
1088                         break;
1089                 case 'V':
1090                         printf("%s version %s\n", progname, VERSION);
1091                         exit(0);
1092                 case 'h':
1093                         usage(progname);
1094                         exit(0);
1095                 default:
1096                         usage(progname);
1097                         exit(1);
1098                 }
1099         }
1100
1101         if ((argc - optind) > 1) {
1102                 usage(progname);
1103                 exit(1);
1104         }
1105
1106         bdrv_init();
1107
1108         /* initialize commands */
1109         quit_init();
1110         help_init();
1111         add_command(&open_cmd);
1112         add_command(&close_cmd);
1113         add_command(&read_cmd);
1114         add_command(&readv_cmd);
1115         add_command(&write_cmd);
1116         add_command(&writev_cmd);
1117         add_command(&flush_cmd);
1118         add_command(&truncate_cmd);
1119         add_command(&length_cmd);
1120         add_command(&info_cmd);
1121         add_command(&alloc_cmd);
1122
1123         add_args_command(init_args_command);
1124         add_check_command(init_check_command);
1125
1126         /* open the device */
1127         if (readonly)
1128                 flags |= BDRV_O_RDONLY;
1129         else
1130                 flags |= BDRV_O_RDWR;
1131
1132         if ((argc - optind) == 1)
1133                 openfile(argv[optind], flags);
1134         command_loop();
1135
1136         if (bs)
1137                 bdrv_close(bs);
1138         return 0;
1139 }