1 | /* fdformat.c - Low-level formats a floppy disk - Werner Almesberger */
|
---|
2 |
|
---|
3 | /* 1999-02-22 Arkadiusz Mi¶kiewicz <misiek@pld.ORG.PL>
|
---|
4 | * - added Native Language Support
|
---|
5 | * 1999-03-20 Arnaldo Carvalho de Melo <acme@conectiva.com.br>
|
---|
6 | * - more i18n/nls translatable strings marked
|
---|
7 | *
|
---|
8 | * 5 July 2003 -- modified for Busybox by Erik Andersen
|
---|
9 | */
|
---|
10 |
|
---|
11 | #include <stdio.h>
|
---|
12 | #include <string.h>
|
---|
13 | #include <fcntl.h>
|
---|
14 | #include <errno.h>
|
---|
15 | #include <unistd.h>
|
---|
16 | #include <stdlib.h>
|
---|
17 | #include <sys/stat.h>
|
---|
18 | #include <sys/ioctl.h>
|
---|
19 | #include "busybox.h"
|
---|
20 |
|
---|
21 |
|
---|
22 | /* Stuff extracted from linux/fd.h */
|
---|
23 | struct floppy_struct {
|
---|
24 | unsigned int size, /* nr of sectors total */
|
---|
25 | sect, /* sectors per track */
|
---|
26 | head, /* nr of heads */
|
---|
27 | track, /* nr of tracks */
|
---|
28 | stretch; /* !=0 means double track steps */
|
---|
29 | #define FD_STRETCH 1
|
---|
30 | #define FD_SWAPSIDES 2
|
---|
31 |
|
---|
32 | unsigned char gap, /* gap1 size */
|
---|
33 |
|
---|
34 | rate, /* data rate. |= 0x40 for perpendicular */
|
---|
35 | #define FD_2M 0x4
|
---|
36 | #define FD_SIZECODEMASK 0x38
|
---|
37 | #define FD_SIZECODE(floppy) (((((floppy)->rate&FD_SIZECODEMASK)>> 3)+ 2) %8)
|
---|
38 | #define FD_SECTSIZE(floppy) ( (floppy)->rate & FD_2M ? \
|
---|
39 | 512 : 128 << FD_SIZECODE(floppy) )
|
---|
40 | #define FD_PERP 0x40
|
---|
41 |
|
---|
42 | spec1, /* stepping rate, head unload time */
|
---|
43 | fmt_gap; /* gap2 size */
|
---|
44 | const char * name; /* used only for predefined formats */
|
---|
45 | };
|
---|
46 | struct format_descr {
|
---|
47 | unsigned int device,head,track;
|
---|
48 | };
|
---|
49 | #define FDFMTBEG _IO(2,0x47)
|
---|
50 | #define FDFMTTRK _IOW(2,0x48, struct format_descr)
|
---|
51 | #define FDFMTEND _IO(2,0x49)
|
---|
52 | #define FDGETPRM _IOR(2, 0x04, struct floppy_struct)
|
---|
53 | #define FD_FILL_BYTE 0xF6 /* format fill byte. */
|
---|
54 |
|
---|
55 | static void print_and_flush(const char * __restrict format, ...)
|
---|
56 | {
|
---|
57 | va_list arg;
|
---|
58 |
|
---|
59 | va_start(arg, format);
|
---|
60 | bb_vfprintf(stdout, format, arg);
|
---|
61 | va_end(arg);
|
---|
62 | bb_xfflush_stdout();
|
---|
63 | }
|
---|
64 |
|
---|
65 | static void bb_xioctl(int fd, int request, void *argp, const char *string)
|
---|
66 | {
|
---|
67 | if (ioctl (fd, request, argp) < 0) {
|
---|
68 | bb_perror_msg_and_die(string);
|
---|
69 | }
|
---|
70 | }
|
---|
71 |
|
---|
72 | int fdformat_main(int argc,char **argv)
|
---|
73 | {
|
---|
74 | int fd, n, cyl, read_bytes, verify;
|
---|
75 | unsigned char *data;
|
---|
76 | struct stat st;
|
---|
77 | struct floppy_struct param;
|
---|
78 | struct format_descr descr;
|
---|
79 |
|
---|
80 | if (argc < 2) {
|
---|
81 | bb_show_usage();
|
---|
82 | }
|
---|
83 | verify = !bb_getopt_ulflags(argc, argv, "n");
|
---|
84 | argv += optind;
|
---|
85 |
|
---|
86 | /* R_OK is needed for verifying */
|
---|
87 | if (stat(*argv,&st) < 0 || access(*argv,W_OK | R_OK ) < 0) {
|
---|
88 | bb_perror_msg_and_die("%s",*argv);
|
---|
89 | }
|
---|
90 | if (!S_ISBLK(st.st_mode)) {
|
---|
91 | bb_error_msg_and_die("%s: not a block device",*argv);
|
---|
92 | /* do not test major - perhaps this was an USB floppy */
|
---|
93 | }
|
---|
94 |
|
---|
95 |
|
---|
96 | /* O_RDWR for formatting and verifying */
|
---|
97 | fd = bb_xopen(*argv,O_RDWR );
|
---|
98 |
|
---|
99 | bb_xioctl(fd, FDGETPRM, ¶m, "FDGETPRM");/*original message was: "Could not determine current format type" */
|
---|
100 |
|
---|
101 | print_and_flush("%s-sided, %d tracks, %d sec/track. Total capacity %d kB.\n",
|
---|
102 | (param.head == 2) ? "Double" : "Single",
|
---|
103 | param.track, param.sect, param.size >> 1);
|
---|
104 |
|
---|
105 | /* FORMAT */
|
---|
106 | print_and_flush("Formatting ... ", NULL);
|
---|
107 | bb_xioctl(fd, FDFMTBEG,NULL,"FDFMTBEG");
|
---|
108 |
|
---|
109 | /* n == track */
|
---|
110 | for (n = 0; n < param.track; n++)
|
---|
111 | {
|
---|
112 | descr.head = 0;
|
---|
113 | descr.track = n;
|
---|
114 | bb_xioctl(fd, FDFMTTRK,&descr,"FDFMTTRK");
|
---|
115 | print_and_flush("%3d\b\b\b", n);
|
---|
116 | if (param.head == 2) {
|
---|
117 | descr.head = 1;
|
---|
118 | bb_xioctl(fd, FDFMTTRK,&descr,"FDFMTTRK");
|
---|
119 | }
|
---|
120 | }
|
---|
121 |
|
---|
122 | bb_xioctl(fd,FDFMTEND,NULL,"FDFMTEND");
|
---|
123 | print_and_flush("done\n", NULL);
|
---|
124 |
|
---|
125 | /* VERIFY */
|
---|
126 | if(verify) {
|
---|
127 | /* n == cyl_size */
|
---|
128 | n = param.sect*param.head*512;
|
---|
129 |
|
---|
130 | data = xmalloc(n);
|
---|
131 | print_and_flush("Verifying ... ", NULL);
|
---|
132 | for (cyl = 0; cyl < param.track; cyl++) {
|
---|
133 | print_and_flush("%3d\b\b\b", cyl);
|
---|
134 | if((read_bytes = safe_read(fd,data,n))!= n ) {
|
---|
135 | if(read_bytes < 0) {
|
---|
136 | bb_perror_msg(bb_msg_read_error);
|
---|
137 | }
|
---|
138 | bb_error_msg_and_die("Problem reading cylinder %d, expected %d, read %d", cyl, n, read_bytes);
|
---|
139 | }
|
---|
140 | /* Check backwards so we don't need a counter */
|
---|
141 | while(--read_bytes>=0) {
|
---|
142 | if( data[read_bytes] != FD_FILL_BYTE) {
|
---|
143 | print_and_flush("bad data in cyl %d\nContinuing ... ",cyl);
|
---|
144 | }
|
---|
145 | }
|
---|
146 | }
|
---|
147 | /* There is no point in freeing blocks at the end of a program, because
|
---|
148 | all of the program's space is given back to the system when the process
|
---|
149 | terminates.*/
|
---|
150 |
|
---|
151 | if (ENABLE_FEATURE_CLEAN_UP) free(data);
|
---|
152 |
|
---|
153 | print_and_flush("done\n", NULL);
|
---|
154 | }
|
---|
155 |
|
---|
156 | if (ENABLE_FEATURE_CLEAN_UP) close(fd);
|
---|
157 |
|
---|
158 | /* Don't bother closing. Exit does
|
---|
159 | * that, so we can save a few bytes */
|
---|
160 | return EXIT_SUCCESS;
|
---|
161 | }
|
---|