ln.c

   1 /* vi: set sw=4 ts=4: */
   2 /*
   3  * Mini ln implementation for busybox
   4  *
   5  * Copyright (C) 1999,2000,2001 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 "busybox.h"
  25 #define BB_DECLARE_EXTERN
  26 #define bb_need_not_a_directory
  27 #include "messages.c"
  28
  29 #include <stdio.h>
  30 #include <dirent.h>
  31 #include <string.h>
  32 #include <stdlib.h>
  33 #include <errno.h>
  34 #include <unistd.h>
  35
  36 static const int LN_SYMLINK = 1;
  37 static const int LN_FORCE = 2;
  38 static const int LN_NODEREFERENCE = 4;
  39
  40 /*
  41  * linkDestName is where the link points to,
  42  * linkSrcName is the name of the link to be created.
  43  */
  44 static int fs_link(const char *link_DestName, const char *link_SrcName, const int flag)
  45 {
  46         int status;
  47         int srcIsDir;
  48         char *srcName;
  49
  50         if (link_DestName==NULL)
  51                 return(FALSE);
  52
  53         srcName = (char *) malloc(strlen(link_SrcName)+strlen(link_DestName)+1);
  54
  55         if (link_SrcName==NULL)
  56                 strcpy(srcName, link_DestName);
  57         else
  58                 strcpy(srcName, link_SrcName);
  59
  60         if (flag&LN_NODEREFERENCE)
  61                 srcIsDir = is_directory(srcName, TRUE, NULL);
  62         else
  63                 srcIsDir = is_directory(srcName, FALSE, NULL);
  64
  65         if ((srcIsDir==TRUE)&&((flag&LN_NODEREFERENCE)==0)) {
  66                 strcat(srcName, "/");
  67                 strcat(srcName, link_DestName);
  68         }
  69
  70         if (flag&LN_FORCE)
  71                 unlink(srcName);
  72
  73         if (flag&LN_SYMLINK)
  74                 status = symlink(link_DestName, srcName);
  75         else
  76                 status = link(link_DestName, srcName);
  77
  78         if (status != 0) {
  79                 perror(srcName);
  80                 return(FALSE);
  81         }
  82         return(TRUE);
  83 }
  84
  85 extern int ln_main(int argc, char **argv)
  86 {
  87         int status = EXIT_SUCCESS;
  88         int flag = 0;
  89         int opt;
  90
  91         /* Parse any options */
  92         while ((opt=getopt(argc, argv, "sfn")) != -1) {
  93                 switch(opt) {
  94                         case 's':
  95                                 flag |= LN_SYMLINK;
  96                                 break;
  97                         case 'f':
  98                                 flag |= LN_FORCE;
  99                                 break;
 100                         case 'n':
 101                                 flag |= LN_NODEREFERENCE;
 102                                 break;
 103                         default:
 104                                 show_usage();
 105                 }
 106         }
 107         while(optind<(argc-1)) {
 108                 if (fs_link(argv[optind], argv[argc-1], flag)==FALSE)
 109                         status = EXIT_FAILURE;
 110                 optind++;
 111         }
 112         return(status);
 113 }
 114
 115 /*
 116 Local Variables:
 117 c-file-style: "linux"
 118 c-basic-offset: 4
 119 tab-width: 4
 120 End:
 121 */