busybox/util-linux/fdformat.c

/* vi: set sw=4 ts=4: */
/* fdformat.c  -  Low-level formats a floppy disk - Werner Almesberger */

/* 1999-02-22 Arkadiusz Mi¶kiewicz <misiek@pld.ORG.PL>
 * - added Native Language Support
 * 1999-03-20 Arnaldo Carvalho de Melo <acme@conectiva.com.br>
 * - more i18n/nls translatable strings marked
 *
 * 5 July 2003 -- modified for Busybox by Erik Andersen
 */

#include "busybox.h"


/* Stuff extracted from linux/fd.h */
struct floppy_struct {
	unsigned int	size,		/* nr of sectors total */
			sect,		/* sectors per track */
			head,		/* nr of heads */
			track,		/* nr of tracks */
			stretch;	/* !=0 means double track steps */
#define FD_STRETCH 1
#define FD_SWAPSIDES 2

	unsigned char	gap,		/* gap1 size */

			rate,		/* data rate. |= 0x40 for perpendicular */
#define FD_2M 0x4
#define FD_SIZECODEMASK 0x38
#define FD_SIZECODE(floppy) (((((floppy)->rate&FD_SIZECODEMASK)>> 3)+ 2) %8)
#define FD_SECTSIZE(floppy) ( (floppy)->rate & FD_2M ? \
			     512 : 128 << FD_SIZECODE(floppy) )
#define FD_PERP 0x40

			spec1,		/* stepping rate, head unload time */
			fmt_gap;	/* gap2 size */
	const char	* name; /* used only for predefined formats */
};
struct format_descr {
	unsigned int device,head,track;
};
#define FDFMTBEG _IO(2,0x47)
#define	FDFMTTRK _IOW(2,0x48, struct format_descr)
#define FDFMTEND _IO(2,0x49)
#define FDGETPRM _IOR(2, 0x04, struct floppy_struct)
#define FD_FILL_BYTE 0xF6 /* format fill byte. */

static void xioctl(int fd, int request, void *argp, const char *string)
{
	if (ioctl(fd, request, argp) < 0) {
		bb_perror_msg_and_die(string);
	}
}

int fdformat_main(int argc,char **argv)
{
	int fd, n, cyl, read_bytes, verify;
	unsigned char *data;
	struct stat st;
	struct floppy_struct param;
	struct format_descr descr;

	if (argc < 2) {
		bb_show_usage();
	}
	verify = !getopt32(argc, argv, "n");
	argv += optind;

	xstat(*argv, &st);
	if (!S_ISBLK(st.st_mode)) {
		bb_error_msg_and_die("%s: not a block device", *argv);
		/* do not test major - perhaps this was an USB floppy */
	}

	/* O_RDWR for formatting and verifying */
	fd = xopen(*argv, O_RDWR);

	/* original message was: "Could not determine current format type" */
	xioctl(fd, FDGETPRM, &param, "FDGETPRM");

	printf("%s-sided, %d tracks, %d sec/track. Total capacity %d kB\n",
		(param.head == 2) ? "Double" : "Single",
		param.track, param.sect, param.size >> 1);

	/* FORMAT */
	printf("Formatting... ");
	xioctl(fd, FDFMTBEG, NULL, "FDFMTBEG");

	/* n == track */
	for (n = 0; n < param.track; n++) {
		descr.head = 0;
		descr.track = n;
		xioctl(fd, FDFMTTRK, &descr, "FDFMTTRK");
		printf("%3d\b\b\b", n);
		if (param.head == 2) {
			descr.head = 1;
			xioctl(fd, FDFMTTRK, &descr, "FDFMTTRK");
		}
	}

	xioctl(fd, FDFMTEND, NULL, "FDFMTEND");
	printf("done\n");

	/* VERIFY */
	if (verify) {
		/* n == cyl_size */
		n = param.sect*param.head*512;

		data = xmalloc(n);
		printf("Verifying... ");
		for (cyl = 0; cyl < param.track; cyl++) {
			printf("%3d\b\b\b", cyl);
			read_bytes = safe_read(fd, data, n);
			if (read_bytes != n) {
				if (read_bytes < 0) {
					bb_perror_msg(bb_msg_read_error);
				}
				bb_error_msg_and_die("problem reading cylinder %d, "
					"expected %d, read %d", cyl, n, read_bytes);
				// FIXME: maybe better seek & continue??
			}
			/* Check backwards so we don't need a counter */
			while (--read_bytes >= 0) {
				if (data[read_bytes] != FD_FILL_BYTE) {
					 printf("bad data in cyl %d\nContinuing... ",cyl);
				}
			}
		}
		/* There is no point in freeing blocks at the end of a program, because
		all of the program's space is given back to the system when the process
		terminates.*/

		if (ENABLE_FEATURE_CLEAN_UP) free(data);

		printf("done\n");
	}

	if (ENABLE_FEATURE_CLEAN_UP) close(fd);

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