1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072 |
- #include "all.h"
- #include "io.h"
- static void dowormcopy(void);
- static int dodevcopy(void);
- /*
- * This is needed for IP configuration.
- */
- #include "../ip/ip.h"
- struct
- {
- char* icharp;
- char* charp;
- int error;
- int newconf; /* clear befor start */
- int modconf; /* write back when done */
- int nextiter;
- int lastiter;
- int diriter;
- int ipauthset;
- Device* lastcw;
- Device* devlist;
- } f;
- static Device* confdev;
- static int copyworm = 0, copydev = 0;
- static char *src, *dest;
- int
- devcmpr(Device *d1, Device *d2)
- {
- while (d1 != d2) {
- if(d1 == 0 || d2 == 0 || d1->type != d2->type)
- return 1;
- switch(d1->type) {
- default:
- print("can't compare dev: %Z\n", d1);
- panic("devcmp");
- return 1;
- case Devmcat:
- case Devmlev:
- case Devmirr:
- d1 = d1->cat.first;
- d2 = d2->cat.first;
- while(d1 && d2) {
- if(devcmpr(d1, d2))
- return 1;
- d1 = d1->link;
- d2 = d2->link;
- }
- break;
- case Devnone:
- return 0;
- case Devro:
- d1 = d1->ro.parent;
- d2 = d2->ro.parent;
- break;
- case Devjuke:
- case Devcw:
- if(devcmpr(d1->cw.c, d2->cw.c))
- return 1;
- d1 = d1->cw.w;
- d2 = d2->cw.w;
- break;
- case Devfworm:
- d1 = d1->fw.fw;
- d2 = d2->fw.fw;
- break;
- case Devwren:
- case Devworm:
- case Devlworm:
- case Devide:
- case Devmarvsata:
- if(d1->wren.ctrl == d2->wren.ctrl)
- if(d1->wren.targ == d2->wren.targ)
- if(d1->wren.lun == d2->wren.lun)
- return 0;
- return 1;
- case Devpart:
- if(d1->part.base == d2->part.base)
- if(d1->part.size == d2->part.size) {
- d1 = d1->part.d;
- d2 = d2->part.d;
- break;
- }
- return 1;
- }
- }
- return 0;
- }
- void
- cdiag(char *s, int c1)
- {
- f.charp--;
- if(f.error == 0) {
- print("config diag: %s -- <%c>\n", s, c1);
- f.error = 1;
- }
- }
- int
- cnumb(void)
- {
- int c, n;
- c = *f.charp++;
- if(c == '<') {
- n = f.nextiter;
- if(n >= 0) {
- f.nextiter = n+f.diriter;
- if(n == f.lastiter) {
- f.nextiter = -1;
- f.lastiter = -1;
- }
- do {
- c = *f.charp++;
- } while (c != '>');
- return n;
- }
- n = cnumb();
- if(*f.charp++ != '-') {
- cdiag("- expected", f.charp[-1]);
- return 0;
- }
- c = cnumb();
- if(*f.charp++ != '>') {
- cdiag("> expected", f.charp[-1]);
- return 0;
- }
- f.lastiter = c;
- f.diriter = 1;
- if(n > c)
- f.diriter = -1;
- f.nextiter = n+f.diriter;
- return n;
- }
- if(c < '0' || c > '9') {
- cdiag("number expected", c);
- return 0;
- }
- n = 0;
- while(c >= '0' && c <= '9') {
- n = n*10 + (c-'0');
- c = *f.charp++;
- }
- f.charp--;
- return n;
- }
- Device*
- config1(int c)
- {
- Device *d, *t;
- int m;
- d = ialloc(sizeof(Device), 0);
- for(;;) {
- t = config();
- if(d->cat.first == 0)
- d->cat.first = t;
- else
- d->cat.last->link = t;
- d->cat.last = t;
- if(f.error)
- return devnone;
- m = *f.charp;
- if(c == '(' && m == ')') {
- d->type = Devmcat;
- break;
- }
- if(c == '[' && m == ']') {
- d->type = Devmlev;
- break;
- }
- if(c == '{' && m == '}') {
- d->type = Devmirr;
- break;
- }
- }
- f.charp++;
- if(d->cat.first == d->cat.last)
- d = d->cat.first;
- return d;
- }
- Device*
- config(void)
- {
- int c, m;
- Device *d;
- char *icp;
- if(f.error)
- return devnone;
- d = ialloc(sizeof(Device), 0);
- c = *f.charp++;
- switch(c) {
- default:
- cdiag("unknown type", c);
- return devnone;
- case '(': /* (d+) one or multiple cat */
- case '[': /* [d+] one or multiple interleave */
- case '{': /* {d+} a mirrored device and optional mirrors */
- return config1(c);
- case 'f': /* fd fake worm */
- d->type = Devfworm;
- d->fw.fw = config();
- break;
- case 'n':
- d->type = Devnone;
- break;
- case 'w': /* w[#.]#[.#] wren [ctrl] unit [lun] */
- case 'h': /* h[#.]# ide [ctlr] unit */
- case 'm': /* m[#.]# marvell sata [ctlr] unit */
- case 'r': /* r# worm side */
- case 'l': /* l# labelled-worm side */
- icp = f.charp;
- if(c == 'm')
- d->type = Devmarvsata;
- else if(c == 'h')
- d->type = Devide;
- else
- d->type = Devwren;
- d->wren.ctrl = 0;
- d->wren.targ = cnumb();
- d->wren.lun = 0;
- m = *f.charp;
- if(m == '.') {
- f.charp++;
- d->wren.lun = cnumb();
- m = *f.charp;
- if(m == '.') {
- f.charp++;
- d->wren.ctrl = d->wren.targ;
- d->wren.targ = d->wren.lun;
- d->wren.lun = cnumb();
- }
- }
- if(f.nextiter >= 0)
- f.charp = icp-1;
- if(c == 'r') { /* worms are virtual and not uniqued */
- d->type = Devworm;
- break;
- }
- if(c == 'l') {
- d->type = Devlworm;
- break;
- }
- break;
- case 'o': /* o ro part of last cw */
- if(f.lastcw == 0) {
- cdiag("no cw to match", c);
- return devnone;
- }
- return f.lastcw->cw.ro;
- case 'j': /* DD jukebox */
- d->type = Devjuke;
- d->j.j = config();
- d->j.m = config();
- break;
- case 'c': /* cache/worm */
- d->type = Devcw;
- d->cw.c = config();
- d->cw.w = config();
- d->cw.ro = ialloc(sizeof(Device), 0);
- d->cw.ro->type = Devro;
- d->cw.ro->ro.parent = d;
- f.lastcw = d;
- break;
- case 'p': /* pd#.# partition base% size% */
- d->type = Devpart;
- d->part.d = config();
- d->part.base = cnumb();
- c = *f.charp++;
- if(c != '.')
- cdiag("dot expected", c);
- d->part.size = cnumb();
- break;
- case 'x': /* xD swab a device's metadata */
- d->type = Devswab;
- d->swab.d = config();
- break;
- }
- d->dlink = f.devlist;
- f.devlist = d;
- return d;
- }
- char*
- strdup(char *s)
- {
- int n;
- char *s1;
- n = strlen(s);
- s1 = ialloc(n+1, 0);
- strcpy(s1, s);
- return s1;
- }
- Device*
- iconfig(char *s)
- {
- Device *d;
- f.nextiter = -1;
- f.lastiter = -1;
- f.error = 0;
- f.icharp = s;
- f.charp = f.icharp;
- d = config();
- if(*f.charp) {
- cdiag("junk on end", *f.charp);
- f.error = 1;
- }
- return d;
- }
- int
- testconfig(char *s)
- {
- iconfig(s);
- return f.error;
- }
- int
- astrcmp(char *a, char *b)
- {
- int n, c;
- n = strlen(b);
- if(memcmp(a, b, n))
- return 1;
- c = a[n];
- if(c == 0) {
- aindex = 0;
- return 0;
- }
- if(a[n+1])
- return 1;
- if(c >= '0' && c <= '9') {
- aindex = c - '0';
- return 0;
- }
- return 1;
- }
- void
- mergeconf(Iobuf *p)
- {
- char word[Maxword+1];
- char *cp;
- Filsys *fs;
- for (cp = p->iobuf; ; cp++) {
- cp = getwd(word, cp);
- if(strcmp(word, "") == 0)
- return;
- else if(strcmp(word, "service") == 0) {
- cp = getwd(word, cp);
- if(service[0] == 0)
- strcpy(service, word);
- } else if(strcmp(word, "ipauth") == 0) {
- cp = getwd(word, cp);
- if(!f.ipauthset)
- if(chartoip(authip, word))
- goto bad;
- } else if(astrcmp(word, "ip") == 0) {
- cp = getwd(word, cp);
- if(!isvalidip(ipaddr[aindex].sysip))
- if(chartoip(ipaddr[aindex].sysip, word))
- goto bad;
- } else if(astrcmp(word, "ipgw") == 0) {
- cp = getwd(word, cp);
- if(!isvalidip(ipaddr[aindex].defgwip))
- if(chartoip(ipaddr[aindex].defgwip, word))
- goto bad;
- } else if(astrcmp(word, "ipsntp") == 0) {
- cp = getwd(word, cp);
- if (!isvalidip(sntpip))
- if (chartoip(sntpip, word))
- goto bad;
- } else if(astrcmp(word, "ipmask") == 0) {
- cp = getwd(word, cp);
- if(!isvalidip(ipaddr[aindex].defmask))
- if(chartoip(ipaddr[aindex].defmask, word))
- goto bad;
- } else if(strcmp(word, "filsys") == 0) {
- cp = getwd(word, cp);
- for(fs=filsys; fs->name; fs++)
- if(strcmp(fs->name, word) == 0) {
- if(fs->flags & FEDIT) {
- cp = getwd(word, cp);
- goto loop;
- }
- break;
- }
- fs->name = strdup(word);
- cp = getwd(word, cp);
- fs->conf = strdup(word);
- } else {
- bad:
- putbuf(p);
- panic("unknown word in config block: %s", word);
- }
- loop:
- if(*cp != '\n')
- goto bad;
- }
- }
- void
- cmd_printconf(int, char *[])
- {
- char *p, *s;
- Iobuf *iob;
- iob = getbuf(confdev, 0, Bread);
- if(iob == nil)
- return;
- if(checktag(iob, Tconfig, 0)){
- putbuf(iob);
- return;
- }
- print("config %s\n", nvrgetconfig());
- s = p = iob->iobuf;
- while(*p != 0 && p < iob->iobuf+BUFSIZE){
- if(*p++ != '\n')
- continue;
- print("%.*s", (int)(p-s), s);
- s = p;
- }
- if(p != s)
- print("%.*s", (int)(p-s), s);
- print("end\n");
- putbuf(iob);
- }
- extern void floppyhalt(void);
- void
- sysinit(void)
- {
- Filsys *fs;
- int error, i;
- Device *d;
- Iobuf *p;
- char *cp;
- dofilter(u->time+0, C0a, C0b, 1);
- dofilter(u->time+1, C1a, C1b, 1);
- dofilter(u->time+2, C2a, C2b, 1);
- dofilter(cons.work+0, C0a, C0b, 1);
- dofilter(cons.work+1, C1a, C1b, 1);
- dofilter(cons.work+2, C2a, C2b, 1);
- dofilter(cons.rate+0, C0a, C0b, 1000);
- dofilter(cons.rate+1, C1a, C1b, 1000);
- dofilter(cons.rate+2, C2a, C2b, 1000);
- dofilter(cons.bhit+0, C0a, C0b, 1);
- dofilter(cons.bhit+1, C1a, C1b, 1);
- dofilter(cons.bhit+2, C2a, C2b, 1);
- dofilter(cons.bread+0, C0a, C0b, 1);
- dofilter(cons.bread+1, C1a, C1b, 1);
- dofilter(cons.bread+2, C2a, C2b, 1);
- dofilter(cons.brahead+0, C0a, C0b, 1);
- dofilter(cons.brahead+1, C1a, C1b, 1);
- dofilter(cons.brahead+2, C2a, C2b, 1);
- dofilter(cons.binit+0, C0a, C0b, 1);
- dofilter(cons.binit+1, C1a, C1b, 1);
- dofilter(cons.binit+2, C2a, C2b, 1);
- cons.chan = chaninit(Devcon, 1, 0);
- start:
- /*
- * part 1 -- read the config file
- */
- devnone = iconfig("n");
- cp = nvrgetconfig();
- print("config %s\n", cp);
- confdev = d = iconfig(cp);
- devinit(d);
- if(f.newconf) {
- p = getbuf(d, 0, Bmod);
- memset(p->iobuf, 0, RBUFSIZE);
- settag(p, Tconfig, 0);
- } else
- p = getbuf(d, 0, Bread|Bmod);
- if(!p || checktag(p, Tconfig, 0))
- panic("config io");
- mergeconf(p);
- if(f.modconf) {
- memset(p->iobuf, 0, BUFSIZE);
- p->flags |= Bmod|Bimm;
- if(service[0])
- sprint(strchr(p->iobuf, 0), "service %s\n", service);
- for(fs=filsys; fs->name; fs++)
- if(fs->conf)
- sprint(strchr(p->iobuf, 0),
- "filsys %s %s\n", fs->name, fs->conf);
- sprint(strchr(p->iobuf, 0), "ipauth %I\n", authip);
- sprint(strchr(p->iobuf, 0), "ipsntp %I\n", sntpip);
- for(i=0; i<10; i++) {
- if(isvalidip(ipaddr[i].sysip))
- sprint(strchr(p->iobuf, 0),
- "ip%d %I\n", i, ipaddr[i].sysip);
- if(isvalidip(ipaddr[i].defgwip))
- sprint(strchr(p->iobuf, 0),
- "ipgw%d %I\n", i, ipaddr[i].defgwip);
- if(isvalidip(ipaddr[i].defmask))
- sprint(strchr(p->iobuf, 0),
- "ipmask%d %I\n", i, ipaddr[i].defmask);
- }
- putbuf(p);
- f.modconf = 0;
- f.newconf = 0;
- print("config block written\n");
- goto start;
- }
- putbuf(p);
- print("service %s\n", service);
- print("ipauth %I\n", authip);
- print("ipsntp %I\n", sntpip);
- for(i=0; i<10; i++) {
- if(isvalidip(ipaddr[i].sysip)) {
- print("ip%d %I\n", i, ipaddr[i].sysip);
- print("ipgw%d %I\n", i, ipaddr[i].defgwip);
- print("ipmask%d %I\n", i, ipaddr[i].defmask);
- }
- }
- loop:
- /*
- * part 2 -- squeeze out the deleted filesystems
- */
- for(fs=filsys; fs->name; fs++)
- if(fs->conf == 0) {
- for(; fs->name; fs++)
- *fs = *(fs+1);
- goto loop;
- }
- if(filsys[0].name == 0)
- panic("no filsys");
- /*
- * part 3 -- compile the device expression
- */
- error = 0;
- for(fs=filsys; fs->name; fs++) {
- print("filsys %s %s\n", fs->name, fs->conf);
- fs->dev = iconfig(fs->conf);
- if(f.error) {
- error = 1;
- continue;
- }
- }
- if(error)
- panic("fs config");
- /*
- * part 4 -- initialize the devices
- */
- for(fs=filsys; fs->name; fs++) {
- delay(3000);
- print("sysinit: %s\n", fs->name);
- if(fs->flags & FREAM)
- devream(fs->dev, 1);
- if(fs->flags & FRECOVER)
- devrecover(fs->dev);
- devinit(fs->dev);
- }
- floppyhalt(); /* don't wear out the floppy */
- if (copyworm) {
- dowormcopy(); /* can return if user quits early */
- panic("copyworm bailed out!");
- }
- if (copydev)
- if (dodevcopy() < 0)
- panic("copydev failed!");
- else
- panic("copydev done.");
- }
- /* an unfinished idea. a non-blocking rawchar() would help. */
- static int
- userabort(char *msg)
- {
- #ifdef IdeaIsFinished
- if (consgetcifany() == 'q') {
- print("aborting %s\n", msg);
- return 1;
- }
- #else
- USED(msg);
- #endif /* IdeaIsFinished */
- return 0;
- }
- static int
- blockok(Device *d, Off a)
- {
- Iobuf *p = getbuf(d, a, Bread);
- if (p == 0) {
- print("i/o error reading %Z block %lld\n", d, (Wideoff)a);
- return 0;
- }
- putbuf(p);
- return 1;
- }
- /*
- * special case for fake worms only:
- * we need to size the inner cw's worm device.
- * in particular, we want to avoid copying the fake-worm bitmap
- * at the end of the device.
- *
- * N.B.: for real worms (e.g. cw jukes), we need to compute devsize(cw(juke)),
- * *NOT* devsize(juke).
- */
- static Device *
- wormof(Device *dev)
- {
- Device *worm = dev, *cw;
- if (dev->type == Devfworm) {
- cw = dev->fw.fw;
- if (cw != nil && cw->type == Devcw)
- worm = cw->cw.w;
- }
- // print("wormof(%Z)=%Z\n", dev, worm);
- return worm;
- }
- /*
- * return the number of the highest-numbered block actually written, plus 1.
- * 0 indicates an error.
- */
- static Devsize
- writtensize(Device *worm)
- {
- Devsize lim = devsize(worm);
- Iobuf *p;
- print("devsize(%Z) = %lld\n", worm, (Wideoff)lim);
- if (!blockok(worm, 0) || !blockok(worm, lim-1))
- return 0;
- delay(5*1000);
- if (userabort("sanity checks"))
- return 0;
- /* find worm's last valid block in case "worm" is an (f)worm */
- while (lim > 0) {
- if (userabort("sizing")) {
- lim = 0; /* you lose */
- break;
- }
- --lim;
- p = getbuf(worm, lim, Bread);
- if (p != 0) { /* actually read one okay? */
- putbuf(p);
- break;
- }
- }
- print("limit(%Z) = %lld\n", worm, (Wideoff)lim);
- return lim <= 0? 0: lim + 1;
- }
- /* copy worm fs from "main"'s inner worm to "output" */
- static void
- dowormcopy(void)
- {
- Filsys *f1, *f2;
- Device *fdev, *from, *to = nil;
- Iobuf *p;
- Off a;
- Devsize lim;
- /*
- * convert file system names into Filsyss and Devices.
- */
- f1 = fsstr("main");
- if(f1 == nil)
- panic("main file system missing");
- fdev = f1->dev;
- from = wormof(fdev); /* fake worm special */
- if (from->type != Devfworm && from->type != Devcw) {
- print("main file system is not a worm; copyworm may not do what you want!\n");
- print("waiting for 20 seconds...\n");
- delay(20000);
- }
- f2 = fsstr("output");
- if(f2 == nil) {
- print("no output file system - check only\n\n");
- print("reading worm from %Z (worm %Z)\n", fdev, from);
- } else {
- to = f2->dev;
- print("\ncopying worm from %Z (worm %Z) to %Z, starting in 8 seconds\n",
- fdev, from, to);
- delay(8000);
- }
- if (userabort("preparing to copy"))
- return;
- /*
- * initialise devices, size them, more sanity checking.
- */
- devinit(from);
- if (0 && fdev != from) {
- devinit(fdev);
- print("debugging, sizing %Z first\n", fdev);
- writtensize(fdev);
- }
- lim = writtensize(from);
- if(lim == 0)
- panic("no blocks to copy on %Z", from);
- if (to) {
- print("reaming %Z in 8 seconds\n", to);
- delay(8000);
- if (userabort("preparing to ream & copy"))
- return;
- devream(to, 0);
- devinit(to);
- print("copying worm: %lld blocks from %Z to %Z\n",
- (Wideoff)lim, from, to);
- }
- /* can't read to's blocks in case to is a real WORM device */
- /*
- * Copy written fs blocks, a block at a time (or just read
- * if no "output" fs).
- */
- for (a = 0; a < lim; a++) {
- if (userabort("copy"))
- break;
- p = getbuf(from, a, Bread);
- /*
- * if from is a real WORM device, we'll get errors trying to
- * read unwritten blocks, but the unwritten blocks need not
- * be contiguous.
- */
- if (p == 0) {
- print("%lld not written yet; can't read\n", (Wideoff)a);
- continue;
- }
- if (to != 0 && devwrite(to, p->addr, p->iobuf) != 0) {
- print("out block %lld: write error; bailing",
- (Wideoff)a);
- break;
- }
- putbuf(p);
- if(a % 20000 == 0)
- print("block %lld %T\n", (Wideoff)a, time());
- }
- /*
- * wrap up: sync target, loop
- */
- print("copied %lld blocks from %Z to %Z\n", (Wideoff)a, from, to);
- sync("wormcopy");
- delay(2000);
- print("looping; reset the machine at any time.\n");
- for (; ; )
- continue; /* await reset */
- }
- /* copy device from src to dest */
- static int
- dodevcopy(void)
- {
- Device *from, *to;
- Iobuf *p;
- Off a;
- Devsize lim, tosize;
- /*
- * convert config strings into Devices.
- */
- from = iconfig(src);
- if(f.error || from == nil) {
- print("bad src device %s\n", src);
- return -1;
- }
- to = iconfig(dest);
- if(f.error || to == nil) {
- print("bad dest device %s\n", dest);
- return -1;
- }
- /*
- * initialise devices, size them, more sanity checking.
- */
- devinit(from);
- lim = devsize(from);
- if(lim == 0)
- panic("no blocks to copy on %Z", from);
- devinit(to);
- tosize = devsize(to);
- if(tosize == 0)
- panic("no blocks to copy on %Z", to);
- /* use smaller of the device sizes */
- if (tosize < lim)
- lim = tosize;
- print("copy %Z to %Z in 8 seconds\n", from, to);
- delay(8000);
- if (userabort("preparing to copy"))
- return -1;
- print("copying dev: %lld blocks from %Z to %Z\n", (Wideoff)lim,
- from, to);
- /*
- * Copy all blocks, a block at a time.
- */
- for (a = 0; a < lim; a++) {
- if (userabort("copy"))
- break;
- p = getbuf(from, a, Bread);
- /*
- * if from is a real WORM device, we'll get errors trying to
- * read unwritten blocks, but the unwritten blocks need not
- * be contiguous.
- */
- if (p == 0) {
- print("%lld not written yet; can't read\n", (Wideoff)a);
- continue;
- }
- if (to != 0 && devwrite(to, p->addr, p->iobuf) != 0) {
- print("out block %lld: write error; bailing",
- (Wideoff)a);
- break;
- }
- putbuf(p);
- if(a % 20000 == 0)
- print("block %lld %T\n", (Wideoff)a, time());
- }
- /*
- * wrap up: sync target
- */
- print("copied %lld blocks from %Z to %Z\n", (Wideoff)a, from, to);
- sync("devcopy");
- return 0;
- }
- void
- getline(char *line)
- {
- char *p;
- int c;
- p = line;
- for(;;) {
- c = rawchar(0);
- if(c == 0 || c == '\n') {
- *p = 0;
- return;
- }
- if(c == '\b') {
- p--;
- continue;
- }
- *p++ = c;
- }
- }
- void
- arginit(void)
- {
- int verb, c;
- char line[2*Maxword], word[Maxword+1], *cp;
- uchar localip[Pasize];
- Filsys *fs;
- if(nvrcheck() == 0){
- print("for config mode hit a key within 5 seconds\n");
- c = rawchar(5);
- if(c == 0) {
- print(" no config\n");
- return;
- }
- }
- for (;;) {
- print("config: ");
- getline(line);
- cp = getwd(word, line);
- if (word[0] == '\0' || word[0] == '#')
- continue;
- if(strcmp(word, "end") == 0)
- return;
- if(strcmp(word, "halt") == 0) {
- floppyhalt();
- exit();
- }
- if(strcmp(word, "allow") == 0) {
- wstatallow = 1;
- writeallow = 1;
- continue;
- }
- if(strcmp(word, "copyworm") == 0) {
- copyworm = 1;
- continue;
- }
- if(strcmp(word, "copydev") == 0) { /* not yet documented */
- cp = getwd(word, cp);
- if(testconfig(word))
- continue;
- src = strdup(word);
- getwd(word, cp);
- if(testconfig(word))
- continue;
- dest = strdup(word);
- copydev = 1;
- continue;
- }
- if(strcmp(word, "noauth") == 0) {
- noauth = !noauth;
- continue;
- }
- if(strcmp(word, "noattach") == 0) {
- noattach = !noattach;
- continue;
- }
- if(strcmp(word, "readonly") == 0) {
- readonly = 1;
- continue;
- }
- if(strcmp(word, "ream") == 0) {
- verb = FREAM;
- goto gfsname;
- }
- if(strcmp(word, "recover") == 0) {
- verb = FRECOVER;
- goto gfsname;
- }
- if(strcmp(word, "filsys") == 0) {
- verb = FEDIT;
- goto gfsname;
- }
- if(strcmp(word, "nvram") == 0) {
- getwd(word, cp);
- if(testconfig(word))
- continue;
- /* if it fails, it will complain */
- nvrsetconfig(word);
- continue;
- }
- if(strcmp(word, "config") == 0) {
- getwd(word, cp);
- if(!testconfig(word) && nvrsetconfig(word) == 0)
- f.newconf = 1;
- continue;
- }
- if(strcmp(word, "service") == 0) {
- getwd(word, cp);
- strcpy(service, word);
- f.modconf = 1;
- continue;
- }
- if(strcmp(word, "ipauth") == 0) {
- f.ipauthset = 1;
- verb = 2;
- } else if(astrcmp(word, "ip") == 0)
- verb = 0;
- else if(astrcmp(word, "ipgw") == 0)
- verb = 1;
- else if(astrcmp(word, "ipmask") == 0)
- verb = 3;
- else if(astrcmp(word, "ipsntp") == 0)
- verb = 4;
- else {
- print("unknown config command\n");
- print(" type end to get out\n");
- continue;
- }
- getwd(word, cp);
- if(chartoip(localip, word)) {
- print("bad ip address\n");
- continue;
- }
- switch(verb) {
- case 0:
- memmove(ipaddr[aindex].sysip, localip,
- sizeof(ipaddr[aindex].sysip));
- break;
- case 1:
- memmove(ipaddr[aindex].defgwip, localip,
- sizeof(ipaddr[aindex].defgwip));
- break;
- case 2:
- memmove(authip, localip, sizeof(authip));
- break;
- case 3:
- memmove(ipaddr[aindex].defmask, localip,
- sizeof(ipaddr[aindex].defmask));
- break;
- case 4:
- memmove(sntpip, localip, sizeof(sntpip));
- break;
- }
- f.modconf = 1;
- continue;
- gfsname:
- cp = getwd(word, cp);
- for(fs=filsys; fs->name; fs++)
- if(strcmp(word, fs->name) == 0)
- break;
- if (fs->name == nil) {
- memset(fs, 0, sizeof(*fs));
- fs->name = strdup(word);
- }
- switch(verb) {
- case FREAM:
- if(strcmp(fs->name, "main") == 0)
- wstatallow = 1; /* only set, never reset */
- case FRECOVER:
- fs->flags |= verb;
- break;
- case FEDIT:
- f.modconf = 1;
- getwd(word, cp);
- fs->flags |= verb;
- if(word[0] == 0)
- fs->conf = nil;
- else if(!testconfig(word))
- fs->conf = strdup(word);
- break;
- }
- }
- }
|