Mercurial > repo

comparison nasmbuild/nasm-2.13rc9/nasmlib/filename.c @ 10554:587a0a262d22

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
<moonythedwarf> ` cd nasmbuild; tar -xf nasm.tar.gz
author HackBot
date Thu, 30 Mar 2017 20:58:41 +0000
parents
children
comparison
equal deleted inserted replaced
10553:93dc2a984de0 10554:587a0a262d22
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 }