More stuff.
[oweals/busybox.git] / ln.c
1 /*
2  * Mini ln implementation for busybox
3  *
4  * Copyright (C) 1998 by Erik Andersen <andersee@debian.org>
5  *
6  * This program is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License as published by
8  * the Free Software Foundation; either version 2 of the License, or
9  * (at your option) any later version.
10  *
11  * This program is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14  * General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public License
17  * along with this program; if not, write to the Free Software
18  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
19  *
20  */
21
22 #include "internal.h"
23 #include <stdio.h>
24 #include <dirent.h>
25 #include <errno.h>
26
27
28 static const char ln_usage[] = "ln [-s] [-f] original-name additional-name\n"
29 "\n"
30 "\tAdd a new name that refers to the same file as \"original-name\"\n"
31 "\n"
32 "\t-s:\tUse a \"symbolic\" link, instead of a \"hard\" link.\n"
33 "\t-f:\tRemove existing destination files.\n";
34
35
36 static int symlinkFlag = FALSE;
37 static int removeoldFlag = FALSE;
38 static const char *destName;
39
40
41 extern int ln_main(int argc, char **argv)
42 {
43     int status;
44     char newdestName[NAME_MAX];
45
46     if (argc < 3) {
47         usage (ln_usage);
48     }
49     argc--;
50     argv++;
51
52     /* Parse any options */
53     while (**argv == '-') {
54         while (*++(*argv))
55             switch (**argv) {
56             case 's':
57                 symlinkFlag = TRUE;
58                 break;
59             case 'f':
60                 removeoldFlag = TRUE;
61                 break;
62             default:
63                 usage (ln_usage);
64             }
65         argc--;
66         argv++;
67     }
68
69
70     destName = argv[argc - 1];
71
72     if ((argc > 3) && !(isDirectory(destName))) {
73         fprintf(stderr, "%s: not a directory\n", destName);
74         exit (FALSE);
75     }
76
77     while (argc-- >= 2) {
78         strcpy(newdestName, destName);
79         strcat(newdestName, (*argv)+(strlen(*(++argv))));
80         
81         if (removeoldFlag==TRUE ) {
82             status = ( unlink(newdestName) && errno != ENOENT );
83             if ( status != 0 ) {
84                 perror(newdestName);
85                 exit( FALSE);
86             }
87         }
88         if ( symlinkFlag==TRUE)
89                 status = symlink(*argv, newdestName);
90         else
91                 status = link(*argv, newdestName);
92         if ( status != 0 ) {
93             perror(newdestName);
94             exit( FALSE);
95         }
96     }
97     exit( TRUE);
98 }