1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330133113321333133413351336133713381339134013411342134313441345134613471348134913501351135213531354135513561357135813591360136113621363136413651366136713681369137013711372137313741375137613771378137913801381138213831384138513861387138813891390139113921393139413951396139713981399140014011402140314041405140614071408140914101411141214131414141514161417141814191420142114221423142414251426142714281429143014311432143314341435143614371438143914401441144214431444144514461447144814491450145114521453145414551456145714581459146014611462146314641465146614671468146914701471147214731474147514761477147814791480148114821483148414851486148714881489149014911492149314941495149614971498149915001501150215031504150515061507150815091510151115121513151415151516151715181519152015211522152315241525152615271528152915301531153215331534153515361537153815391540154115421543154415451546154715481549155015511552155315541555155615571558155915601561156215631564156515661567156815691570157115721573157415751576157715781579158015811582158315841585158615871588158915901591159215931594159515961597159815991600160116021603160416051606160716081609161016111612161316141615161616171618161916201621162216231624162516261627162816291630163116321633163416351636163716381639164016411642164316441645164616471648164916501651165216531654165516561657165816591660166116621663166416651666166716681669167016711672167316741675167616771678167916801681168216831684168516861687168816891690169116921693169416951696169716981699170017011702170317041705170617071708170917101711171217131714171517161717171817191720172117221723172417251726172717281729173017311732173317341735173617371738173917401741174217431744174517461747 |
- #include <u.h>
- #include <libc.h>
- #include <ip.h>
- #include <bio.h>
- #include <ndb.h>
- #include "dhcp.h"
- int noconfig;
- int debug;
- int dodhcp;
- int nip;
- int myifc = -1;
- int plan9 = 1;
- int beprimary = -1;
- int nodhcpwatch;
- int sendhostname;
- int dondbconfig = 0;
- int Oflag;
- char *ndboptions;
- Ipifc *ifc;
- // possible verbs
- enum
- {
- Vadd,
- Vremove,
- Vunbind,
- Vether,
- Vloopback,
- };
- struct {
- // locally generated
- char *type;
- char *dev;
- char mpoint[32];
- int cfd; // ifc control channel
- int dfd; // ifc data channel (for ppp)
- char *cputype;
- uchar hwa[32]; // hardware address
- int hwatype;
- int hwalen;
- uchar cid[32];
- int cidlen;
- char *baud;
- // learned info
- uchar gaddr[IPaddrlen];
- uchar laddr[IPaddrlen];
- uchar mask[IPaddrlen];
- uchar raddr[IPaddrlen];
- uchar dns[2*IPaddrlen];
- uchar fs[2*IPaddrlen];
- uchar auth[2*IPaddrlen];
- uchar ntp[IPaddrlen];
- int mtu;
- // dhcp specific
- int state;
- int fd;
- ulong xid;
- ulong starttime;
- char sname[64];
- char hostname[32];
- char domainname[64];
- uchar server[IPaddrlen]; /* server IP address */
- ulong offered; /* offered lease time */
- ulong lease; /* lease time */
- ulong resend; /* number of resends for current state */
- ulong timeout; /* time to timeout - seconds */
- } conf;
- enum
- {
- Taddr,
- Taddrs,
- Tstr,
- Tbyte,
- Tulong,
- Tvec,
- };
- typedef struct Option Option;
- struct Option
- {
- char *name;
- int type;
- };
- // I was too lazy to look up the types for each of these
- // options. If someone feels like it, please mail me a
- // corrected array -- presotto
- Option option[256] =
- {
- [OBmask] { "ipmask", Taddr },
- [OBtimeoff] { "timeoff", Tulong },
- [OBrouter] { "ipgw", Taddrs },
- [OBtimeserver] { "time", Taddrs },
- [OBnameserver] { "name", Taddrs },
- [OBdnserver] { "dns", Taddrs },
- [OBlogserver] { "log", Taddrs },
- [OBcookieserver] { "cookie", Taddrs },
- [OBlprserver] { "lpr", Taddrs },
- [OBimpressserver] { "impress", Taddrs },
- [OBrlserver] { "rl", Taddrs },
- [OBhostname] { "sys", Tstr },
- [OBbflen] { "bflen", Tulong },
- [OBdumpfile] { "dumpfile", Tstr },
- [OBdomainname] { "dom", Tstr },
- [OBswapserver] { "swap", Taddrs },
- [OBrootpath] { "rootpath", Tstr },
- [OBextpath] { "extpath", Tstr },
- [OBipforward] { "ipforward", Taddrs },
- [OBnonlocal] { "nonlocal", Taddrs },
- [OBpolicyfilter] { "policyfilter", Taddrs },
- [OBmaxdatagram] { "maxdatagram", Tulong },
- [OBttl] { "ttl", Tulong },
- [OBpathtimeout] { "pathtimeout", Taddrs },
- [OBpathplateau] { "pathplateau", Taddrs },
- [OBmtu] { "mtu", Tulong },
- [OBsubnetslocal] { "subnetslocal", Taddrs },
- [OBbaddr] { "baddr", Taddrs },
- [OBdiscovermask] { "discovermask", Taddrs },
- [OBsupplymask] { "supplymask", Taddrs },
- [OBdiscoverrouter] { "discoverrouter", Taddrs },
- [OBrsserver] { "rs", Taddrs },
- [OBstaticroutes] { "staticroutes", Taddrs },
- [OBtrailerencap] { "trailerencap", Taddrs },
- [OBarptimeout] { "arptimeout", Tulong },
- [OBetherencap] { "etherencap", Taddrs },
- [OBtcpttl] { "tcpttl", Tulong },
- [OBtcpka] { "tcpka", Tulong },
- [OBtcpkag] { "tcpkag", Tulong },
- [OBnisdomain] { "nisdomain", Tstr },
- [OBniserver] { "ni", Taddrs },
- [OBntpserver] { "ntp", Taddrs },
- [OBnetbiosns] { "netbiosns", Taddrs },
- [OBnetbiosdds] { "netbiosdds", Taddrs },
- [OBnetbiostype] { "netbiostype", Taddrs },
- [OBnetbiosscope] { "netbiosscope", Taddrs },
- [OBxfontserver] { "xfont", Taddrs },
- [OBxdispmanager] { "xdispmanager", Taddrs },
- [OBnisplusdomain] { "nisplusdomain", Tstr },
- [OBnisplusserver] { "nisplus", Taddrs },
- [OBhomeagent] { "homeagent", Taddrs },
- [OBsmtpserver] { "smtp", Taddrs },
- [OBpop3server] { "pop3", Taddrs },
- [OBnntpserver] { "nntp", Taddrs },
- [OBwwwserver] { "www", Taddrs },
- [OBfingerserver] { "finger", Taddrs },
- [OBircserver] { "irc", Taddrs },
- [OBstserver] { "st", Taddrs },
- [OBstdaserver] { "stdar", Taddrs },
- [ODipaddr] { "ipaddr", Taddr },
- [ODlease] { "lease", Tulong },
- [ODoverload] { "overload", Taddr },
- [ODtype] { "type", Tbyte },
- [ODserverid] { "serverid", Taddr },
- [ODparams] { "params", Tvec },
- [ODmessage] { "message", Tstr },
- [ODmaxmsg] { "maxmsg", Tulong },
- [ODrenewaltime] { "renewaltime", Tulong },
- [ODrebindingtime] { "rebindingtime", Tulong },
- [ODvendorclass] { "vendorclass", Tvec },
- [ODclientid] { "clientid", Tvec },
- [ODtftpserver] { "tftp", Taddr },
- [ODbootfile] { "bootfile", Tstr },
- };
- uchar defrequested[] = {
- OBmask, OBrouter, OBdnserver, OBhostname, OBdomainname, OBntpserver,
- };
- uchar requested[256];
- int nrequested;
- void adddefroute(char*, uchar*);
- int addoption(char*);
- void binddevice(void);
- void bootprequest(void);
- void controldevice(void);
- void dhcpquery(int, int);
- void dhcprecv(void);
- void dhcpsend(int);
- int dhcptimer(void);
- void dhcpwatch(int);
- void doadd(int);
- void doremove(void);
- void dounbind(void);
- int getndb(void);
- void getoptions(uchar*);
- int ipconfig(void);
- void lookforip(char*);
- void mkclientid(void);
- void ndbconfig(void);
- int nipifcs(char*);
- int openlisten(void);
- uchar* optadd(uchar*, int, void*, int);
- uchar* optaddaddr(uchar*, int, uchar*);
- uchar* optaddbyte(uchar*, int, int);
- uchar* optaddstr(uchar*, int, char*);
- uchar* optaddulong(uchar*, int, ulong);
- uchar* optaddvec(uchar*, int, uchar*, int);
- uchar* optget(uchar*, int, int*);
- int optgetaddr(uchar*, int, uchar*);
- int optgetaddrs(uchar*, int, uchar*, int);
- int optgetbyte(uchar*, int);
- int optgetstr(uchar*, int, char*, int);
- ulong optgetulong(uchar*, int);
- int optgetvec(uchar*, int, uchar*, int);
- char* optgetx(uchar*, uchar);
- Bootp* parsebootp(uchar*, int);
- int parseoptions(uchar *p, int n);
- int parseverb(char*);
- void putndb(void);
- void tweakservers(void);
- void usage(void);
- int validip(uchar*);
- void writendb(char*, int, int);
- char optmagic[4] = { 0x63, 0x82, 0x53, 0x63 };
- #define DEBUG if(debug)print
- typedef struct Ctl Ctl;
- struct Ctl
- {
- Ctl *next;
- char *ctl;
- };
- Ctl *firstctl, **ctll;
- void
- usage(void)
- {
- fprint(2, "usage: %s [-ndDrGX] [-x netmtpt] [-m mtu] [-b baud] [-g gateway] [-h hostname] [-c control-string]* type device [verb] [localaddr [mask [remoteaddr [fsaddr [authaddr]]]]]\n", argv0);
- exits("usage");
- }
- void
- main(int argc, char **argv)
- {
- char *p;
- int retry, verb, action;
- Ctl *cp;
- srand(truerand());
- fmtinstall('E', eipfmt);
- fmtinstall('I', eipfmt);
- fmtinstall('M', eipfmt);
- fmtinstall('V', eipfmt);
- setnetmtpt(conf.mpoint, sizeof(conf.mpoint), nil);
- conf.cputype = getenv("cputype");
- if(conf.cputype == nil)
- conf.cputype = "386";
- retry = 0;
- ctll = &firstctl;
- // init set of requested parameters with the default
- nrequested = sizeof(defrequested);
- memcpy(requested, defrequested, nrequested);
- ARGBEGIN {
- case 'D':
- debug = 1;
- break;
- case 'G':
- plan9 = 0;
- break;
- case 'N':
- dondbconfig = 1;
- break;
- case 'O':
- Oflag = 1;
- break;
- case 'p':
- beprimary = 1;
- break;
- case 'P':
- beprimary = 0;
- case 'b':
- p = ARGF();
- if(p == nil)
- usage();
- conf.baud = p;
- break;
- case 'c':
- p = ARGF();
- if(p == nil)
- usage();
- cp = malloc(sizeof(*cp));
- if(cp == nil)
- sysfatal("%r");
- *ctll = cp;
- ctll = &cp->next;
- cp->next = nil;
- cp->ctl = p;
- break;
- case 'd':
- dodhcp = 1;
- break;
- case 'g':
- p = ARGF();
- if(p == nil)
- usage();
- parseip(conf.gaddr, p);
- break;
- case 'h':
- p = ARGF();
- if(p == nil)
- usage();
- snprint(conf.hostname, sizeof(conf.hostname), "%s", p);
- sendhostname = 1;
- break;
- case 'n':
- noconfig = 1;
- break;
- case 'm':
- p = ARGF();
- if(p == nil)
- usage();
- conf.mtu = atoi(p);
- break;
- case 'r':
- retry = 1;
- break;
- case 'x':
- p = ARGF();
- if(p == nil)
- usage();
- setnetmtpt(conf.mpoint, sizeof(conf.mpoint), p);
- break;
- case 'X':
- nodhcpwatch = 1;
- break;
- case 'o':
- if(addoption(ARGF()) < 0)
- usage();
- break;
- } ARGEND;
- // default to any host name we already have
- if(*conf.hostname == 0){
- p = getenv("sysname");
- if(p == nil || *p == 0)
- p = sysname();
- if(p != nil)
- strncpy(conf.hostname, p, sizeof(conf.hostname)-1);
- }
- // default
- conf.type = "ether";
- conf.dev = "/net/ether0";
- action = Vadd;
- // get verb, default is "add"
- while(argc > 0){
- verb = parseverb(argv[0]);
- switch(verb){
- case Vadd:
- case Vremove:
- case Vunbind:
- action = verb;
- break;
- case Vether:
- case Vloopback:
- conf.type = argv[0];
- if(argc > 1){
- conf.dev = argv[1];
- argc--, argv++;
- }
- break;
- }
- if(verb < 0)
- break;
- argc--, argv++;
- }
- // get addresses
- switch(argc){
- case 5:
- parseip(conf.auth, argv[4]);
- /* fall through */
- case 4:
- parseip(conf.fs, argv[3]);
- /* fall through */
- case 3:
- parseip(conf.raddr, argv[2]);
- /* fall through */
- case 2:
- if(strcmp(argv[1], "0") != 0)
- parseipmask(conf.mask, argv[1]);
- /* fall through */
- case 1:
- parseip(conf.laddr, argv[0]);
- break;
- }
- switch(action){
- case Vadd:
- doadd(retry);
- break;
- case Vremove:
- doremove();
- break;
- case Vunbind:
- dounbind();
- break;
- }
- exits(0);
- }
- int
- havendb(char *net)
- {
- Dir *d;
- char buf[128];
- snprint(buf, sizeof buf, "%s/ndb", net);
- if((d = dirstat("/net/ndb")) == nil)
- return 0;
- if(d->length == 0){
- free(d);
- return 0;
- }
- free(d);
- return 1;
- }
- void
- doadd(int retry)
- {
- int tries;
- // get number of preexisting interfaces
- nip = nipifcs(conf.mpoint);
- if(beprimary == -1 && (nip == 0 || !havendb(conf.mpoint)))
- beprimary = 1;
- // get ipifc into name space and condition device for ip
- if(!noconfig){
- lookforip(conf.mpoint);
- controldevice();
- binddevice();
- }
- if(!validip(conf.laddr)){
- if(dondbconfig)
- ndbconfig();
- else
- dodhcp = 1;
- }
- // run dhcp if we need something
- if(dodhcp){
- mkclientid();
- for(tries = 0; tries < 6; tries++){
- dhcpquery(!noconfig, Sselecting);
- if(conf.state == Sbound)
- break;
- sleep(1000);
- }
- }
- if(!validip(conf.laddr)){
- if(retry && dodhcp && !noconfig){
- fprint(2, "%s: couldn't determine ip address, retrying\n", argv0);
- dhcpwatch(1);
- return;
- } else {
- fprint(2, "%s: no success with DHCP\n", argv0);
- exits("failed");
- }
- }
- if(!noconfig){
- if(ipconfig() < 0)
- sysfatal("can't start ip");
- if(dodhcp && conf.lease != Lforever)
- dhcpwatch(0);
- }
- // leave everything we've learned somewhere other procs can find it
- if(beprimary == 1){
- putndb();
- tweakservers();
- }
- }
- void
- doremove(void)
- {
- char file[128];
- int cfd;
- Ipifc *nifc;
- Iplifc *lifc;
- if(!validip(conf.laddr)){
- fprint(2, "%s: remove requires an address\n", argv0);
- exits("usage");
- }
- ifc = readipifc(conf.mpoint, ifc, -1);
- for(nifc = ifc; nifc != nil; nifc = nifc->next){
- if(strcmp(nifc->dev, conf.dev) != 0)
- continue;
- for(lifc = nifc->lifc; lifc != nil; lifc = lifc->next){
- if(ipcmp(conf.laddr, lifc->ip) != 0)
- continue;
- if(validip(conf.mask) && ipcmp(conf.mask, lifc->mask) != 0)
- continue;
- if(validip(conf.raddr) && ipcmp(conf.raddr, lifc->net) != 0)
- continue;
- snprint(file, sizeof(file), "%s/ipifc/%d/ctl", conf.mpoint, nifc->index);
- cfd = open(file, ORDWR);
- if(cfd < 0){
- fprint(2, "%s: can't open %s: %r\n", argv0, conf.mpoint);
- continue;
- }
- if(fprint(cfd, "remove %I %M", lifc->ip, lifc->mask) < 0)
- fprint(2, "%s: can't remove %I %I from %s: %r\n", argv0,
- lifc->ip, lifc->mask, file);
- }
- }
- }
- void
- dounbind(void)
- {
- Ipifc *nifc;
- char file[128];
- int cfd;
- ifc = readipifc(conf.mpoint, ifc, -1);
- for(nifc = ifc; nifc != nil; nifc = nifc->next){
- if(strcmp(nifc->dev, conf.dev) == 0){
- snprint(file, sizeof(file), "%s/ipifc/%d/ctl", conf.mpoint, nifc->index);
- cfd = open(file, ORDWR);
- if(cfd < 0){
- fprint(2, "%s: can't open %s: %r\n", argv0, conf.mpoint);
- break;
- }
- if(fprint(cfd, "unbind") < 0)
- fprint(2, "%s: can't unbind from %s: %r\n", argv0, file);
- break;
- }
- }
- }
- // set the default route
- void
- adddefroute(char *mpoint, uchar *gaddr)
- {
- char buf[256];
- int cfd;
- sprint(buf, "%s/iproute", mpoint);
- cfd = open(buf, ORDWR);
- if(cfd < 0)
- return;
- fprint(cfd, "add 0 0 %I", gaddr);
- close(cfd);
- }
- // create a client id
- void
- mkclientid(void)
- {
- if(strcmp(conf.type, "ether") == 0)
- if(myetheraddr(conf.hwa, conf.dev) == 0){
- conf.hwalen = 6;
- conf.hwatype = 1;
- conf.cid[0] = conf.hwatype;
- memmove(&conf.cid[1], conf.hwa, conf.hwalen);
- conf.cidlen = conf.hwalen+1;
- } else {
- conf.hwatype = -1;
- snprint((char*)conf.cid, sizeof(conf.cid), "plan9_%ld.%d", lrand(), getpid());
- conf.cidlen = strlen((char*)conf.cid);
- }
- }
- // bind ip into the namespace
- void
- lookforip(char *net)
- {
- char proto[64];
- snprint(proto, sizeof(proto), "%s/ipifc", net);
- if(access(proto, 0) == 0)
- return;
- sysfatal("no ip stack bound onto %s", net);
- }
- // send some ctls to a device
- void
- controldevice(void)
- {
- char ctlfile[256];
- int fd;
- Ctl *cp;
- if(firstctl == nil)
- return;
- if(strcmp(conf.type, "ether") == 0)
- snprint(ctlfile, sizeof(ctlfile), "%s/clone", conf.dev);
- else
- return;
- fd = open(ctlfile, ORDWR);
- if(fd < 0)
- sysfatal("can't open %s", ctlfile);
- for(cp = firstctl; cp != nil; cp = cp->next){
- if(write(fd, cp->ctl, strlen(cp->ctl)) < 0)
- sysfatal("ctl message %s: %r", cp->ctl);
- seek(fd, 0, 0);
- }
- }
- // bind an ip stack to a device, leave the control channel open
- void
- binddevice(void)
- {
- char buf[256];
- if(myifc < 0){
- // get a new ip interface
- snprint(buf, sizeof(buf), "%s/ipifc/clone", conf.mpoint);
- conf.cfd = open(buf, ORDWR);
- if(conf.cfd < 0)
- sysfatal("opening %s/ipifc/clone: %r", conf.mpoint);
- // specify the medium as an ethernet, and bind the interface to it
- if(fprint(conf.cfd, "bind %s %s", conf.type, conf.dev) < 0)
- sysfatal("binding device: %r");
- } else {
- // open the old interface
- snprint(buf, sizeof(buf), "%s/ipifc/%d/ctl", conf.mpoint, myifc);
- conf.cfd = open(buf, ORDWR);
- if(conf.cfd < 0)
- sysfatal("opening %s/ipifc/%d/ctl: %r", conf.mpoint, myifc);
- }
- }
- // add a logical interface to the ip stack
- int
- ipconfig(void)
- {
- char buf[256];
- int n;
- if(!validip(conf.laddr))
- return -1;
- n = sprint(buf, "add");
- n += snprint(buf+n, sizeof(buf)-n, " %I", conf.laddr);
- if(!validip(conf.mask))
- ipmove(conf.mask, defmask(conf.laddr));
- n += snprint(buf+n, sizeof(buf)-n, " %I", conf.mask);
- if(validip(conf.raddr)){
- n += snprint(buf+n, sizeof(buf)-n, " %I", conf.raddr);
- if(conf.mtu != 0)
- n += snprint(buf+n, sizeof(buf)-n, " %d", conf.mtu);
- }
- if(write(conf.cfd, buf, n) < 0){
- fprint(2, "ipconfig: write(%s): %r\n", buf);
- return -1;
- }
- if(beprimary==1 && validip(conf.gaddr))
- adddefroute(conf.mpoint, conf.gaddr);
- return 0;
- }
- // remove a logical interface to the ip stack
- void
- ipunconfig(void)
- {
- char buf[256];
- int n;
- if(!validip(conf.laddr))
- return;
- DEBUG("couldn't renew IP lease, releasing %I\n", conf.laddr);
- n = sprint(buf, "remove");
- n += snprint(buf+n, sizeof(buf)-n, " %I", conf.laddr);
- if(!validip(conf.mask))
- ipmove(conf.mask, defmask(conf.laddr));
- n += snprint(buf+n, sizeof(buf)-n, " %I", conf.mask);
- write(conf.cfd, buf, n);
- ipmove(conf.laddr, IPnoaddr);
- ipmove(conf.raddr, IPnoaddr);
- ipmove(conf.mask, IPnoaddr);
- // forget configuration info
- if(beprimary==1)
- writendb("", 0, 0);
- }
- void
- ding(void*, char *msg)
- {
- if(strstr(msg, "alarm"))
- noted(NCONT);
- noted(NDFLT);
- }
- void
- dhcpquery(int needconfig, int startstate)
- {
- if(needconfig)
- fprint(conf.cfd, "add %I %I", IPnoaddr, IPnoaddr);
- conf.fd = openlisten();
- if(conf.fd < 0){
- conf.state = Sinit;
- return;
- }
- notify(ding);
- // try dhcp for 10 seconds
- conf.xid = lrand();
- conf.starttime = time(0);
- conf.state = startstate;
- switch(startstate){
- case Sselecting:
- conf.offered = 0;
- dhcpsend(Discover);
- break;
- case Srenewing:
- dhcpsend(Request);
- break;
- default:
- sysfatal("internal error 0");
- }
- conf.resend = 0;
- conf.timeout = time(0) + 4;
- while(conf.state != Sbound){
- dhcprecv();
- if(dhcptimer() < 0)
- break;
- if(time(0) - conf.starttime > 10)
- break;
- }
- close(conf.fd);
- if(needconfig)
- fprint(conf.cfd, "remove %I %I", IPnoaddr, IPnoaddr);
- }
- #define HOUR (60*60)
- void
- dhcpwatch(int needconfig)
- {
- int secs, s;
- ulong t;
- if(nodhcpwatch)
- return;
- switch(rfork(RFPROC|RFFDG|RFNOWAIT|RFNOTEG)){
- default:
- return;
- case 0:
- break;
- }
- // keep trying to renew the lease
- for(;;){
- if(conf.lease == 0)
- secs = 5;
- else
- secs = conf.lease>>1;
- // avoid overflows
- for(s = secs; s > 0; s -= t){
- if(s > HOUR)
- t = HOUR;
- else
- t = s;
- sleep(t*1000);
- }
- if(conf.lease > 0){
- // during boot, the starttime can be bogus so avoid
- // spurious ipinconfig's
- t = time(0) - conf.starttime;
- if(t > (3*secs)/2)
- t = secs;
- if(t >= conf.lease){
- conf.lease = 0;
- if(!noconfig){
- ipunconfig();
- needconfig = 1;
- }
- } else
- conf.lease -= t;
- }
- dhcpquery(needconfig, needconfig ? Sselecting : Srenewing);
- if(needconfig && conf.state == Sbound){
- if(ipconfig() < 0)
- sysfatal("can't start ip: %r");
- needconfig = 0;
- // leave everything we've learned somewhere other procs can find it
- if(beprimary==1){
- putndb();
- tweakservers();
- }
- }
- }
- }
- int
- dhcptimer(void)
- {
- ulong now;
- now = time(0);
- if(now < conf.timeout)
- return 0;
- switch(conf.state) {
- default:
- sysfatal("dhcptimer: unknown state %d", conf.state);
- case Sinit:
- break;
- case Sselecting:
- dhcpsend(Discover);
- conf.timeout = now + 4;
- conf.resend++;
- if(conf.resend>5)
- goto err;
- break;
- case Srequesting:
- dhcpsend(Request);
- conf.timeout = now + 4;
- conf.resend++;
- if(conf.resend>5)
- goto err;
- break;
- case Srenewing:
- dhcpsend(Request);
- conf.timeout = now + 1;
- conf.resend++;
- if(conf.resend>3) {
- conf.state = Srebinding;
- conf.resend = 0;
- }
- break;
- case Srebinding:
- dhcpsend(Request);
- conf.timeout = now + 4;
- conf.resend++;
- if(conf.resend>5)
- goto err;
- break;
- case Sbound:
- break;
- }
- return 0;
- err:
- conf.state = Sinit;
- return -1;
- }
- void
- dhcpsend(int type)
- {
- Bootp bp;
- uchar *p;
- int n;
- uchar vendor[64];
- OUdphdr *up = (OUdphdr*)bp.udphdr;
- memset(&bp, 0, sizeof(bp));
- hnputs(up->rport, 67);
- bp.op = Bootrequest;
- hnputl(bp.xid, conf.xid);
- hnputs(bp.secs, time(0)-conf.starttime);
- hnputs(bp.flags, 0);
- memmove(bp.optmagic, optmagic, 4);
- if(conf.hwatype >= 0 && conf.hwalen < sizeof(bp.chaddr)){
- memmove(bp.chaddr, conf.hwa, conf.hwalen);
- bp.hlen = conf.hwalen;
- bp.htype = conf.hwatype;
- }
- p = bp.optdata;
- p = optaddbyte(p, ODtype, type);
- p = optadd(p, ODclientid, conf.cid, conf.cidlen);
- switch(type) {
- default:
- sysfatal("dhcpsend: unknown message type: %d", type);
- case Discover:
- ipmove(up->raddr, IPv4bcast); // broadcast
- if(*conf.hostname && sendhostname)
- p = optaddstr(p, OBhostname, conf.hostname);
- if(plan9){
- n = snprint((char*)vendor, sizeof(vendor), "plan9_%s", conf.cputype);
- p = optaddvec(p, ODvendorclass, vendor, n);
- }
- p = optaddvec(p, ODparams, requested, nrequested);
- if(validip(conf.laddr))
- p = optaddaddr(p, ODipaddr, conf.laddr);
- break;
- case Request:
- switch(conf.state){
- case Srenewing:
- ipmove(up->raddr, conf.server);
- v6tov4(bp.ciaddr, conf.laddr);
- break;
- case Srebinding:
- ipmove(up->raddr, IPv4bcast); // broadcast
- v6tov4(bp.ciaddr, conf.laddr);
- break;
- case Srequesting:
- ipmove(up->raddr, IPv4bcast); // broadcast
- p = optaddaddr(p, ODipaddr, conf.laddr);
- p = optaddaddr(p, ODserverid, conf.server);
- break;
- }
- p = optaddulong(p, ODlease, conf.offered);
- if(plan9){
- n = snprint((char*)vendor, sizeof(vendor), "plan9_%s", conf.cputype);
- p = optaddvec(p, ODvendorclass, vendor, n);
- }
- p = optaddvec(p, ODparams, requested, nrequested);
- if(*conf.hostname && sendhostname)
- p = optaddstr(p, OBhostname, conf.hostname);
- break;
- case Release:
- ipmove(up->raddr, conf.server);
- v6tov4(bp.ciaddr, conf.laddr);
- p = optaddaddr(p, ODipaddr, conf.laddr);
- p = optaddaddr(p, ODserverid, conf.server);
- break;
- }
- *p++ = OBend;
- n = p - (uchar*)&bp;
- USED(n);
- /*
- * We use a maximum size DHCP packet to survive the
- * All_Aboard NAT package from Internet Share. It
- * always replies to DHCP requests with a packet of the
- * same size, so if the request is too short the reply
- * is truncated.
- */
- if(write(conf.fd, &bp, sizeof(bp)) != sizeof(bp))
- fprint(2, "dhcpsend: write failed: %r\n");
- }
- void
- dhcprecv(void)
- {
- uchar buf[8000];
- Bootp *bp;
- int i, n, type;
- ulong lease;
- char err[ERRMAX];
- uchar vopts[256];
- alarm(1000);
- n = read(conf.fd, buf, sizeof(buf));
- alarm(0);
- if(n < 0){
- errstr(err, sizeof err);
- if(strstr(err, "interrupt") == nil)
- fprint(2, "ipconfig: bad read: %s\n", err);
- else
- DEBUG("read timed out\n");
- return;
- }
- bp = parsebootp(buf, n);
- if(bp == 0) {
- DEBUG("parsebootp failed: dropping packet\n");
- return;
- }
- type = optgetbyte(bp->optdata, ODtype);
- switch(type) {
- default:
- fprint(2, "%s: unknown type: %d\n", argv0, type);
- break;
- case Offer:
- DEBUG("got offer from %V ", bp->siaddr);
- if(conf.state != Sselecting){
- DEBUG("\n");
- break;
- }
- lease = optgetulong(bp->optdata, ODlease);
- if(lease == 0){
- /*
- * The All_Aboard NAT package from Internet Share doesn't
- * give a lease time, so we have to assume one.
- */
- fprint(2, "%s: Offer with %lud lease, using %d\n", argv0, lease, MinLease);
- lease = MinLease;
- }
- DEBUG("lease=%lud ", lease);
- if(!optgetaddr(bp->optdata, ODserverid, conf.server)) {
- fprint(2, "%s: Offer from server with invalid serverid\n", argv0);
- break;
- }
- v4tov6(conf.laddr, bp->yiaddr);
- memmove(conf.sname, bp->sname, sizeof(conf.sname));
- conf.sname[sizeof(conf.sname)-1] = 0;
- DEBUG("server=%I sname=%s\n", conf.server, conf.sname);
- conf.offered = lease;
- conf.state = Srequesting;
- dhcpsend(Request);
- conf.resend = 0;
- conf.timeout = time(0) + 4;
- break;
- case Ack:
- DEBUG("got ack from %V ", bp->siaddr);
- if(conf.state != Srequesting)
- if(conf.state != Srenewing)
- if(conf.state != Srebinding)
- break;
- // ignore a bad lease
- lease = optgetulong(bp->optdata, ODlease);
- if(lease == 0){
- /*
- * The All_Aboard NAT package from Internet Share doesn't
- * give a lease time, so we have to assume one.
- */
- fprint(2, "%s: Ack with %lud lease, using %d\n", argv0, lease, MinLease);
- lease = MinLease;
- }
- DEBUG("lease=%lud ", lease);
- // address and mask
- if(!validip(conf.laddr) || !Oflag)
- v4tov6(conf.laddr, bp->yiaddr);
- if(!validip(conf.mask) || !Oflag){
- if(!optgetaddr(bp->optdata, OBmask, conf.mask))
- ipmove(conf.mask, IPnoaddr);
- }
- DEBUG("ipaddr=%I ipmask=%M ", conf.laddr, conf.mask);
- // get a router address either from the router option
- // or from the router that forwarded the dhcp packet
- if(!validip(conf.gaddr) || !Oflag){
- if(optgetaddr(bp->optdata, OBrouter, conf.gaddr)){
- DEBUG("ipgw=%I ", conf.gaddr);
- } else {
- if(memcmp(bp->giaddr, IPnoaddr+IPv4off, IPv4addrlen) != 0){
- v4tov6(conf.gaddr, bp->giaddr);
- DEBUG("giaddr=%I ", conf.gaddr);
- }
- }
- }
- else
- DEBUG("ipgw=%I ", conf.gaddr);
- // get dns servers
- memset(conf.dns, 0, sizeof(conf.dns));
- n = optgetaddrs(bp->optdata, OBdnserver, conf.dns,
- sizeof(conf.dns)/IPaddrlen);
- for(i = 0; i < n; i++)
- DEBUG("dns=%I ", conf.dns+i*IPaddrlen);
- // get ntp servers
- memset(conf.ntp, 0, sizeof(conf.ntp));
- n = optgetaddrs(bp->optdata, OBntpserver, conf.ntp,
- sizeof(conf.ntp)/IPaddrlen);
- for(i = 0; i < n; i++)
- DEBUG("ntp=%I ", conf.ntp+i*IPaddrlen);
- // get names
- optgetstr(bp->optdata, OBhostname, conf.hostname, sizeof(conf.hostname));
- optgetstr(bp->optdata, OBdomainname, conf.domainname, sizeof(conf.domainname));
- // get anything else we asked for
- getoptions(bp->optdata);
- // get plan9 specific options
- n = optgetvec(bp->optdata, OBvendorinfo, vopts, sizeof(vopts)-1);
- if(n > 0 && parseoptions(vopts, n) == 0){
- if(validip(conf.fs) && Oflag)
- n = 1;
- else
- n = optgetaddrs(vopts, OP9fs, conf.fs, 2);
- for(i = 0; i < n; i++)
- DEBUG("fs=%I ", conf.fs+i*IPaddrlen);
- if(validip(conf.auth) && Oflag)
- n = 1;
- else
- n = optgetaddrs(vopts, OP9auth, conf.auth, 2);
- for(i = 0; i < n; i++)
- DEBUG("auth=%I ", conf.auth+i*IPaddrlen);
- }
- conf.lease = lease;
- conf.state = Sbound;
- DEBUG("server=%I sname=%s\n", conf.server, conf.sname);
- break;
- case Nak:
- conf.state = Sinit;
- fprint(2, "%s: recved dhcpnak on %s\n", argv0, conf.mpoint);
- break;
- }
- }
- int
- openlisten()
- {
- int fd, cfd;
- char data[128];
- char devdir[40];
- int n;
- if(validip(conf.laddr)
- && (conf.state == Srenewing || conf.state == Srebinding))
- sprint(data, "%s/udp!%I!68", conf.mpoint, conf.laddr);
- else
- sprint(data, "%s/udp!*!68", conf.mpoint);
- for(n=0;;n++) {
- cfd = announce(data, devdir);
- if(cfd >= 0)
- break;
- if(!noconfig)
- sysfatal("can't announce for dhcp: %r");
- // might be another client - wait and try again
- fprint(2, "%s: can't announce: %r\n", argv0);
- sleep((nrand(10)+1)*1000);
- if(n > 10)
- return -1;
- }
- if(fprint(cfd, "headers") < 0)
- sysfatal("can't set header mode: %r");
- fprint(cfd, "oldheaders");
- sprint(data, "%s/data", devdir);
- fd = open(data, ORDWR);
- if(fd < 0)
- sysfatal("open udp data: %r");
- close(cfd);
- return fd;
- }
- uchar*
- optadd(uchar *p, int op, void *d, int n)
- {
- p[0] = op;
- p[1] = n;
- memmove(p+2, d, n);
- return p+n+2;
- }
- uchar*
- optaddbyte(uchar *p, int op, int b)
- {
- p[0] = op;
- p[1] = 1;
- p[2] = b;
- return p+3;
- }
- uchar*
- optaddulong(uchar *p, int op, ulong x)
- {
- p[0] = op;
- p[1] = 4;
- hnputl(p+2, x);
- return p+6;
- }
- uchar *
- optaddaddr(uchar *p, int op, uchar *ip)
- {
- p[0] = op;
- p[1] = 4;
- v6tov4(p+2, ip);
- return p+6;
- }
- uchar *
- optaddvec(uchar *p, int op, uchar *v, int n)
- {
- p[0] = op;
- p[1] = n;
- memmove(p+2, v, n);
- return p+2+n;
- }
- uchar *
- optaddstr(uchar *p, int op, char *v)
- {
- int n;
- n = strlen(v)+1; // microsoft leaves on the null, so we do too
- p[0] = op;
- p[1] = n;
- memmove(p+2, v, n);
- return p+2+n;
- }
- uchar*
- optget(uchar *p, int op, int *np)
- {
- int len, code;
- for(;;) {
- code = *p++;
- if(code == OBpad)
- continue;
- if(code == OBend)
- return 0;
- len = *p++;
- if(code != op) {
- p += len;
- continue;
- }
- if(np != nil){
- if(*np > len)
- return 0;
- *np = len;
- }
- return p;
- }
- }
- int
- optgetbyte(uchar *p, int op)
- {
- int len;
- len = 1;
- p = optget(p, op, &len);
- if(p == 0)
- return 0;
- return *p;
- }
- ulong
- optgetulong(uchar *p, int op)
- {
- int len;
- len = 4;
- p = optget(p, op, &len);
- if(p == 0)
- return 0;
- return nhgetl(p);
- }
- int
- optgetaddr(uchar *p, int op, uchar *ip)
- {
- int len;
- len = 4;
- p = optget(p, op, &len);
- if(p == 0)
- return 0;
- v4tov6(ip, p);
- return 1;
- }
- int
- optgetaddrs(uchar *p, int op, uchar *ip, int n)
- {
- int len, i;
- len = 4;
- p = optget(p, op, &len);
- if(p == 0)
- return 0;
- len /= IPv4addrlen;
- if(len > n)
- len = n;
- for(i = 0; i < len; i++)
- v4tov6(&ip[i*IPaddrlen], &p[i*IPv4addrlen]);
- return i;
- }
- int
- optgetvec(uchar *p, int op, uchar *v, int n)
- {
- int len;
- len = 1;
- p = optget(p, op, &len);
- if(p == 0)
- return 0;
- if(len > n)
- len = n;
- memmove(v, p, len);
- return len;
- }
- int
- optgetstr(uchar *p, int op, char *s, int n)
- {
- int len;
- len = 1;
- p = optget(p, op, &len);
- if(p == 0)
- return 0;
- if(len >= n)
- len = n-1;
- memmove(s, p, len);
- s[len] = 0;
- return len;
- }
- // sanity check options area
- // - options don't overflow packet
- // - options end with an OBend
- int
- parseoptions(uchar *p, int n)
- {
- int code, len;
- int nin = n;
- while(n>0) {
- code = *p++;
- n--;
- if(code == OBpad)
- continue;
- if(code == OBend)
- return 0;
- if(n == 0) {
- fprint(2, "%s: parse: bad option: 0x%ux: truncated: opt length = %d\n",
- argv0, code, nin);
- return -1;
- }
- len = *p++;
- n--;
- if(len > n) {
- fprint(2, "%s: parse: bad option: 0x%ux: %d > %d: opt length = %d\n",
- argv0, code, len, n, nin);
- return -1;
- }
- p += len;
- n -= len;
- }
- // make sure packet ends with an OBend all the optget code
- *p = OBend;
- return 0;
- }
- // sanity check received packet:
- // - magic is dhcp magic
- // - options don't overflow packet
- Bootp *
- parsebootp(uchar *p, int n)
- {
- Bootp *bp;
- bp = (Bootp*)p;
- if(n < bp->optmagic - p) {
- fprint(2, "%s: parse: short bootp packet\n", argv0);
- return nil;
- }
- if(conf.xid != nhgetl(bp->xid))
- return nil;
- if(bp->op != Bootreply) {
- fprint(2, "%s: parse: bad op\n", argv0);
- return nil;
- }
- n -= bp->optmagic - p;
- p = bp->optmagic;
- if(n < 4) {
- fprint(2, "%s: parse: not option data\n", argv0);
- return nil;
- }
- if(memcmp(optmagic, p, 4) != 0) {
- fprint(2, "%s: parse: bad opt magic %ux %ux %ux %ux\n", argv0,
- p[0], p[1], p[2], p[3]);
- return nil;
- }
- p += 4;
- n -= 4;
- if(parseoptions(p, n) < 0)
- return nil;
- return bp;
- }
- // write out an ndb entry
- void
- writendb(char *s, int n, int append)
- {
- char file[64];
- int fd;
- snprint(file, sizeof file, "%s/ndb", conf.mpoint);
- if(append){
- fd = open(file, OWRITE);
- seek(fd, 0, 2);
- } else
- fd = open(file, OWRITE|OTRUNC);
- write(fd, s, n);
- close(fd);
- }
- // put server addresses into the ndb entry
- char*
- putaddrs(char *p, char *e, char *attr, uchar *a, int len)
- {
- int i;
- for(i = 0; i < len; i += IPaddrlen, a += IPaddrlen){
- if(!validip(a))
- break;
- p = seprint(p, e, "%s=%I\n", attr, a);
- }
- return p;
- }
- // make an ndb entry and put it into /net/ndb for the servers to see
- void
- putndb(void)
- {
- char buf[1024];
- char *p, *e, *np;
- int append;
- e = buf + sizeof(buf);
- p = buf;
- if(getndb() == 0){
- append = 1;
- } else {
- append = 0;
- p = seprint(p, e, "ip=%I ipmask=%M ipgw=%I\n",
- conf.laddr, conf.mask, conf.gaddr);
- }
- if(np = strchr(conf.hostname, '.')){
- if(*conf.domainname == 0)
- strcpy(conf.domainname, np+1);
- *np = 0;
- }
- if(*conf.hostname)
- p = seprint(p, e, "\tsys=%s\n", conf.hostname);
- if(*conf.domainname)
- p = seprint(p, e, "\tdom=%s.%s\n", conf.hostname, conf.domainname);
- if(validip(conf.fs))
- p = putaddrs(p, e, "\tfs", conf.fs, sizeof(conf.fs));
- if(validip(conf.auth))
- p = putaddrs(p, e, "\tauth", conf.auth, sizeof(conf.auth));
- if(validip(conf.dns))
- p = putaddrs(p, e, "\tdns", conf.dns, sizeof(conf.dns));
- if(validip(conf.ntp))
- p = putaddrs(p, e, "\tntp", conf.ntp, sizeof(conf.ntp));
- if(ndboptions)
- p = seprint(p, e, "%s\n", ndboptions);
- if(p > buf)
- writendb(buf, p-buf, append);
- }
- // get an ndb entry someone else wrote
- int
- getndb(void)
- {
- char buf[1024];
- int fd;
- int n;
- char *p;
- snprint(buf, sizeof buf, "%s/ndb", conf.mpoint);
- fd = open(buf, OREAD);
- n = read(fd, buf, sizeof(buf)-1);
- close(fd);
- if(n <= 0)
- return -1;
- buf[n] = 0;
- p = strstr(buf, "ip=");
- if(p == nil)
- return -1;
- parseip(conf.laddr, p+3);
- return 0;
- }
- // tell a server to refresh
- void
- tweakserver(char *server)
- {
- char file[64];
- int fd;
- snprint(file, sizeof(file), "%s/%s", conf.mpoint, server);
- fd = open(file, ORDWR);
- if(fd < 0)
- return;
- fprint(fd, "refresh");
- close(fd);
- }
- // tell all servers to refresh their information
- void
- tweakservers(void)
- {
- tweakserver("dns");
- tweakserver("cs");
- }
- // return number of networks
- int
- nipifcs(char *net)
- {
- Ipifc *nifc;
- Iplifc *lifc;
- int n;
- n = 0;
- ifc = readipifc(net, ifc, -1);
- for(nifc = ifc; nifc != nil; nifc = nifc->next){
- /*
- * ignore loopback devices when trying to
- * figure out if we're the primary interface.
- */
- if(strcmp(nifc->dev, "/dev/null") != 0)
- for(lifc = nifc->lifc; lifc != nil; lifc = lifc->next)
- if(validip(lifc->ip)){
- n++;
- break;
- }
- if(strcmp(nifc->dev, conf.dev) == 0)
- myifc = nifc->index;
- }
- return n;
- }
- // return true if this is a valid v4 address
- int
- validip(uchar *addr)
- {
- return ipcmp(addr, IPnoaddr) != 0 && ipcmp(addr, v4prefix) != 0;
- }
- char *verbs[] = {
- [Vadd] "add",
- [Vremove] "remove",
- [Vunbind] "unbind",
- [Vether] "ether",
- [Vloopback] "loopback",
- };
- // look for an action
- int
- parseverb(char *name)
- {
- int i;
- for(i = 0; i < nelem(verbs); i++){
- if(verbs[i] == 0)
- continue;
- if(strcmp(name, verbs[i]) == 0)
- return i;
- }
- return -1;
- }
- // get everything out of ndb
- void
- ndbconfig(void)
- {
- Ndb *db;
- Ndbtuple *t, *nt;
- char etheraddr[32];
- char *attrs[10];
- int nattr;
- int ndns = 0;
- int nfs = 0;
- int nauth = 0;
- db = ndbopen(0);
- if(db == nil)
- sysfatal("can't open ndb: %r");
- if(strcmp(conf.type, "ether") != 0 || myetheraddr(conf.hwa, conf.dev) != 0)
- sysfatal("can't read hardware address");
- sprint(etheraddr, "%E", conf.hwa);
- nattr = 0;
- attrs[nattr++] = "ip";
- attrs[nattr++] = "ipmask";
- attrs[nattr++] = "ipgw";
- attrs[nattr++] = "@dns";
- attrs[nattr++] = "@ntp";
- attrs[nattr++] = "@fs";
- attrs[nattr++] = "@auth";
- attrs[nattr] = nil;
- t = ndbipinfo(db, "ether", etheraddr, attrs, nattr);
- for(nt = t; nt != nil; nt = nt->entry){
- if(strcmp(nt->attr, "ip") == 0){
- parseip(conf.laddr, nt->val);
- } else if(strcmp(nt->attr, "ipmask") == 0){
- parseipmask(conf.mask, nt->val);
- } else if(strcmp(nt->attr, "ipgw") == 0){
- parseip(conf.gaddr, nt->val);
- } else if(ndns < 2 && strcmp(nt->attr, "dns") == 0){
- parseip(conf.dns+IPaddrlen*ndns, nt->val);
- } else if(strcmp(nt->attr, "ntp") == 0){
- parseip(conf.ntp, nt->val);
- } else if(nfs < 2 && strcmp(nt->attr, "fs") == 0){
- parseip(conf.fs+IPaddrlen*nfs, nt->val);
- } else if(nauth < 2 && strcmp(nt->attr, "auth") == 0){
- parseip(conf.auth+IPaddrlen*nauth, nt->val);
- }
- }
- ndbfree(t);
- if(!validip(conf.laddr))
- sysfatal("address not found in ndb");
- }
- int
- addoption(char *opt)
- {
- Option *o;
- if(opt == nil)
- return -1;
- for(o = option; o < &option[nelem(option)]; o++){
- if(o->name == nil)
- continue;
- if(strcmp(opt, o->name) == 0){
- if(!memchr(requested, (int)opt, nrequested))
- if(nrequested < nelem(requested))
- requested[nrequested++] = o-option;
- return 0;
- }
- }
- return -1;
- }
- char*
- optgetx(uchar *p, uchar opt)
- {
- Option *o;
- int i, n;
- ulong x;
- char *s, *ns;
- uchar ip[IPaddrlen];
- uchar ips[16*IPaddrlen];
- char str[256];
- uchar vec[256];
- o = &option[opt];
- if(o->name == nil)
- return nil;
- s = nil;
- switch(o->type){
- case Taddr:
- if(optgetaddr(p, opt, ip))
- s = smprint("%s=%I", o->name, ip);
- break;
- case Taddrs:
- n = optgetaddrs(p, opt, ips, 16);
- if(n > 0)
- s = smprint("%s=%I", o->name, ips);
- for(i = 1; i < n; i++){
- ns = smprint("%s %s=%I", s, o->name, &ips[i*IPaddrlen]);
- free(s);
- s = ns;
- }
- break;
- case Tulong:
- x = optgetulong(p, opt);
- if(x != 0)
- s = smprint("%s=%lud", o->name, x);
- break;
- case Tbyte:
- x = optgetbyte(p, opt);
- if(x != 0)
- s = smprint("%s=%lud", o->name, x);
- break;
- case Tstr:
- if(optgetstr(p, opt, str, sizeof(str)))
- s = smprint("%s=%s", o->name, str);
- break;
- case Tvec:
- n = optgetvec(p, opt, vec, sizeof(vec));
- if(n > 0)
- s = smprint("%s=%.*H", o->name, n, vec);
- break;
- }
- return s;
- }
- void
- getoptions(uchar *p)
- {
- int i;
- char *s, *t;
- for(i = nelem(defrequested); i < nrequested; i++){
- s = optgetx(p, requested[i]);
- if(s != nil)
- DEBUG("%s ", s);
- if(ndboptions == nil)
- ndboptions = smprint("\t%s", s);
- else{
- t = ndboptions;
- ndboptions = smprint("\t%s%s", s, ndboptions);
- free(t);
- }
- free(s);
- }
- }
|