10554
|
1 /* ----------------------------------------------------------------------- *
|
|
2 *
|
|
3 * Copyright 1996-2016 The NASM Authors - All Rights Reserved
|
|
4 * See the file AUTHORS included with the NASM distribution for
|
|
5 * the specific copyright holders.
|
|
6 *
|
|
7 * Redistribution and use in source and binary forms, with or without
|
|
8 * modification, are permitted provided that the following
|
|
9 * conditions are met:
|
|
10 *
|
|
11 * * Redistributions of source code must retain the above copyright
|
|
12 * notice, this list of conditions and the following disclaimer.
|
|
13 * * Redistributions in binary form must reproduce the above
|
|
14 * copyright notice, this list of conditions and the following
|
|
15 * disclaimer in the documentation and/or other materials provided
|
|
16 * with the distribution.
|
|
17 *
|
|
18 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND
|
|
19 * CONTRIBUTORS "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES,
|
|
20 * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
|
|
21 * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
|
|
22 * DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR
|
|
23 * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
|
|
24 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
|
|
25 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
|
|
26 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
|
|
27 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
|
|
28 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
|
|
29 * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE,
|
|
30 * EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
|
31 *
|
|
32 * ----------------------------------------------------------------------- */
|
|
33
|
|
34 /*
|
|
35 * nasmlib.c library routines for the Netwide Assembler
|
|
36 */
|
|
37
|
|
38 #include "compiler.h"
|
|
39 #include "nasmlib.h"
|
|
40 #include "error.h"
|
|
41
|
|
42 void standard_extension(char *inname, char *outname, char *extension)
|
|
43 {
|
|
44 char *p, *q;
|
|
45
|
|
46 if (*outname) /* file name already exists, */
|
|
47 return; /* so do nothing */
|
|
48 q = inname;
|
|
49 p = outname;
|
|
50 while (*q)
|
|
51 *p++ = *q++; /* copy, and find end of string */
|
|
52 *p = '\0'; /* terminate it */
|
|
53 while (p > outname && *--p != '.') ; /* find final period (or whatever) */
|
|
54 if (*p != '.')
|
|
55 while (*p)
|
|
56 p++; /* go back to end if none found */
|
|
57 if (!strcmp(p, extension)) { /* is the extension already there? */
|
|
58 if (*extension)
|
|
59 nasm_error(ERR_WARNING | ERR_NOFILE,
|
|
60 "file name already ends in `%s': "
|
|
61 "output will be in `nasm.out'", extension);
|
|
62 else
|
|
63 nasm_error(ERR_WARNING | ERR_NOFILE,
|
|
64 "file name already has no extension: "
|
|
65 "output will be in `nasm.out'");
|
|
66 strcpy(outname, "nasm.out");
|
|
67 } else
|
|
68 strcpy(p, extension);
|
|
69 }
|