X-Git-Url: https://git.librecmc.org/?a=blobdiff_plain;f=coreutils%2Fln.c;h=eb7171959cbe62b479753124fb817eda6df90309;hb=11a6f9b44f4a425b03e3a7a984e7b3e253e5f884;hp=0715bfaedab133886ccfd13b1b50f04179233d4a;hpb=9ffdaa647ee57263247e047e6c67c5a7fa1f2a6c;p=oweals%2Fbusybox.git diff --git a/coreutils/ln.c b/coreutils/ln.c index 0715bfaed..eb7171959 100644 --- a/coreutils/ln.c +++ b/coreutils/ln.c @@ -2,129 +2,108 @@ /* * Mini ln implementation for busybox * + * Copyright (C) 1999-2004 by Erik Andersen * - * Copyright (C) 1999 by Lineo, inc. - * Written by Erik Andersen , - * - * This program is free software; you can redistribute it and/or modify - * it under the terms of the GNU General Public License as published by - * the Free Software Foundation; either version 2 of the License, or - * (at your option) any later version. - * - * This program is distributed in the hope that it will be useful, - * but WITHOUT ANY WARRANTY; without even the implied warranty of - * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU - * General Public License for more details. - * - * You should have received a copy of the GNU General Public License - * along with this program; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA - * + * Licensed under GPLv2 or later, see file LICENSE in this tarball for details. */ -#include "internal.h" -#define BB_DECLARE_EXTERN -#define bb_need_name_too_long -#define bb_need_not_a_directory -#include "messages.c" +/* BB_AUDIT SUSv3 compliant */ +/* BB_AUDIT GNU options missing: -d, -F, -i, and -v. */ +/* http://www.opengroup.org/onlinepubs/007904975/utilities/ln.html */ -#include -#include -#include -#include /* for PATH_MAX */ +#include "libbb.h" -static const char ln_usage[] = - "ln [OPTION] TARGET... LINK_NAME|DIRECTORY\n\n" - "Create a link named LINK_NAME or DIRECTORY to the specified TARGET\n\n" - "Options:\n" - "\t-s\tmake symbolic links instead of hard links\n" +/* This is a NOEXEC applet. Be very careful! */ - "\t-f\tremove existing destination files\n" - "\t-n\tno dereference symlinks - treat like normal file\n"; -static int symlinkFlag = FALSE; -static int removeoldFlag = FALSE; -static int followLinks = TRUE; +#define LN_SYMLINK 1 +#define LN_FORCE 2 +#define LN_NODEREFERENCE 4 +#define LN_BACKUP 8 +#define LN_SUFFIX 16 -extern int ln_main(int argc, char **argv) +int ln_main(int argc, char **argv) MAIN_EXTERNALLY_VISIBLE; +int ln_main(int argc, char **argv) { - char *linkName; - int linkIntoDirFlag; - - if (argc < 3) { - usage(ln_usage); - } - argc--; - argv++; - - /* Parse any options */ - while (**argv == '-') { - while (*++(*argv)) - switch (**argv) { - case 's': - symlinkFlag = TRUE; - break; - case 'f': - removeoldFlag = TRUE; - break; - case 'n': - followLinks = FALSE; - break; - default: - usage(ln_usage); - } - argc--; - argv++; - } - - linkName = argv[argc - 1]; - - if (strlen(linkName) > PATH_MAX) { - fprintf(stderr, name_too_long, "ln"); - exit FALSE; + int status = EXIT_SUCCESS; + int flag; + char *last; + char *src_name; + char *src; + char *suffix = (char*)"~"; + struct stat statbuf; + int (*link_func)(const char *, const char *); + + flag = getopt32(argv, "sfnbS:", &suffix); + + if (argc == optind) { + bb_show_usage(); } - linkIntoDirFlag = isDirectory(linkName, TRUE, NULL); + last = argv[argc - 1]; + argv += optind; - if ((argc > 3) && !linkIntoDirFlag) { - fprintf(stderr, not_a_directory, "ln", linkName); - exit FALSE; + if (argc == optind + 1) { + *--argv = last; + last = bb_get_last_path_component_strip(xstrdup(last)); } - while (argc-- >= 2) { - char srcName[PATH_MAX + 1]; - int nChars, status; - - if (strlen(*argv) > PATH_MAX) { - fprintf(stderr, name_too_long, "ln"); - exit FALSE; + do { + src_name = NULL; + src = last; + + if (is_directory(src, + (flag & LN_NODEREFERENCE) ^ LN_NODEREFERENCE, + NULL) + ) { + src_name = xstrdup(*argv); + src = concat_path_file(src, bb_get_last_path_component_strip(src_name)); + free(src_name); + src_name = src; } - - if (followLinks == FALSE) { - strcpy(srcName, *argv); - } else { - /* Warning! This can silently truncate if > PATH_MAX, but - I don't think that there can be one > PATH_MAX anyway. */ - nChars = readlink(*argv, srcName, PATH_MAX); - srcName[nChars] = '\0'; + if (!(flag & LN_SYMLINK) && stat(*argv, &statbuf)) { + // coreutils: "ln dangling_symlink new_hardlink" works + if (lstat(*argv, &statbuf) || !S_ISLNK(statbuf.st_mode)) { + bb_simple_perror_msg(*argv); + status = EXIT_FAILURE; + free(src_name); + continue; + } } - if (removeoldFlag == TRUE) { - status = (unlink(linkName) && errno != ENOENT); - if (status != 0) { - perror(linkName); - exit FALSE; + if (flag & LN_BACKUP) { + char *backup; + backup = xasprintf("%s%s", src, suffix); + if (rename(src, backup) < 0 && errno != ENOENT) { + bb_simple_perror_msg(src); + status = EXIT_FAILURE; + free(backup); + continue; } + free(backup); + /* + * When the source and dest are both hard links to the same + * inode, a rename may succeed even though nothing happened. + * Therefore, always unlink(). + */ + unlink(src); + } else if (flag & LN_FORCE) { + unlink(src); } - if (symlinkFlag == TRUE) - status = symlink(*argv, linkName); - else - status = link(*argv, linkName); - if (status != 0) { - perror(linkName); - exit FALSE; + link_func = link; + if (flag & LN_SYMLINK) { + link_func = symlink; } - } - exit TRUE; + + if (link_func(*argv, src) != 0) { + bb_simple_perror_msg(src); + status = EXIT_FAILURE; + } + + free(src_name); + + } while ((++argv)[1]); + + return status; }