coreutils/ln.c

   1 /*
   2  * Mini ln implementation for busybox
   3  *
   4  * Copyright (C) 1998 by Erik Andersen <andersee@debian.org>
   5  *
   6  * This program is free software; you can redistribute it and/or modify
   7  * it under the terms of the GNU General Public License as published by
   8  * the Free Software Foundation; either version 2 of the License, or
   9  * (at your option) any later version.
  10  *
  11  * This program is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  14  * General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU General Public License
  17  * along with this program; if not, write to the Free Software
  18  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
  19  *
  20  */
  21
  22 #include "internal.h"
  23 #include <stdio.h>
  24 #include <dirent.h>
  25 #include <errno.h>
  26
  27
  28 static const char ln_usage[] = "ln [-s] [-f] original-name additional-name\n"
  29 "\n"
  30 "\tAdd a new name that refers to the same file as \"original-name\"\n"
  31 "\n"
  32 "\t-s:\tUse a \"symbolic\" link, instead of a \"hard\" link.\n"
  33 "\t-f:\tRemove existing destination files.\n";
  34
  35
  36 static int symlinkFlag = FALSE;
  37 static int removeoldFlag = FALSE;
  38 static const char *destName;
  39
  40
  41 extern int ln_main(int argc, char **argv)
  42 {
  43     int status;
  44     char newdestName[NAME_MAX];
  45
  46     if (argc < 3) {
  47         fprintf(stderr, "Usage: %s", ln_usage);
  48         exit (FALSE);
  49     }
  50     argc--;
  51     argv++;
  52
  53     /* Parse any options */
  54     while (**argv == '-') {
  55         while (*++(*argv))
  56             switch (**argv) {
  57             case 's':
  58                 symlinkFlag = TRUE;
  59                 break;
  60             case 'f':
  61                 removeoldFlag = TRUE;
  62                 break;
  63             default:
  64                 fprintf(stderr, "Usage: %s\n", ln_usage);
  65                 exit(FALSE);
  66             }
  67         argc--;
  68         argv++;
  69     }
  70
  71
  72     destName = argv[argc - 1];
  73
  74     if ((argc > 3) && !(isDirectory(destName))) {
  75         fprintf(stderr, "%s: not a directory\n", destName);
  76         exit (FALSE);
  77     }
  78
  79     while (argc-- >= 2) {
  80         strcpy(newdestName, destName);
  81         strcat(newdestName, (*argv)+(strlen(*(++argv))));
  82
  83         if (removeoldFlag==TRUE ) {
  84             status = ( unlink(newdestName) && errno != ENOENT );
  85             if ( status != 0 ) {
  86                 perror(newdestName);
  87                 exit( FALSE);
  88             }
  89         }
  90         if ( symlinkFlag==TRUE)
  91                 status = symlink(*argv, newdestName);
  92         else
  93                 status = link(*argv, newdestName);
  94         if ( status != 0 ) {
  95             perror(newdestName);
  96             exit( FALSE);
  97         }
  98     }
  99     exit( TRUE);
 100 }