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