git.sur5r.net Git - cc65/blob - src/common/fname.c

   1 /*****************************************************************************/
   2 /*                                                                           */
   3 /*                                  fname.c                                  */
   4 /*                                                                           */
   5 /*                       File name handling utilities                        */
   6 /*                                                                           */
   7 /*                                                                           */
   8 /*                                                                           */
   9 /* (C) 2000      Ullrich von Bassewitz                                       */
  10 /*               Wacholderweg 14                                             */
  11 /*               D-70597 Stuttgart                                           */
  12 /* EMail:        uz@musoftware.de                                            */
  13 /*                                                                           */
  14 /*                                                                           */
  15 /* This software is provided 'as-is', without any expressed or implied       */
  16 /* warranty.  In no event will the authors be held liable for any damages    */
  17 /* arising from the use of this software.                                    */
  18 /*                                                                           */
  19 /* Permission is granted to anyone to use this software for any purpose,     */
  20 /* including commercial applications, and to alter it and redistribute it    */
  21 /* freely, subject to the following restrictions:                            */
  22 /*                                                                           */
  23 /* 1. The origin of this software must not be misrepresented; you must not   */
  24 /*    claim that you wrote the original software. If you use this software   */
  25 /*    in a product, an acknowledgment in the product documentation would be  */
  26 /*    appreciated but is not required.                                       */
  27 /* 2. Altered source versions must be plainly marked as such, and must not   */
  28 /*    be misrepresented as being the original software.                      */
  29 /* 3. This notice may not be removed or altered from any source              */
  30 /*    distribution.                                                          */
  31 /*                                                                           */
  32 /*****************************************************************************/
  33
  34
  35
  36 #include <string.h>
  37
  38 #include "xmalloc.h"
  39 #include "fname.h"
  40
  41
  42
  43 /*****************************************************************************/
  44 /*                                   Code                                    */
  45 /*****************************************************************************/
  46
  47
  48
  49 const char* FindExt (const char* Name)
  50 /* Return a pointer to the file extension in Name or NULL if there is none */
  51 {
  52     const char* S;
  53
  54     /* Get the length of the name */
  55     unsigned Len = strlen (Name);
  56     if (Len < 2) {
  57         return 0;
  58     }
  59
  60     /* Get a pointer to the last character */
  61     S = Name + Len - 1;
  62
  63     /* Search for the dot, beware of subdirectories */
  64     while (S >= Name && *S != '.' && *S != '\\' && *S != '/') {
  65         --S;
  66     }
  67
  68     /* Did we find an extension? */
  69     if (*S == '.') {
  70         return S;
  71     } else {
  72         return 0;
  73     }
  74 }
  75
  76
  77
  78 char* MakeFilename (const char* Origin, const char* Ext)
  79 /* Make a new file name from Origin and Ext. If Origin has an extension, it
  80  * is removed and Ext is appended. If Origin has no extension, Ext is simply
  81  * appended. The result is placed in a malloc'ed buffer and returned.
  82  * The function may be used to create "foo.o" from "foo.s".
  83  */
  84 {
  85     char* Out;
  86     const char* P = FindExt (Origin);
  87     if (P == 0) {
  88         /* No dot, add the extension */
  89         Out = xmalloc (strlen (Origin) + strlen (Ext) + 1);
  90         strcpy (Out, Origin);
  91         strcat (Out, Ext);
  92     } else {
  93         Out = xmalloc (P - Origin + strlen (Ext) + 1);
  94         memcpy (Out, Origin, P - Origin);
  95         strcpy (Out + (P - Origin), Ext);
  96     }
  97     return Out;
  98 }
  99
 100
 101