dumptab.c revision 84125 
1/*
2 * dumptab.c - handles dumping the database
3 *
4 * $FreeBSD: head/libexec/bootpd/dumptab.c 84125 2001-09-29 11:37:13Z iedowse $
5 */
6
7#include <sys/types.h>
8#include <netinet/in.h>
9#include <arpa/inet.h>			/* inet_ntoa */
10
11#include <stdio.h>
12#include <stdlib.h>
13#include <syslog.h>
14#include <time.h>
15
16#ifndef USE_BFUNCS
17#include <memory.h>
18/* Yes, memcpy is OK here (no overlapped copies). */
19#define bcopy(a,b,c)    memcpy(b,a,c)
20#define bzero(p,l)      memset(p,0,l)
21#define bcmp(a,b,c)     memcmp(a,b,c)
22#endif
23
24#include "bootp.h"
25#include "hash.h"
26#include "hwaddr.h"
27#include "report.h"
28#include "patchlevel.h"
29#include "bootpd.h"
30
31#ifdef	__STDC__
32#define P(args) args
33#else
34#define P(args) ()
35#endif
36
37#ifdef DEBUG
38static void dump_generic P((FILE *, struct shared_bindata *));
39static void dump_host P((FILE *, struct host *));
40static void list_ipaddresses P((FILE *, struct in_addr_list *));
41#endif
42
43#undef P
44
45#ifndef	DEBUG
46void
47dumptab(filename)
48	char *filename;
49{
50	report(LOG_INFO, "No dumptab support!");
51}
52
53#else /* DEBUG */
54
55/*
56 * Dump the internal memory database to bootpd_dump.
57 */
58
59void
60dumptab(filename)
61	char *filename;
62{
63	int n;
64	struct host *hp;
65	FILE *fp;
66	time_t t;
67	/* Print symbols in alphabetical order for reader's convenience. */
68	static char legend[] = "#\n# Legend:\t(see bootptab.5)\n\
69#\tfirst field -- hostname (not indented)\n\
70#\tbf -- bootfile\n\
71#\tbs -- bootfile size in 512-octet blocks\n\
72#\tcs -- cookie servers\n\
73#\tdf -- dump file name\n\
74#\tdn -- domain name\n\
75#\tds -- domain name servers\n\
76#\tef -- extension file\n\
77#\tex -- exec file (YORK_EX_OPTION)\n\
78#\tgw -- gateways\n\
79#\tha -- hardware address\n\
80#\thd -- home directory for bootfiles\n\
81#\thn -- host name set for client\n\
82#\tht -- hardware type\n\
83#\tim -- impress servers\n\
84#\tip -- host IP address\n\
85#\tlg -- log servers\n\
86#\tlp -- LPR servers\n\
87#\tms -- message size\n\
88#\tmw -- min wait (secs)\n\
89#\tns -- IEN-116 name servers\n\
90#\tnt -- NTP servers (RFC 1129)\n\
91#\tra -- reply address override\n\
92#\trl -- resource location protocol servers\n\
93#\trp -- root path\n\
94#\tsa -- boot server address\n\
95#\tsm -- subnet mask\n\
96#\tsw -- swap server\n\
97#\ttc -- template host (points to similar host entry)\n\
98#\ttd -- TFTP directory\n\
99#\tto -- time offset (seconds)\n\
100#\tts -- time servers\n\
101#\tvm -- vendor magic number\n\
102#\tyd -- YP (NIS) domain\n\
103#\tys -- YP (NIS) servers\n\
104#\tTn -- generic option tag n\n\
105\n";
106
107	/*
108	 * Open bootpd.dump file.
109	 */
110	if ((fp = fopen(filename, "w")) == NULL) {
111		report(LOG_ERR, "error opening \"%s\": %s",
112			   filename, get_errmsg());
113		exit(1);
114	}
115	t = time(NULL);
116	fprintf(fp, "\n# %s %s.%d\n", progname, VERSION, PATCHLEVEL);
117	fprintf(fp, "# %s: dump of bootp server database.\n", filename);
118	fprintf(fp, "# Dump taken %s", ctime(&t));
119	fwrite(legend, 1, sizeof(legend) - 1, fp);
120
121	n = 0;
122	for (hp = (struct host *) hash_FirstEntry(nmhashtable); hp != NULL;
123		 hp = (struct host *) hash_NextEntry(nmhashtable)) {
124		dump_host(fp, hp);
125		fprintf(fp, "\n");
126		n++;
127	}
128	fclose(fp);
129
130	report(LOG_INFO, "dumped %d entries to \"%s\".", n, filename);
131}
132
133
134
135/*
136 * Dump all the available information on the host pointed to by "hp".
137 * The output is sent to the file pointed to by "fp".
138 */
139
140static void
141dump_host(fp, hp)
142	FILE *fp;
143	struct host *hp;
144{
145	/* Print symbols in alphabetical order for reader's convenience. */
146	if (hp) {
147		fprintf(fp, "%s:", (hp->hostname ?
148							hp->hostname->string : "?"));
149		if (hp->flags.bootfile) {
150			fprintf(fp, "\\\n\t:bf=%s:", hp->bootfile->string);
151		}
152		if (hp->flags.bootsize) {
153			fprintf(fp, "\\\n\t:bs=");
154			if (hp->flags.bootsize_auto) {
155				fprintf(fp, "auto:");
156			} else {
157				fprintf(fp, "%lu:", (u_long)hp->bootsize);
158			}
159		}
160		if (hp->flags.cookie_server) {
161			fprintf(fp, "\\\n\t:cs=");
162			list_ipaddresses(fp, hp->cookie_server);
163			fprintf(fp, ":");
164		}
165		if (hp->flags.dump_file) {
166			fprintf(fp, "\\\n\t:df=%s:", hp->dump_file->string);
167		}
168		if (hp->flags.domain_name) {
169			fprintf(fp, "\\\n\t:dn=%s:", hp->domain_name->string);
170		}
171		if (hp->flags.domain_server) {
172			fprintf(fp, "\\\n\t:ds=");
173			list_ipaddresses(fp, hp->domain_server);
174			fprintf(fp, ":");
175		}
176		if (hp->flags.exten_file) {
177			fprintf(fp, "\\\n\t:ef=%s:", hp->exten_file->string);
178		}
179		if (hp->flags.exec_file) {
180			fprintf(fp, "\\\n\t:ex=%s:", hp->exec_file->string);
181		}
182		if (hp->flags.gateway) {
183			fprintf(fp, "\\\n\t:gw=");
184			list_ipaddresses(fp, hp->gateway);
185			fprintf(fp, ":");
186		}
187		/* FdC: swap_server (see below) */
188		if (hp->flags.homedir) {
189			fprintf(fp, "\\\n\t:hd=%s:", hp->homedir->string);
190		}
191		/* FdC: dump_file (see above) */
192		/* FdC: domain_name (see above) */
193		/* FdC: root_path (see below) */
194		if (hp->flags.name_switch && hp->flags.send_name) {
195			fprintf(fp, "\\\n\t:hn:");
196		}
197		if (hp->flags.htype) {
198			int hlen = haddrlength(hp->htype);
199			fprintf(fp, "\\\n\t:ht=%u:", (unsigned) hp->htype);
200			if (hp->flags.haddr) {
201				fprintf(fp, "ha=\"%s\":",
202						haddrtoa(hp->haddr, hlen));
203			}
204		}
205		if (hp->flags.impress_server) {
206			fprintf(fp, "\\\n\t:im=");
207			list_ipaddresses(fp, hp->impress_server);
208			fprintf(fp, ":");
209		}
210		/* NetBSD: swap_server (see below) */
211		if (hp->flags.iaddr) {
212			fprintf(fp, "\\\n\t:ip=%s:", inet_ntoa(hp->iaddr));
213		}
214		if (hp->flags.log_server) {
215			fprintf(fp, "\\\n\t:lg=");
216			list_ipaddresses(fp, hp->log_server);
217			fprintf(fp, ":");
218		}
219		if (hp->flags.lpr_server) {
220			fprintf(fp, "\\\n\t:lp=");
221			list_ipaddresses(fp, hp->lpr_server);
222			fprintf(fp, ":");
223		}
224		if (hp->flags.msg_size) {
225			fprintf(fp, "\\\n\t:ms=%lu:", (u_long)hp->msg_size);
226		}
227		if (hp->flags.min_wait) {
228			fprintf(fp, "\\\n\t:mw=%lu:", (u_long)hp->min_wait);
229		}
230		if (hp->flags.name_server) {
231			fprintf(fp, "\\\n\t:ns=");
232			list_ipaddresses(fp, hp->name_server);
233			fprintf(fp, ":");
234		}
235		if (hp->flags.ntp_server) {
236			fprintf(fp, "\\\n\t:nt=");
237			list_ipaddresses(fp, hp->ntp_server);
238			fprintf(fp, ":");
239		}
240		if (hp->flags.reply_addr) {
241			fprintf(fp, "\\\n\t:ra=%s:", inet_ntoa(hp->reply_addr));
242		}
243		if (hp->flags.rlp_server) {
244			fprintf(fp, "\\\n\t:rl=");
245			list_ipaddresses(fp, hp->rlp_server);
246			fprintf(fp, ":");
247		}
248		if (hp->flags.root_path) {
249			fprintf(fp, "\\\n\t:rp=%s:", hp->root_path->string);
250		}
251		if (hp->flags.bootserver) {
252			fprintf(fp, "\\\n\t:sa=%s:", inet_ntoa(hp->bootserver));
253		}
254		if (hp->flags.subnet_mask) {
255			fprintf(fp, "\\\n\t:sm=%s:", inet_ntoa(hp->subnet_mask));
256		}
257		if (hp->flags.swap_server) {
258			fprintf(fp, "\\\n\t:sw=%s:", inet_ntoa(hp->subnet_mask));
259		}
260		if (hp->flags.tftpdir) {
261			fprintf(fp, "\\\n\t:td=%s:", hp->tftpdir->string);
262		}
263		/* NetBSD: rootpath (see above) */
264		/* NetBSD: domainname (see above) */
265		/* NetBSD: dumpfile (see above) */
266		if (hp->flags.time_offset) {
267			fprintf(fp, "\\\n\t:to=%ld:", (long)hp->time_offset);
268		}
269		if (hp->flags.time_server) {
270			fprintf(fp, "\\\n\t:ts=");
271			list_ipaddresses(fp, hp->time_server);
272			fprintf(fp, ":");
273		}
274		if (hp->flags.vm_cookie) {
275			fprintf(fp, "\\\n\t:vm=");
276			if (!bcmp(hp->vm_cookie, vm_rfc1048, 4)) {
277				fprintf(fp, "rfc1048:");
278			} else if (!bcmp(hp->vm_cookie, vm_cmu, 4)) {
279				fprintf(fp, "cmu:");
280			} else {
281				fprintf(fp, "%d.%d.%d.%d:",
282						(int) ((hp->vm_cookie)[0]),
283						(int) ((hp->vm_cookie)[1]),
284						(int) ((hp->vm_cookie)[2]),
285						(int) ((hp->vm_cookie)[3]));
286			}
287		}
288		if (hp->flags.nis_domain) {
289			fprintf(fp, "\\\n\t:yd=%s:",
290					hp->nis_domain->string);
291		}
292		if (hp->flags.nis_server) {
293			fprintf(fp, "\\\n\t:ys=");
294			list_ipaddresses(fp, hp->nis_server);
295			fprintf(fp, ":");
296		}
297		/*
298		 * XXX - Add new tags here (or above,
299		 * so they print in alphabetical order).
300		 */
301
302		if (hp->flags.generic) {
303			dump_generic(fp, hp->generic);
304		}
305	}
306}
307
308
309static void
310dump_generic(fp, generic)
311	FILE *fp;
312	struct shared_bindata *generic;
313{
314	u_char *bp = generic->data;
315	u_char *ep = bp + generic->length;
316	u_char tag;
317	int len;
318
319	while (bp < ep) {
320		tag = *bp++;
321		if (tag == TAG_PAD)
322			continue;
323		if (tag == TAG_END)
324			return;
325		len = *bp++;
326		if (bp + len > ep) {
327			fprintf(fp, " #junk in generic! :");
328			return;
329		}
330		fprintf(fp, "\\\n\t:T%d=", tag);
331		while (len) {
332			fprintf(fp, "%02X", *bp);
333			bp++;
334			len--;
335			if (len)
336				fprintf(fp, ".");
337		}
338		fprintf(fp, ":");
339	}
340}
341
342
343
344/*
345 * Dump an entire struct in_addr_list of IP addresses to the indicated file.
346 *
347 * The addresses are printed in standard ASCII "dot" notation and separated
348 * from one another by a single space.  A single leading space is also
349 * printed before the first adddress.
350 *
351 * Null lists produce no output (and no error).
352 */
353
354static void
355list_ipaddresses(fp, ipptr)
356	FILE *fp;
357	struct in_addr_list *ipptr;
358{
359	unsigned count;
360	struct in_addr *addrptr;
361
362	if (ipptr) {
363		count = ipptr->addrcount;
364		addrptr = ipptr->addr;
365		while (count > 0) {
366			fprintf(fp, "%s", inet_ntoa(*addrptr++));
367			count--;
368			if (count)
369				fprintf(fp, ", ");
370		}
371	}
372}
373
374#endif /* DEBUG */
375
376/*
377 * Local Variables:
378 * tab-width: 4
379 * c-indent-level: 4
380 * c-argdecl-indent: 4
381 * c-continued-statement-offset: 4
382 * c-continued-brace-offset: -4
383 * c-label-offset: -4
384 * c-brace-offset: 0
385 * End:
386 */
387