+/* vi: set sw=4 ts=4: */
/*
* Mini ln implementation for busybox
*
- * Copyright (C) 1998 by Erik Andersen <andersee@debian.org>
+ * Copyright (C) 1999,2000 by Lineo, inc.
+ * Written by Erik Andersen <andersen@lineo.com>, <andersee@debian.org>
*
* 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
*/
#include "internal.h"
+#define BB_DECLARE_EXTERN
+#define bb_need_not_a_directory
+#include "messages.c"
+
#include <stdio.h>
#include <dirent.h>
#include <errno.h>
-
-static const char ln_usage[] = "ln [-s] [-f] original-name additional-name\n"
-"\n"
-"\tAdd a new name that refers to the same file as \"original-name\"\n"
-"\n"
-"\t-s:\tUse a \"symbolic\" link, instead of a \"hard\" link.\n"
-"\t-f:\tRemove existing destination files.\n";
-
-
static int symlinkFlag = FALSE;
static int removeoldFlag = FALSE;
-static const char *destName;
-
+static int followLinks = TRUE;
extern int ln_main(int argc, char **argv)
{
- int status;
- char newdestName[NAME_MAX];
-
- 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;
- default:
- usage (ln_usage);
- }
+ char *linkName, *dirName=NULL;
+ int linkIntoDirFlag;
+ int stopIt = FALSE;
+
argc--;
argv++;
- }
-
-
- destName = argv[argc - 1];
-
- if ((argc > 3) && !(isDirectory(destName))) {
- fprintf(stderr, "%s: not a directory\n", destName);
- exit (FALSE);
- }
-
- while (argc-- >= 2) {
- strcpy(newdestName, destName);
- strcat(newdestName, (*argv)+(strlen(*(++argv))));
-
- if (removeoldFlag==TRUE ) {
- status = ( unlink(newdestName) && errno != ENOENT );
- if ( status != 0 ) {
- perror(newdestName);
- exit( FALSE);
- }
+
+ /* Parse any options */
+ while (argc > 0 && stopIt == FALSE) {
+ if (**argv == '-') {
+ while (*++(*argv))
+ switch (**argv) {
+ case 's':
+ symlinkFlag = TRUE;
+ break;
+ case 'f':
+ removeoldFlag = TRUE;
+ break;
+ case 'n':
+ followLinks = FALSE;
+ break;
+ case '-':
+ stopIt = TRUE;
+ break;
+ default:
+ usage(ln_usage);
+ }
+ argc--;
+ argv++;
+ }
+ else
+ break;
+ }
+
+ if (argc < 2) {
+ usage(ln_usage);
}
- if ( symlinkFlag==TRUE)
- status = symlink(*argv, newdestName);
- else
- status = link(*argv, newdestName);
- if ( status != 0 ) {
- perror(newdestName);
- exit( FALSE);
+
+ linkName = argv[argc - 1];
+
+ linkIntoDirFlag = isDirectory(linkName, followLinks, NULL);
+ if ((argc >= 3) && linkIntoDirFlag == FALSE) {
+ errorMsg(not_a_directory, linkName);
+ exit FALSE;
}
- }
- exit( TRUE);
+
+ if (linkIntoDirFlag == TRUE)
+ dirName = linkName;
+
+ while (argc-- >= 2) {
+ int status;
+
+ if (linkIntoDirFlag == TRUE) {
+ char *baseName = get_last_path_component(*argv);
+ linkName = (char *)xmalloc(strlen(dirName)+strlen(baseName)+2);
+ strcpy(linkName, dirName);
+ if(dirName[strlen(dirName)-1] != '/')
+ strcat(linkName, "/");
+ strcat(linkName,baseName);
+ }
+
+ if (removeoldFlag == TRUE) {
+ status = (unlink(linkName) && errno != ENOENT);
+ if (status != 0) {
+ perror(linkName);
+ exit FALSE;
+ }
+ }
+
+ if (symlinkFlag == TRUE)
+ status = symlink(*argv, linkName);
+ else
+ status = link(*argv, linkName);
+ if (status != 0) {
+ perror(linkName);
+ exit FALSE;
+ }
+
+ if (linkIntoDirFlag == TRUE)
+ free(linkName);
+
+ argv++;
+ }
+ return( TRUE);
}
+
+/*
+Local Variables:
+c-file-style: "linux"
+c-basic-offset: 4
+tab-width: 4
+End:
+*/