src/disk/bootblock_iso9660.c

/*
 *  Copyright (C) 2003-2007  Anders Gavare.  All rights reserved.
 *
 *  Redistribution and use in source and binary forms, with or without
 *  modification, are permitted provided that the following conditions are met:
 *
 *  1. Redistributions of source code must retain the above copyright
 *     notice, this list of conditions and the following disclaimer.
 *  2. Redistributions in binary form must reproduce the above copyright  
 *     notice, this list of conditions and the following disclaimer in the 
 *     documentation and/or other materials provided with the distribution.
 *  3. The name of the author may not be used to endorse or promote products
 *     derived from this software without specific prior written permission.
 *
 *  THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
 *  ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 *  IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 *  ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE   
 *  FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
 *  DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
 *  OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
 *  HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
 *  LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
 *  OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
 *  SUCH DAMAGE.
 *
 *
 *  $Id: bootblock_iso9660.c,v 1.4 2007/06/23 23:59:14 debug Exp $
 *
 *  ISO9660 CD-ROM "bootblock" handling.
 *
 *  There is really no bootblock; instead, the file which is to be booted
 *  is extracted into a temporary file, and started as if it was given
 *  as a normal file argument on the command line.
 *
 *  TODO: This is really ugly. It's a quick hack. All the magic constants
 *        need to be replaced with real code!
 */

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <sys/types.h>
#include <unistd.h>

#include "cpu.h"
#include "diskimage.h"
#include "machine.h"
#include "misc.h"

/*  #define ISO_DEBUG  */


static void debug_print_volume_id_and_filename(int iso_type,
        unsigned char *buf, char *filename)
{
        /*  Volume ID:  */
        char str[35];
        int i, ofs = iso_type == 3? 48 : 40;

        memcpy(str, buf + ofs, sizeof(str));
        str[32] = '\0';  i = 31;

        while (i >= 0 && str[i]==' ')
                str[i--] = '\0';
        if (str[0])
                debug("\"%s\"", str);
        else {
                /*  System ID:  */
                ofs = iso_type == 3? 16 : 8;
                memcpy(str, buf + ofs, sizeof(str));
                str[32] = '\0';  i = 31;
                while (i >= 0 && str[i]==' ')
                        str[i--] = '\0';
                if (str[0])
                        debug("\"%s\"", str);
                else
                        debug("(no ID)");
        }

        debug(":%s\n", filename);
}


/*
 *  iso_load_bootblock():
 *
 *  Try to load a kernel from an ISO 9660 disk image. iso_type is 1 for
 *  "CD001" (standard), 2 for "CDW01" (ECMA), and 3 for "CDROM" (Sierra).
 *
 *  TODO: This function uses too many magic offsets and so on; it should be
 *  cleaned up some day.
 *
 *  Returns 1 on success, 0 on failure.
 */
int iso_load_bootblock(struct machine *m, struct cpu *cpu,
        int disk_id, int disk_type, int iso_type, unsigned char *buf,
        int *n_loadp, char ***load_namesp)
{
        int filenr, dirlen, res = 0, res2, iadd = DEBUG_INDENTATION, found_dir;
        uint64_t dirofs, fileofs, filelen;
        unsigned char *dirbuf = NULL, *dp, *match_entry = NULL, *filebuf = NULL;
        char *p, *filename_orig, *filename, *tmpfname = NULL;
        char **new_array;
        char *tmpdir = getenv("TMPDIR");
        int tmpfile_handle;

        if (tmpdir == NULL)
                tmpdir = DEFAULT_TMP_DIR;

        CHECK_ALLOCATION(filename = strdup(cpu->machine->boot_kernel_filename));
        filename_orig = filename;

        debug("ISO9660 boot:\n");
        debug_indentation(iadd);

        debug_print_volume_id_and_filename(iso_type, buf, filename);


        /*
         *  Traverse the directory structure to find the kernel.
         */

        dirlen = buf[0x84] + 256*buf[0x85] + 65536*buf[0x86];
        if (dirlen != buf[0x8b] + 256*buf[0x8a] + 65536*buf[0x89])
                fatal("WARNING: Root directory length mismatch?\n");

        dirofs = (int64_t)(buf[0x8c] + (buf[0x8d] << 8) + (buf[0x8e] << 16) +
            ((uint64_t)buf[0x8f] << 24)) * 2048;

#ifdef ISO_DEBUG
        debug("root = %i bytes at 0x%llx\n", dirlen, (long long)dirofs);
#endif

        CHECK_ALLOCATION(dirbuf = malloc(dirlen));
        res2 = diskimage_access(m, disk_id, disk_type, 0, dirofs, dirbuf,
            dirlen);
        if (!res2) {
                fatal("Couldn't read the disk image. Aborting.\n");
                goto ret;
        }

        found_dir = 1;  /*  Assume root dir  */
        dp = dirbuf; filenr = 1;
        p = NULL;
        while (dp < dirbuf + dirlen) {
                size_t i, nlen = dp[0];
                int x = dp[2] + (dp[3] << 8) + (dp[4] << 16) +
                    ((uint64_t)dp[5] << 24);
                int y = dp[6] + (dp[7] << 8);
                char direntry[65];

                dp += 8;

                /*
                 *  As long as there is an \ or / in the filename, then we
                 *  have not yet found the directory.
                 */
                p = strchr(filename, '/');
                if (p == NULL)
                        p = strchr(filename, '\\');

#ifdef ISO_DEBUG
                debug("%i%s: %i, %i, \"", filenr, filenr == found_dir?
                    " [CURRENT]" : "", x, y);
#endif
                for (i=0; i<nlen && i<sizeof(direntry)-1; i++)
                        if (dp[i]) {
                                direntry[i] = dp[i];
#ifdef ISO_DEBUG
                                debug("%c", dp[i]);
#endif
                        } else
                                break;
#ifdef ISO_DEBUG
                debug("\"\n");
#endif
                direntry[i] = '\0';

                /*  A directory name match?  */
                if ((p != NULL && strncasecmp(filename, direntry, nlen) == 0
                    && nlen == (size_t)p - (size_t)filename && found_dir == y)
                    || (p == NULL && direntry[0] == '\0') ) {
                        found_dir = filenr;
                        if (p != NULL)
                                filename = p+1;
                        dirofs = 2048 * (int64_t)x;
                }

                dp += nlen;

                /*  16-bit aligned lenght:  */
                if (nlen & 1)
                        dp ++;

                filenr ++;
        }

        p = strchr(filename, '/');
        if (p == NULL)
                p = strchr(filename, '\\');

        if (p != NULL) {
                char *blah = filename_orig;

                fatal("could not find '%s' in /", filename);

                /*  Print the first part of the filename:  */
                while (blah != filename)
                        fatal("%c", *blah++);
                
                fatal("\n");
                goto ret;
        }

        /*  debug("dirofs = 0x%llx\n", (long long)dirofs);  */

        /*  Free the old dirbuf, and allocate a new one:  */
        free(dirbuf);
        CHECK_ALLOCATION(dirbuf = malloc(512));

        for (;;) {
                size_t len, i;

                /*  Too close to another sector? Then realign.  */
                if ((dirofs & 2047) + 70 > 2047) {
                        dirofs = (dirofs | 2047) + 1;
                        /*  debug("realign dirofs = 0x%llx\n", dirofs);  */
                }

                res2 = diskimage_access(m, disk_id, disk_type, 0, dirofs,
                    dirbuf, 256);
                if (!res2) {
                        fatal("Couldn't read the disk image. Aborting.\n");
                        goto ret;
                }

                dp = dirbuf;
                len = dp[0];
                if (len < 2)
                        break;

                /*
                 *  TODO: Actually parse the directory entry!
                 *
                 *  Haha, this must be rewritten.
                 */

#if 0
/*  hahahaha  */
printf("filename = '%s'\n", filename);
{
int j;
for (j=32; j<len; j++)
        printf("%c", dp[j] >= ' ' && dp[j] < 128? dp[j] : '.');
printf("\n");
}
#endif

                for (i=32; i<len; i++) {
                        if (i < len - strlen(filename))
                                if (strncmp(filename, (char *)dp + i,
                                    strlen(filename)) == 0) {
                                        /*  The filename was found somewhere
                                            in the directory entry.  */
                                        if (match_entry != NULL) {
                                                fatal("TODO: I'm too lazy to"
                                                    " implement a correct "
                                                    "directory parser right "
                                                    "now... (BUG)\n");
                                                exit(1);
                                        }
                                        CHECK_ALLOCATION(match_entry =
                                            malloc(512));
                                        memcpy(match_entry, dp, 512);
                                        break;
                                }
                }

                if (match_entry != NULL)
                        break;

                dirofs += len;
        }

        if (match_entry == NULL) {
                char *blah = filename_orig;

                fatal("could not find '%s' in /", filename);

                /*  Print the first part of the filename:  */
                while (blah != filename)
                        fatal("%c", *blah++);
                
                fatal("\n");
                goto ret;
        }

        fileofs = match_entry[2] + (match_entry[3] << 8) +
            (match_entry[4] << 16) + ((uint64_t)match_entry[5] << 24);
        filelen = match_entry[10] + (match_entry[11] << 8) +
            (match_entry[12] << 16) + ((uint64_t)match_entry[13] << 24);
        fileofs *= 2048;

        /*  debug("filelen=%llx fileofs=%llx\n", (long long)filelen,
            (long long)fileofs);  */

        CHECK_ALLOCATION(filebuf = malloc(filelen));

        CHECK_ALLOCATION(tmpfname = malloc(300));
        snprintf(tmpfname, 300, "%s/gxemul.XXXXXXXXXXXX", tmpdir);

        res2 = diskimage_access(m, disk_id, disk_type, 0, fileofs, filebuf,
            filelen);
        if (!res2) {
                fatal("could not read the file from the disk image!\n");
                goto ret;
        }

        tmpfile_handle = mkstemp(tmpfname);
        if (tmpfile_handle < 0) {
                fatal("could not create %s\n", tmpfname);
                exit(1);
        }
        write(tmpfile_handle, filebuf, filelen);
        close(tmpfile_handle);

        debug("extracted %lli bytes into %s\n", (long long)filelen, tmpfname);

        /*  Add the temporary filename to the load_namesp array:  */
        (*n_loadp)++;
        CHECK_ALLOCATION(new_array = malloc(sizeof(char *) * (*n_loadp)));
        memcpy(new_array, *load_namesp, sizeof(char *) * (*n_loadp));
        *load_namesp = new_array;

        /*  This adds a Backspace char in front of the filename; this
            is a special hack which causes the file to be removed once
            it has been loaded.  */
        CHECK_ALLOCATION(tmpfname = realloc(tmpfname, strlen(tmpfname) + 2));
        memmove(tmpfname + 1, tmpfname, strlen(tmpfname) + 1);
        tmpfname[0] = 8;

        (*load_namesp)[*n_loadp - 1] = tmpfname;

        res = 1;

ret:
        if (dirbuf != NULL)
                free(dirbuf);

        if (filebuf != NULL)
                free(filebuf);

        if (match_entry != NULL)
                free(match_entry);

        if (tmpfname != NULL)
                free(tmpfname);

        free(filename_orig);

        debug_indentation(-iadd);
        return res;
}

1	/*
2	* Copyright (C) 2003-2007 Anders Gavare. All rights reserved.
3	*
4	* Redistribution and use in source and binary forms, with or without
5	* modification, are permitted provided that the following conditions are met:
6	*
7	* 1. Redistributions of source code must retain the above copyright
8	* notice, this list of conditions and the following disclaimer.
9	* 2. Redistributions in binary form must reproduce the above copyright
10	* notice, this list of conditions and the following disclaimer in the
11	* documentation and/or other materials provided with the distribution.
12	* 3. The name of the author may not be used to endorse or promote products
13	* derived from this software without specific prior written permission.
14	*
15	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
16	* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
17	* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
18	* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
19	* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
20	* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
21	* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
22	* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
23	* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
24	* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
25	* SUCH DAMAGE.
26	*
27	*
28	* $Id: bootblock_iso9660.c,v 1.4 2007/06/23 23:59:14 debug Exp $
29	*
30	* ISO9660 CD-ROM "bootblock" handling.
31	*
32	* There is really no bootblock; instead, the file which is to be booted
33	* is extracted into a temporary file, and started as if it was given
34	* as a normal file argument on the command line.
35	*
36	* TODO: This is really ugly. It's a quick hack. All the magic constants
37	* need to be replaced with real code!
38	*/
39
40	#include <stdio.h>
41	#include <stdlib.h>
42	#include <string.h>
43	#include <sys/types.h>
44	#include <unistd.h>
45
46	#include "cpu.h"
47	#include "diskimage.h"
48	#include "machine.h"
49	#include "misc.h"
50
51	/* #define ISO_DEBUG */
52
53
54	static void debug_print_volume_id_and_filename(int iso_type,
55	unsigned char buf, char filename)
56	{
57	/* Volume ID: */
58	char str[35];
59	int i, ofs = iso_type == 3? 48 : 40;
60
61	memcpy(str, buf + ofs, sizeof(str));
62	str[32] = '\0'; i = 31;
63
64	while (i >= 0 && str[i]==' ')
65	str[i--] = '\0';
66	if (str[0])
67	debug("\"%s\"", str);
68	else {
69	/* System ID: */
70	ofs = iso_type == 3? 16 : 8;
71	memcpy(str, buf + ofs, sizeof(str));
72	str[32] = '\0'; i = 31;
73	while (i >= 0 && str[i]==' ')
74	str[i--] = '\0';
75	if (str[0])
76	debug("\"%s\"", str);
77	else
78	debug("(no ID)");
79	}
80
81	debug(":%s\n", filename);
82	}
83
84
85	/*
86	* iso_load_bootblock():
87	*
88	* Try to load a kernel from an ISO 9660 disk image. iso_type is 1 for
89	* "CD001" (standard), 2 for "CDW01" (ECMA), and 3 for "CDROM" (Sierra).
90	*
91	* TODO: This function uses too many magic offsets and so on; it should be
92	* cleaned up some day.
93	*
94	* Returns 1 on success, 0 on failure.
95	*/
96	int iso_load_bootblock(struct machine m, struct cpu cpu,
97	int disk_id, int disk_type, int iso_type, unsigned char *buf,
98	int n_loadp, char **load_namesp)
99	{
100	int filenr, dirlen, res = 0, res2, iadd = DEBUG_INDENTATION, found_dir;
101	uint64_t dirofs, fileofs, filelen;
102	unsigned char dirbuf = NULL, dp, match_entry = NULL, filebuf = NULL;
103	char p, filename_orig, filename, tmpfname = NULL;
104	char **new_array;
105	char *tmpdir = getenv("TMPDIR");
106	int tmpfile_handle;
107
108	if (tmpdir == NULL)
109	tmpdir = DEFAULT_TMP_DIR;
110
111	CHECK_ALLOCATION(filename = strdup(cpu->machine->boot_kernel_filename));
112	filename_orig = filename;
113
114	debug("ISO9660 boot:\n");
115	debug_indentation(iadd);
116
117	debug_print_volume_id_and_filename(iso_type, buf, filename);
118
119
120	/*
121	* Traverse the directory structure to find the kernel.
122	*/
123
124	dirlen = buf[0x84] + 256buf[0x85] + 65536buf[0x86];
125	if (dirlen != buf[0x8b] + 256buf[0x8a] + 65536buf[0x89])
126	fatal("WARNING: Root directory length mismatch?\n");
127
128	dirofs = (int64_t)(buf[0x8c] + (buf[0x8d] << 8) + (buf[0x8e] << 16) +
129	((uint64_t)buf[0x8f] << 24)) * 2048;
130
131	#ifdef ISO_DEBUG
132	debug("root = %i bytes at 0x%llx\n", dirlen, (long long)dirofs);
133	#endif
134
135	CHECK_ALLOCATION(dirbuf = malloc(dirlen));
136	res2 = diskimage_access(m, disk_id, disk_type, 0, dirofs, dirbuf,
137	dirlen);
138	if (!res2) {
139	fatal("Couldn't read the disk image. Aborting.\n");
140	goto ret;
141	}
142
143	found_dir = 1; /* Assume root dir */
144	dp = dirbuf; filenr = 1;
145	p = NULL;
146	while (dp < dirbuf + dirlen) {
147	size_t i, nlen = dp[0];
148	int x = dp[2] + (dp[3] << 8) + (dp[4] << 16) +
149	((uint64_t)dp[5] << 24);
150	int y = dp[6] + (dp[7] << 8);
151	char direntry[65];
152
153	dp += 8;
154
155	/*
156	* As long as there is an \ or / in the filename, then we
157	* have not yet found the directory.
158	*/
159	p = strchr(filename, '/');
160	if (p == NULL)
161	p = strchr(filename, '\\');
162
163	#ifdef ISO_DEBUG
164	debug("%i%s: %i, %i, \"", filenr, filenr == found_dir?
165	" [CURRENT]" : "", x, y);
166	#endif
167	for (i=0; i<nlen && i<sizeof(direntry)-1; i++)
168	if (dp[i]) {
169	direntry[i] = dp[i];
170	#ifdef ISO_DEBUG
171	debug("%c", dp[i]);
172	#endif
173	} else
174	break;
175	#ifdef ISO_DEBUG
176	debug("\"\n");
177	#endif
178	direntry[i] = '\0';
179
180	/* A directory name match? */
181	if ((p != NULL && strncasecmp(filename, direntry, nlen) == 0
182	&& nlen == (size_t)p - (size_t)filename && found_dir == y)
183	\|\| (p == NULL && direntry[0] == '\0') ) {
184	found_dir = filenr;
185	if (p != NULL)
186	filename = p+1;
187	dirofs = 2048 * (int64_t)x;
188	}
189
190	dp += nlen;
191
192	/* 16-bit aligned lenght: */
193	if (nlen & 1)
194	dp ++;
195
196	filenr ++;
197	}
198
199	p = strchr(filename, '/');
200	if (p == NULL)
201	p = strchr(filename, '\\');
202
203	if (p != NULL) {
204	char *blah = filename_orig;
205
206	fatal("could not find '%s' in /", filename);
207
208	/* Print the first part of the filename: */
209	while (blah != filename)
210	fatal("%c", *blah++);
211
212	fatal("\n");
213	goto ret;
214	}
215
216	/* debug("dirofs = 0x%llx\n", (long long)dirofs); */
217
218	/* Free the old dirbuf, and allocate a new one: */
219	free(dirbuf);
220	CHECK_ALLOCATION(dirbuf = malloc(512));
221
222	for (;;) {
223	size_t len, i;
224
225	/* Too close to another sector? Then realign. */
226	if ((dirofs & 2047) + 70 > 2047) {
227	dirofs = (dirofs \| 2047) + 1;
228	/* debug("realign dirofs = 0x%llx\n", dirofs); */
229	}
230
231	res2 = diskimage_access(m, disk_id, disk_type, 0, dirofs,
232	dirbuf, 256);
233	if (!res2) {
234	fatal("Couldn't read the disk image. Aborting.\n");
235	goto ret;
236	}
237
238	dp = dirbuf;
239	len = dp[0];
240	if (len < 2)
241	break;
242
243	/*
244	* TODO: Actually parse the directory entry!
245	*
246	* Haha, this must be rewritten.
247	*/
248
249	#if 0
250	/* hahahaha */
251	printf("filename = '%s'\n", filename);
252	{
253	int j;
254	for (j=32; j<len; j++)
255	printf("%c", dp[j] >= ' ' && dp[j] < 128? dp[j] : '.');
256	printf("\n");
257	}
258	#endif
259
260	for (i=32; i<len; i++) {
261	if (i < len - strlen(filename))
262	if (strncmp(filename, (char *)dp + i,
263	strlen(filename)) == 0) {
264	/* The filename was found somewhere
265	in the directory entry. */
266	if (match_entry != NULL) {
267	fatal("TODO: I'm too lazy to"
268	" implement a correct "
269	"directory parser right "
270	"now... (BUG)\n");
271	exit(1);
272	}
273	CHECK_ALLOCATION(match_entry =
274	malloc(512));
275	memcpy(match_entry, dp, 512);
276	break;
277	}
278	}
279
280	if (match_entry != NULL)
281	break;
282
283	dirofs += len;
284	}
285
286	if (match_entry == NULL) {
287	char *blah = filename_orig;
288
289	fatal("could not find '%s' in /", filename);
290
291	/* Print the first part of the filename: */
292	while (blah != filename)
293	fatal("%c", *blah++);
294
295	fatal("\n");
296	goto ret;
297	}
298
299	fileofs = match_entry[2] + (match_entry[3] << 8) +
300	(match_entry[4] << 16) + ((uint64_t)match_entry[5] << 24);
301	filelen = match_entry[10] + (match_entry[11] << 8) +
302	(match_entry[12] << 16) + ((uint64_t)match_entry[13] << 24);
303	fileofs *= 2048;
304
305	/* debug("filelen=%llx fileofs=%llx\n", (long long)filelen,
306	(long long)fileofs); */
307
308	CHECK_ALLOCATION(filebuf = malloc(filelen));
309
310	CHECK_ALLOCATION(tmpfname = malloc(300));
311	snprintf(tmpfname, 300, "%s/gxemul.XXXXXXXXXXXX", tmpdir);
312
313	res2 = diskimage_access(m, disk_id, disk_type, 0, fileofs, filebuf,
314	filelen);
315	if (!res2) {
316	fatal("could not read the file from the disk image!\n");
317	goto ret;
318	}
319
320	tmpfile_handle = mkstemp(tmpfname);
321	if (tmpfile_handle < 0) {
322	fatal("could not create %s\n", tmpfname);
323	exit(1);
324	}
325	write(tmpfile_handle, filebuf, filelen);
326	close(tmpfile_handle);
327
328	debug("extracted %lli bytes into %s\n", (long long)filelen, tmpfname);
329
330	/* Add the temporary filename to the load_namesp array: */
331	(*n_loadp)++;
332	CHECK_ALLOCATION(new_array = malloc(sizeof(char ) (*n_loadp)));
333	memcpy(new_array, load_namesp, sizeof(char ) * (*n_loadp));
334	*load_namesp = new_array;
335
336	/* This adds a Backspace char in front of the filename; this
337	is a special hack which causes the file to be removed once
338	it has been loaded. */
339	CHECK_ALLOCATION(tmpfname = realloc(tmpfname, strlen(tmpfname) + 2));
340	memmove(tmpfname + 1, tmpfname, strlen(tmpfname) + 1);
341	tmpfname[0] = 8;
342
343	(load_namesp)[n_loadp - 1] = tmpfname;
344
345	res = 1;
346
347	ret:
348	if (dirbuf != NULL)
349	free(dirbuf);
350
351	if (filebuf != NULL)
352	free(filebuf);
353
354	if (match_entry != NULL)
355	free(match_entry);
356
357	if (tmpfname != NULL)
358	free(tmpfname);
359
360	free(filename_orig);
361
362	debug_indentation(-iadd);
363	return res;
364	}
365