1/* link utility for GNU. 2 Copyright (C) 2001-2002, 2004, 2007-2010 Free Software Foundation, Inc. 3 4 This program is free software: you can redistribute it and/or modify 5 it under the terms of the GNU General Public License as published by 6 the Free Software Foundation, either version 3 of the License, or 7 (at your option) any later version. 8 9 This program is distributed in the hope that it will be useful, 10 but WITHOUT ANY WARRANTY; without even the implied warranty of 11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 12 GNU General Public License for more details. 13 14 You should have received a copy of the GNU General Public License 15 along with this program. If not, see <http://www.gnu.org/licenses/>. */ 16 17/* Written by Michael Stone */ 18 19/* Implementation overview: 20 21 Simply call the system 'link' function */ 22 23#include <config.h> 24#include <stdio.h> 25#include <getopt.h> 26#include <sys/types.h> 27 28#include "system.h" 29#include "error.h" 30#include "long-options.h" 31#include "quote.h" 32 33/* The official name of this program (e.g., no `g' prefix). */ 34#define PROGRAM_NAME "link" 35 36#define AUTHORS proper_name ("Michael Stone") 37 38void 39usage (int status) 40{ 41 if (status != EXIT_SUCCESS) 42 fprintf (stderr, _("Try `%s --help' for more information.\n"), 43 program_name); 44 else 45 { 46 printf (_("\ 47Usage: %s FILE1 FILE2\n\ 48 or: %s OPTION\n"), program_name, program_name); 49 fputs (_("Call the link function to create a link named FILE2\ 50 to an existing FILE1.\n\n"), 51 stdout); 52 fputs (HELP_OPTION_DESCRIPTION, stdout); 53 fputs (VERSION_OPTION_DESCRIPTION, stdout); 54 emit_ancillary_info (); 55 } 56 exit (status); 57} 58 59int 60main (int argc, char **argv) 61{ 62 initialize_main (&argc, &argv); 63 set_program_name (argv[0]); 64 setlocale (LC_ALL, ""); 65 bindtextdomain (PACKAGE, LOCALEDIR); 66 textdomain (PACKAGE); 67 68 atexit (close_stdout); 69 70 parse_long_options (argc, argv, PROGRAM_NAME, PACKAGE_NAME, Version, 71 usage, AUTHORS, (char const *) NULL); 72 if (getopt_long (argc, argv, "", NULL, NULL) != -1) 73 usage (EXIT_FAILURE); 74 75 if (argc < optind + 2) 76 { 77 if (argc < optind + 1) 78 error (0, 0, _("missing operand")); 79 else 80 error (0, 0, _("missing operand after %s"), quote (argv[optind])); 81 usage (EXIT_FAILURE); 82 } 83 84 if (optind + 2 < argc) 85 { 86 error (0, 0, _("extra operand %s"), quote (argv[optind + 2])); 87 usage (EXIT_FAILURE); 88 } 89 90 if (link (argv[optind], argv[optind + 1]) != 0) 91 error (EXIT_FAILURE, errno, _("cannot create link %s to %s"), 92 quote_n (0, argv[optind + 1]), quote_n (1, argv[optind])); 93 94 exit (EXIT_SUCCESS); 95} 96