1 /*	$NetBSD: cd9660_debug.c,v 1.11 2010/10/27 18:51:35 christos Exp $	*/
2 
3 /*
4  * Copyright (c) 2005 Daniel Watt, Walter Deignan, Ryan Gabrys, Alan
5  * Perez-Rathke and Ram Vedam.  All rights reserved.
6  *
7  * This code was written by Daniel Watt, Walter Deignan, Ryan Gabrys,
8  * Alan Perez-Rathke and Ram Vedam.
9  *
10  * Redistribution and use in source and binary forms, with or
11  * without modification, are permitted provided that the following
12  * conditions are met:
13  * 1. Redistributions of source code must retain the above copyright
14  *    notice, this list of conditions and the following disclaimer.
15  * 2. Redistributions in binary form must reproduce the above
16  *    copyright notice, this list of conditions and the following
17  *    disclaimer in the documentation and/or other materials provided
18  *    with the distribution.
19  *
20  * THIS SOFTWARE IS PROVIDED BY DANIEL WATT, WALTER DEIGNAN, RYAN
21  * GABRYS, ALAN PEREZ-RATHKE AND RAM VEDAM ``AS IS'' AND ANY EXPRESS OR
22  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
23  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
24  * DISCLAIMED.  IN NO EVENT SHALL DANIEL WATT, WALTER DEIGNAN, RYAN
25  * GABRYS, ALAN PEREZ-RATHKE AND RAM VEDAM BE LIABLE FOR ANY DIRECT, INDIRECT,
26  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
27  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF
28  * USE,DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
29  * ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
30  * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
31  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY
32  * OF SUCH DAMAGE.
33  */
34 
35 #include <sys/cdefs.h>
36 __FBSDID("$FreeBSD$");
37 #include <sys/param.h>
38 
39 #include <sys/mount.h>
40 
41 #include "makefs.h"
42 #include "cd9660.h"
43 #include "iso9660_rrip.h"
44 
45 static void debug_print_susp_attrs(cd9660node *, int);
46 static void debug_dump_to_xml_padded_hex_output(const char *, unsigned char *,
47 						int);
48 
49 static inline void
50 print_n_tabs(int n)
51 {
52 	int i;
53 
54 	for (i = 1; i <= n; i ++)
55 		printf("\t");
56 }
57 
58 #if 0
59 void
60 debug_print_rrip_info(n)
61 cd9660node *n;
62 {
63 	struct ISO_SUSP_ATTRIBUTES *t;
64 	TAILQ_FOREACH(t, &node->head, rr_ll) {
65 
66 	}
67 }
68 #endif
69 
70 static void
71 debug_print_susp_attrs(cd9660node *n, int indent)
72 {
73 	struct ISO_SUSP_ATTRIBUTES *t;
74 
75 	TAILQ_FOREACH(t, &n->head, rr_ll) {
76 		print_n_tabs(indent);
77 		printf("-");
78 		printf("%c%c: L:%i",t->attr.su_entry.SP.h.type[0],
79 		    t->attr.su_entry.SP.h.type[1],
80 		    (int)t->attr.su_entry.SP.h.length[0]);
81 		printf("\n");
82 	}
83 }
84 
85 void
86 debug_print_tree(cd9660node *node, int level)
87 {
88 #if !HAVE_NBTOOL_CONFIG_H
89 	cd9660node *cn;
90 
91 	print_n_tabs(level);
92 	if (node->type & CD9660_TYPE_DOT) {
93 		printf(". (%i)\n",
94 		    isonum_733(node->isoDirRecord->extent));
95 	} else if (node->type & CD9660_TYPE_DOTDOT) {
96 		printf("..(%i)\n",
97 		    isonum_733(node->isoDirRecord->extent));
98 	} else if (node->isoDirRecord->name[0]=='\0') {
99 		printf("(ROOT) (%" PRIu32 " to %" PRId64 ")\n",
100 		    node->fileDataSector,
101 		    node->fileDataSector +
102 			node->fileSectorsUsed - 1);
103 	} else {
104 		printf("%s (%s) (%" PRIu32 " to %" PRId64 ")\n",
105 		    node->isoDirRecord->name,
106 		    (node->isoDirRecord->flags[0]
107 			& ISO_FLAG_DIRECTORY) ?  "DIR" : "FILE",
108 		    node->fileDataSector,
109 		    (node->fileSectorsUsed == 0) ?
110 			node->fileDataSector :
111 			node->fileDataSector
112 			    + node->fileSectorsUsed - 1);
113 	}
114 	if (diskStructure.rock_ridge_enabled)
115 		debug_print_susp_attrs(node, level + 1);
116 	TAILQ_FOREACH(cn, &node->cn_children, cn_next_child)
117 		debug_print_tree(cn, level + 1);
118 #else
119 	printf("Sorry, debugging is not supported in host-tools mode.\n");
120 #endif
121 }
122 
123 void
124 debug_print_path_tree(cd9660node *n)
125 {
126 	cd9660node *iterator = n;
127 
128 	/* Only display this message when called with the root node */
129 	if (n->parent == NULL)
130 		printf("debug_print_path_table: Dumping path table contents\n");
131 
132 	while (iterator != NULL) {
133 		if (iterator->isoDirRecord->name[0] == '\0')
134 			printf("0) (ROOT)\n");
135 		else
136 			printf("%i) %s\n", iterator->level,
137 			    iterator->isoDirRecord->name);
138 
139 		iterator = iterator->ptnext;
140 	}
141 }
142 
143 void
144 debug_print_volume_descriptor_information(void)
145 {
146 	volume_descriptor *tmp = diskStructure.firstVolumeDescriptor;
147 	char temp[CD9660_SECTOR_SIZE];
148 
149 	printf("==Listing Volume Descriptors==\n");
150 
151 	while (tmp != NULL) {
152 		memset(temp, 0, CD9660_SECTOR_SIZE);
153 		memcpy(temp, tmp->volumeDescriptorData + 1, 5);
154 		printf("Volume descriptor in sector %" PRId64
155 		    ": type %i, ID %s\n",
156 		    tmp->sector, tmp->volumeDescriptorData[0], temp);
157 		switch(tmp->volumeDescriptorData[0]) {
158 		case 0:/*boot record*/
159 			break;
160 
161 		case 1:		/* PVD */
162 			break;
163 
164 		case 2:		/* SVD */
165 			break;
166 
167 		case 3:		/* Volume Partition Descriptor */
168 			break;
169 
170 		case 255:	/* terminator */
171 			break;
172 		}
173 		tmp = tmp->next;
174 	}
175 
176 	printf("==Done Listing Volume Descriptors==\n");
177 }
178 
179 void
180 debug_dump_to_xml_ptentry(path_table_entry *pttemp, int num, int mode)
181 {
182 	printf("<ptentry num=\"%i\">\n" ,num);
183 	printf("<length>%i</length>\n", pttemp->length[0]);
184 	printf("<extended_attribute_length>%i</extended_attribute_length>\n",
185 	    pttemp->extended_attribute_length[0]);
186 	printf("<parent_number>%i</parent_number>\n",
187 	    debug_get_encoded_number(pttemp->parent_number,mode));
188 	debug_dump_to_xml_padded_hex_output("name",
189 	    pttemp->name, pttemp->length[0]);
190 	printf("</ptentry>\n");
191 }
192 
193 void
194 debug_dump_to_xml_path_table(FILE *fd, off_t sector, int size, int mode)
195 {
196 	path_table_entry pttemp;
197 	int t = 0;
198 	int n = 0;
199 
200 	if (fseeko(fd, CD9660_SECTOR_SIZE * sector, SEEK_SET) == -1)
201 		err(1, "fseeko");
202 
203 	while (t < size) {
204 		/* Read fixed data first */
205 		fread(&pttemp, 1, 8, fd);
206 		t += 8;
207 		/* Read variable */
208 		fread(((unsigned char*)&pttemp) + 8, 1, pttemp.length[0], fd);
209 		t += pttemp.length[0];
210 		debug_dump_to_xml_ptentry(&pttemp, n, mode);
211 		n++;
212 	}
213 
214 }
215 
216 /*
217  * XML Debug output functions
218  * Dump hierarchy of CD, as well as volume info, to XML
219  * Can be used later to diff against a standard,
220  * or just provide easy to read detailed debug output
221  */
222 void
223 debug_dump_to_xml(FILE *fd)
224 {
225 	unsigned char buf[CD9660_SECTOR_SIZE];
226 	off_t sector;
227 	int t, t2;
228 	struct iso_primary_descriptor primaryVD;
229 	struct _boot_volume_descriptor bootVD;
230 
231 	printf("<cd9660dump>\n");
232 
233 	/* Display Volume Descriptors */
234 	sector = 16;
235 	do {
236 		if (fseeko(fd, CD9660_SECTOR_SIZE * sector, SEEK_SET) == -1)
237 			err(1, "fseeko");
238 		fread(buf, 1, CD9660_SECTOR_SIZE, fd);
239 		t = (int)((unsigned char)buf[0]);
240 		switch (t) {
241 		case 0:
242 			memcpy(&bootVD, buf, CD9660_SECTOR_SIZE);
243 			break;
244 		case 1:
245 			memcpy(&primaryVD, buf, CD9660_SECTOR_SIZE);
246 			break;
247 		}
248 		debug_dump_to_xml_volume_descriptor(buf, sector);
249 		sector++;
250 	} while (t != 255);
251 
252 	t = debug_get_encoded_number((u_char *)primaryVD.type_l_path_table,
253 	    731);
254 	t2 = debug_get_encoded_number((u_char *)primaryVD.path_table_size, 733);
255 	printf("Path table 1 located at sector %i and is %i bytes long\n",
256 	    t,t2);
257 	debug_dump_to_xml_path_table(fd, t, t2, 721);
258 
259 	t = debug_get_encoded_number((u_char *)primaryVD.type_m_path_table,
260 	    731);
261 	debug_dump_to_xml_path_table(fd, t, t2, 722);
262 
263 	printf("</cd9660dump>\n");
264 }
265 
266 static void
267 debug_dump_to_xml_padded_hex_output(const char *element, unsigned char *buf,
268 				    int len)
269 {
270 	int i;
271 	int t;
272 
273 	printf("<%s>",element);
274 	for (i = 0; i < len; i++) {
275 		t = (unsigned char)buf[i];
276 		if (t >= 32 && t < 127)
277 			printf("%c",t);
278 	}
279 	printf("</%s>\n",element);
280 
281 	printf("<%s:hex>",element);
282 	for (i = 0; i < len; i++) {
283 		t = (unsigned char)buf[i];
284 		printf(" %x",t);
285 	}
286 	printf("</%s:hex>\n",element);
287 }
288 
289 int
290 debug_get_encoded_number(unsigned char* buf, int mode)
291 {
292 #if !HAVE_NBTOOL_CONFIG_H
293 	switch (mode) {
294 	/* 711: Single bite */
295 	case 711:
296 		return isonum_711(buf);
297 
298 	/* 712: Single signed byte */
299 	case 712:
300 		return isonum_712((signed char *)buf);
301 
302 	/* 721: 16 bit LE */
303 	case 721:
304 		return isonum_721(buf);
305 
306 	/* 731: 32 bit LE */
307 	case 731:
308 		return isonum_731(buf);
309 
310 	/* 722: 16 bit BE */
311 	case 722:
312 		return isonum_722(buf);
313 
314 	/* 732: 32 bit BE */
315 	case 732:
316 		return isonum_732(buf);
317 
318 	/* 723: 16 bit bothE */
319 	case 723:
320 		return isonum_723(buf);
321 
322 	/* 733: 32 bit bothE */
323 	case 733:
324 		return isonum_733(buf);
325 	}
326 #endif
327 	return 0;
328 }
329 
330 void
331 debug_dump_integer(const char *element, char* buf, int mode)
332 {
333 	printf("<%s>%i</%s>\n", element,
334 	    debug_get_encoded_number((unsigned char *)buf, mode), element);
335 }
336 
337 void
338 debug_dump_string(const char *element __unused, unsigned char *buf __unused, int len __unused)
339 {
340 
341 }
342 
343 void
344 debug_dump_directory_record_9_1(unsigned char* buf)
345 {
346 	printf("<directoryrecord>\n");
347 	debug_dump_integer("length",
348 	    ((struct iso_directory_record*) buf)->length, 711);
349 	debug_dump_integer("ext_attr_length",
350 	    ((struct iso_directory_record*) buf)->ext_attr_length,711);
351 	debug_dump_integer("extent",
352 	    (char *)((struct iso_directory_record*) buf)->extent, 733);
353 	debug_dump_integer("size",
354 	    (char *)((struct iso_directory_record*) buf)->size, 733);
355 	debug_dump_integer("flags",
356 	    ((struct iso_directory_record*) buf)->flags, 711);
357 	debug_dump_integer("file_unit_size",
358 	    ((struct iso_directory_record*) buf)->file_unit_size,711);
359 	debug_dump_integer("interleave",
360 	    ((struct iso_directory_record*) buf)->interleave, 711);
361 	debug_dump_integer("volume_sequence_number",
362 	    ((struct iso_directory_record*) buf)->volume_sequence_number,
363 	    723);
364 	debug_dump_integer("name_len",
365 	    ((struct iso_directory_record*) buf)->name_len, 711);
366 	debug_dump_to_xml_padded_hex_output("name",
367 	    (u_char *)((struct iso_directory_record*) buf)->name,
368 		debug_get_encoded_number((u_char *)
369 		    ((struct iso_directory_record*) buf)->length, 711));
370 	printf("</directoryrecord>\n");
371 }
372 
373 
374 void
375 debug_dump_to_xml_volume_descriptor(unsigned char* buf, int sector)
376 {
377 	printf("<volumedescriptor sector=\"%i\">\n", sector);
378 	printf("<vdtype>");
379 	switch(buf[0]) {
380 	case 0:
381 		printf("boot");
382 		break;
383 
384 	case 1:
385 		printf("primary");
386 		break;
387 
388 	case 2:
389 		printf("supplementary");
390 		break;
391 
392 	case 3:
393 		printf("volume partition descriptor");
394 		break;
395 
396 	case 255:
397 		printf("terminator");
398 		break;
399 	}
400 
401 	printf("</vdtype>\n");
402 	switch(buf[0]) {
403 	case 1:
404 		debug_dump_integer("type",
405 		    ((struct iso_primary_descriptor*)buf)->type, 711);
406 		debug_dump_to_xml_padded_hex_output("id",
407 		    (u_char *)((struct iso_primary_descriptor*) buf)->id,
408 		    ISODCL (  2,   6));
409 		debug_dump_integer("version",
410 		    ((struct iso_primary_descriptor*)buf)->version,
411 		     711);
412 		debug_dump_to_xml_padded_hex_output("system_id",
413 		    (u_char *)((struct iso_primary_descriptor*)buf)->system_id,
414 		    ISODCL(9,40));
415 		debug_dump_to_xml_padded_hex_output("volume_id",
416 		    (u_char *)((struct iso_primary_descriptor*)buf)->volume_id,
417 		    ISODCL(41,72));
418 		debug_dump_integer("volume_space_size",
419 		    ((struct iso_primary_descriptor*)buf)->volume_space_size,
420 		    733);
421 		debug_dump_integer("volume_set_size",
422 		    ((struct iso_primary_descriptor*)buf)->volume_set_size,
423 			    733);
424 		debug_dump_integer("volume_sequence_number",
425 		    ((struct iso_primary_descriptor*)buf)->volume_sequence_number,
426 		    723);
427 		debug_dump_integer("logical_block_size",
428 		    ((struct iso_primary_descriptor*)buf)->logical_block_size,
429 			    723);
430 		debug_dump_integer("path_table_size",
431 		    ((struct iso_primary_descriptor*)buf)->path_table_size,
432 			    733);
433 		debug_dump_integer("type_l_path_table",
434 		    ((struct iso_primary_descriptor*)buf)->type_l_path_table,
435 		    731);
436 		debug_dump_integer("opt_type_l_path_table",
437 		    ((struct iso_primary_descriptor*)buf)->opt_type_l_path_table,
438 		    731);
439 		debug_dump_integer("type_m_path_table",
440 		    ((struct iso_primary_descriptor*)buf)->type_m_path_table,
441 		    732);
442 		debug_dump_integer("opt_type_m_path_table",
443 			((struct iso_primary_descriptor*)buf)->opt_type_m_path_table,732);
444 		debug_dump_directory_record_9_1(
445 		    (u_char *)((struct iso_primary_descriptor*)buf)->root_directory_record);
446 		debug_dump_to_xml_padded_hex_output("volume_set_id",
447 		    (u_char *)((struct iso_primary_descriptor*) buf)->volume_set_id,
448 		    ISODCL (191, 318));
449 		debug_dump_to_xml_padded_hex_output("publisher_id",
450 		    (u_char *)((struct iso_primary_descriptor*) buf)->publisher_id,
451 		    ISODCL (319, 446));
452 		debug_dump_to_xml_padded_hex_output("preparer_id",
453 		    (u_char *)((struct iso_primary_descriptor*) buf)->preparer_id,
454 		    ISODCL (447, 574));
455 		debug_dump_to_xml_padded_hex_output("application_id",
456 		    (u_char *)((struct iso_primary_descriptor*) buf)->application_id,
457 		    ISODCL (575, 702));
458 		debug_dump_to_xml_padded_hex_output("copyright_file_id",
459 		    (u_char *)((struct iso_primary_descriptor*) buf)->copyright_file_id,
460 		    ISODCL (703, 739));
461 		debug_dump_to_xml_padded_hex_output("abstract_file_id",
462 		    (u_char *)((struct iso_primary_descriptor*) buf)->abstract_file_id,
463 		    ISODCL (740, 776));
464 		debug_dump_to_xml_padded_hex_output("bibliographic_file_id",
465 		    (u_char *)((struct iso_primary_descriptor*) buf)->bibliographic_file_id,
466 		    ISODCL (777, 813));
467 
468 		debug_dump_to_xml_padded_hex_output("creation_date",
469 		    (u_char *)((struct iso_primary_descriptor*) buf)->creation_date,
470 		    ISODCL (814, 830));
471 		debug_dump_to_xml_padded_hex_output("modification_date",
472 		    (u_char *)((struct iso_primary_descriptor*) buf)->modification_date,
473 		    ISODCL (831, 847));
474 		debug_dump_to_xml_padded_hex_output("expiration_date",
475 		    (u_char *)((struct iso_primary_descriptor*) buf)->expiration_date,
476 		    ISODCL (848, 864));
477 		debug_dump_to_xml_padded_hex_output("effective_date",
478 		    (u_char *)((struct iso_primary_descriptor*) buf)->effective_date,
479 		    ISODCL (865, 881));
480 
481 		debug_dump_to_xml_padded_hex_output("file_structure_version",
482 		    (u_char *)((struct iso_primary_descriptor*) buf)->file_structure_version,
483 		    ISODCL(882,882));
484 		break;
485 	}
486 	printf("</volumedescriptor>\n");
487 }
488 
489