9f7774380be7d0d053b2a28034b41b3f59cee2c4
[oweals/busybox.git] / 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_not_a_directory
27 #include "messages.c"
28
29 #include <stdio.h>
30 #include <dirent.h>
31 #include <errno.h>
32
33 static const char ln_usage[] =
34         "ln [OPTION] TARGET... LINK_NAME|DIRECTORY\n"
35 #ifndef BB_FEATURE_TRIVIAL_HELP
36         "\nCreate a link named LINK_NAME or DIRECTORY to the specified TARGET\n"
37         "\nYou may use '--' to indicate that all following arguments are non-options.\n\n"
38         "Options:\n"
39         "\t-s\tmake symbolic links instead of hard links\n"
40
41         "\t-f\tremove existing destination files\n"
42         "\t-n\tno dereference symlinks - treat like normal file\n"
43 #endif
44         ;
45
46 static int symlinkFlag = FALSE;
47 static int removeoldFlag = FALSE;
48 static int followLinks = TRUE;
49
50 extern int ln_main(int argc, char **argv)
51 {
52         char *linkName, *dirName=NULL;
53         int linkIntoDirFlag;
54         int stopIt = FALSE;
55
56         argc--;
57         argv++;
58
59         /* Parse any options */
60         while (argc > 0 && stopIt == FALSE) {
61                 if (**argv == '-') {
62                         while (*++(*argv))
63                                 switch (**argv) {
64                                         case 's':
65                                                 symlinkFlag = TRUE;
66                                                 break;
67                                         case 'f':
68                                                 removeoldFlag = TRUE;
69                                                 break;
70                                         case 'n':
71                                                 followLinks = FALSE;
72                                                 break;
73                                         case '-':
74                                                 stopIt = TRUE;
75                                                 break;
76                                         default:
77                                                 usage(ln_usage);
78                                 }
79                         argc--;
80                         argv++;
81                 }
82                 else
83                         break;
84         }
85
86         if (argc < 2) {
87                 usage(ln_usage);
88         }
89
90         linkName = argv[argc - 1];
91
92         linkIntoDirFlag = isDirectory(linkName, followLinks, NULL);
93         if ((argc >= 3) && linkIntoDirFlag == FALSE) {
94                 errorMsg(not_a_directory, linkName);
95                 exit FALSE;
96         }
97
98         if (linkIntoDirFlag == TRUE)
99                 dirName = linkName;
100
101         while (argc-- >= 2) {
102                 int status;
103
104                 if (linkIntoDirFlag == TRUE) {
105                         char *baseName = get_last_path_component(*argv);
106                         linkName = (char *)malloc(strlen(dirName)+strlen(baseName)+2);
107                         strcpy(linkName, dirName);
108                         if(dirName[strlen(dirName)-1] != '/')
109                                 strcat(linkName, "/");
110                         strcat(linkName,baseName);
111                 }
112
113                 if (removeoldFlag == TRUE) {
114                         status = (unlink(linkName) && errno != ENOENT);
115                         if (status != 0) {
116                                 perror(linkName);
117                                 exit FALSE;
118                         }
119                 }
120
121                 if (symlinkFlag == TRUE)
122                         status = symlink(*argv, linkName);
123                 else
124                         status = link(*argv, linkName);
125                 if (status != 0) {
126                         perror(linkName);
127                         exit FALSE;
128                 }
129
130                 if (linkIntoDirFlag == TRUE)
131                         free(linkName);
132
133                 argv++;
134         }
135         return( TRUE);
136 }
137
138 /*
139 Local Variables:
140 c-file-style: "linux"
141 c-basic-offset: 4
142 tab-width: 4
143 End:
144 */