coreutils/ln.c

   1 /*
   2  * Mini ln implementation for busybox
   3  *
   4  *
   5  * Copyright (C) 1999 by Lineo, inc.
   6  * Written by Erik Andersen <andersen@lineo.com>, <andersee@debian.org>
   7  *
   8  * This program is free software; you can redistribute it and/or modify
   9  * it under the terms of the GNU General Public License as published by
  10  * the Free Software Foundation; either version 2 of the License, or
  11  * (at your option) any later version.
  12  *
  13  * This program is distributed in the hope that it will be useful,
  14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  16  * General Public License for more details.
  17  *
  18  * You should have received a copy of the GNU General Public License
  19  * along with this program; if not, write to the Free Software
  20  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
  21  *
  22  */
  23
  24 #include "internal.h"
  25 #define BB_DECLARE_EXTERN
  26 #define bb_need_name_too_long
  27 #define bb_need_not_a_directory
  28 #include "messages.c"
  29
  30 #include <stdio.h>
  31 #include <dirent.h>
  32 #include <errno.h>
  33 #include <sys/param.h>          /* for PATH_MAX */
  34
  35 static const char ln_usage[] =
  36     "ln [OPTION] TARGET... LINK_NAME|DIRECTORY\n\n"
  37     "Create a link named LINK_NAME or DIRECTORY to the specified TARGET\n\n"
  38     "Options:\n"
  39     "\t-s\tmake symbolic links instead of hard links\n"
  40     "\t-f\tremove existing destination files\n"
  41     "\t-n\tno dereference symlinks - treat like normal file\n";
  42
  43 static int symlinkFlag = FALSE;
  44 static int removeoldFlag = FALSE;
  45 static int followLinks = TRUE;
  46
  47 extern int ln_main(int argc, char **argv)
  48 {
  49     char *linkName;
  50     int linkIntoDirFlag;
  51
  52     if (argc < 3) {
  53         usage (ln_usage);
  54     }
  55     argc--;
  56     argv++;
  57
  58     /* Parse any options */
  59     while (**argv == '-') {
  60         while (*++(*argv))
  61             switch (**argv) {
  62             case 's':
  63                 symlinkFlag = TRUE;
  64                 break;
  65             case 'f':
  66                 removeoldFlag = TRUE;
  67                 break;
  68             case 'n':
  69                 followLinks = FALSE;
  70                 break;
  71             default:
  72                 usage (ln_usage);
  73             }
  74         argc--;
  75         argv++;
  76     }
  77
  78     linkName = argv[argc - 1];
  79
  80     if (strlen(linkName) > PATH_MAX) {
  81         fprintf(stderr, name_too_long, "ln");
  82         exit FALSE;
  83     }
  84
  85     linkIntoDirFlag = isDirectory(linkName, TRUE);
  86
  87     if ((argc > 3) && !linkIntoDirFlag) {
  88         fprintf(stderr, not_a_directory, "ln", linkName);
  89         exit FALSE;
  90     }
  91
  92     while (argc-- >= 2) {
  93         char srcName[PATH_MAX + 1];
  94         int nChars, status;
  95
  96         if (strlen(*argv) > PATH_MAX) {
  97             fprintf(stderr, name_too_long, "ln");
  98             exit FALSE;
  99         }
 100
 101         if (followLinks == FALSE) {
 102             strcpy(srcName, *argv);
 103         } else {
 104             /* Warning!  This can silently truncate if > PATH_MAX, but
 105             I don't think that there can be one > PATH_MAX anyway. */
 106             nChars = readlink(*argv, srcName, PATH_MAX);
 107             srcName[nChars] = '\0';
 108         }
 109
 110         if (removeoldFlag == TRUE) {
 111             status = ( unlink(linkName) && errno != ENOENT );
 112             if (status != 0) {
 113                 perror(linkName);
 114                 exit FALSE;
 115             }
 116         }
 117
 118         if (symlinkFlag == TRUE)
 119             status = symlink(*argv, linkName);
 120         else
 121             status = link(*argv, linkName);
 122         if (status != 0) {
 123             perror(linkName);
 124             exit FALSE;
 125         }
 126     }
 127     exit TRUE;
 128 }