plan9fox/sys/src/cmd/bitsy/bitsyload.c
2011-03-30 19:35:09 +03:00

131 lines
2.4 KiB
C

#include <u.h>
#include <libc.h>
enum
{
Magic= 0x5a5abeef,
};
typedef struct Method Method;
struct Method {
char *verb;
char *part;
char *file;
};
Method method[] =
{
{ "k", "/dev/flash/kernel", "/sys/src/9/bitsy/9bitsy" },
{ "r", "/dev/flash/ramdisk", "/sys/src/9/bitsy/paqdisk" },
{ "u", "/dev/flash/user", "/sys/src/9/bitsy/user" },
};
void
leputl(uchar *p, ulong x)
{
*p++ = x;
*p++ = x>>8;
*p++ = x>>16;
*p = x>>24;
}
void
usage(void)
{
fprint(2, "usage: %s k|r [file]\n", argv0);
exits("usage");
}
void
main(int argc, char **argv)
{
char *file;
int ctl, in, out;
int i, n;
uchar *buf;
char ctlfile[64];
char ctldata[1024];
char *args[10];
Dir *d;
ulong nsects, sectsize;
Method *m;
ARGBEGIN {
} ARGEND;
if(argc == 0)
usage();
for(m = method; m < method + nelem(method); m++)
if(strcmp(argv[0], m->verb) == 0)
break;
if(m == method + nelem(method))
usage();
if(argc < 2)
file = m->file;
else
file = argv[1];
in = open(file, OREAD);
if(in < 0)
sysfatal("%s: %r", file);
d = dirfstat(in);
if(d == nil)
sysfatal("stating %s: %r", file);
out = open(m->part, OWRITE);
if(out < 0)
sysfatal("%s: %r", m->part);
sprint(ctlfile, "%sctl", m->part);
ctl = open(ctlfile, ORDWR);
if(ctl < 0)
sysfatal("%s: %r", ctlfile);
i = read(ctl, ctldata, sizeof(ctldata) - 1);
if (i <= 0)
sysfatal("%s: %r", ctlfile);
ctldata[i] = '\0';
i = tokenize(ctldata, args, nelem(args));
if(i < 7)
sysfatal("bad flash geometry");
nsects = atoi(args[5]);
sectsize = atoi(args[6]);
if(nsects < 3)
sysfatal("unreasonable value for nsects: %lud", nsects);
if(sectsize < 512)
sysfatal("unreasonable value for sectsize: %lud", sectsize);
/* allocate a buffer and read in the whole file */
n = d->length;
buf = malloc(n + sectsize);
if(buf == nil)
sysfatal("not enough room to read in file: %r");
print("reading %d bytes of %s\n", n, file);
if(readn(in, buf, n) != n)
sysfatal("error reading file: %r");
close(in);
memset(buf + n, 0, sectsize);
n = ((n+sectsize-1)/sectsize)*sectsize;
if (nsects * sectsize < n)
sysfatal("file too large (%d) for partition (%lud)", n, nsects * sectsize);
print("erasing %s\n", m->part);
if(fprint(ctl, "erase") < 0)
sysfatal("erase %s: %r", ctlfile);
close(ctl);
print("writing %s\n", m->part);
for (i = 0; i < n; i += sectsize)
if(write(out, buf + i, sectsize) != sectsize)
sysfatal("writing %s at %d: %r", file, i);
print("write done\n");
close(in);
close(out);
}