NetBSD/gnu/dist/tar/tests/genfile.c
2002-10-09 10:09:12 +00:00

177 lines
4.3 KiB
C
Raw Blame History

This file contains invisible Unicode characters

This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

/* Generate a file containing some preset patterns.
Copyright (C) 1995, 1996, 1997, 2001 Free Software Foundation, Inc.
François Pinard <pinard@iro.umontreal.ca>, 1995.
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, 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.
*/
#include "system.h"
#include <argmatch.h>
#include <getopt.h>
#include <print-copyr.h>
#ifndef EXIT_SUCCESS
# define EXIT_SUCCESS 0
#endif
#ifndef EXIT_FAILURE
# define EXIT_FAILURE 1
#endif
enum pattern
{
DEFAULT,
ZEROS
};
/* The name this program was run with. */
const char *program_name;
/* If nonzero, display usage information and exit. */
static int show_help = 0;
/* If nonzero, print the version on standard output and exit. */
static int show_version = 0;
/* Length of file to generate. */
static int file_length = 0;
/* Pattern to generate. */
static enum pattern pattern = DEFAULT;
/* Explain how to use the program, then get out. */
void
usage (int status)
{
if (status != EXIT_SUCCESS)
fprintf (stderr, _("Try `%s --help' for more information.\n"),
program_name);
else
{
printf (_("Generate data files for GNU tar test suite.\n"));
printf (_("\
\n\
Usage: %s [OPTION]...\n"), program_name);
fputs (_("\
If a long option shows an argument as mandatory, then it is mandatory\n\
for the equivalent short option also.\n\
\n\
-l, --file-length=LENGTH LENGTH of generated file\n\
-p, --pattern=PATTERN PATTERN is `default' or `zeros'\n\
--help display this help and exit\n\
--version output version information and exit\n"),
stdout);
}
exit (status);
}
/* Main program. Decode ARGC arguments passed through the ARGV array
of strings, then launch execution. */
/* Long options equivalences. */
static const struct option long_options[] =
{
{"help", no_argument, &show_help, 1},
{"length", required_argument, NULL, 'l'},
{"pattern", required_argument, NULL, 'p'},
{"version", no_argument, &show_version, 1},
{0, 0, 0, 0},
};
static char const * const pattern_args[] = { "default", "zeros", 0 };
static enum pattern const pattern_types[] = { DEFAULT, ZEROS };
int
main (int argc, char *const *argv)
{
int option_char; /* option character */
int counter; /* general purpose counter */
/* Decode command options. */
program_name = argv[0];
setlocale (LC_ALL, "");
while (option_char = getopt_long (argc, argv, "l:p:", long_options, NULL),
option_char != EOF)
switch (option_char)
{
default:
usage (EXIT_FAILURE);
case '\0':
break;
case 'l':
file_length = atoi (optarg);
break;
case 'p':
pattern = XARGMATCH ("--pattern", optarg,
pattern_args, pattern_types);
break;
}
/* Process trivial options. */
if (show_version)
{
printf ("genfile (GNU %s) %s\n", PACKAGE, VERSION);
print_copyright ("2001 Free Software Foundation, Inc.");
puts (_("\
This program comes with NO WARRANTY, to the extent permitted by law.\n\
You may redistribute it under the terms of the GNU General Public License;\n\
see the file named COPYING for details."));
/* Note to translator: Please translate "F. Pinard" to "François
Pinard" if "ç" (c-with-cedilla) is available in the
translation's character set and encoding. */
puts (_("Written by F. Pinard."));
exit (EXIT_SUCCESS);
}
if (show_help)
usage (EXIT_SUCCESS);
if (optind < argc)
usage (EXIT_FAILURE);
/* Generate file. */
switch (pattern)
{
case DEFAULT:
for (counter = 0; counter < file_length; counter++)
putchar (counter & 255);
break;
case ZEROS:
for (counter = 0; counter < file_length; counter++)
putchar (0);
break;
}
exit (0);
}
/*
Local Variables:
coding: iso-latin-1
End:
*/