coreutils/ln.c

   1 /* vi: set sw=4 ts=4: */
   2 /*
   3  * Mini ln implementation for busybox
   4  *
   5  * Copyright (C) 1999,2000 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
  34 static const char ln_usage[] =
  35         "ln [OPTION] TARGET... LINK_NAME|DIRECTORY\n\n"
  36         "Create a link named LINK_NAME or DIRECTORY to the specified TARGET\n\n"
  37         "Options:\n"
  38         "\t-s\tmake symbolic links instead of hard links\n"
  39
  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) > BUFSIZ) {
  81                 fprintf(stderr, name_too_long, "ln");
  82                 exit FALSE;
  83         }
  84
  85         linkIntoDirFlag = isDirectory(linkName, TRUE, NULL);
  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[BUFSIZ + 1];
  94                 int nChars, status;
  95
  96                 if (strlen(*argv) > BUFSIZ) {
  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 > BUFSIZ, but
 105                            I don't think that there can be one > BUFSIZ anyway. */
 106                         nChars = readlink(*argv, srcName, BUFSIZ);
 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 }
 129
 130 /*
 131 Local Variables:
 132 c-file-style: "linux"
 133 c-basic-offset: 4
 134 tab-width: 4
 135 End:
 136 */