~ubuntu-branches/ubuntu/maverick/yagiuda/maverick

« back to all changes in this revision

Viewing changes to src/getopt.c

Committer: Bazaar Package Importer
Author(s): Joop Stakenborg
Date: 2005-08-22 20:20:13 UTC
Revision ID: james.westby@ubuntu.com-20050822202013-mhhxp4xirdxrdfx1

Tags: upstream-1.19

Import upstream version 1.19

files added:

AUTHORS

BUGS

COPYING

ChangeLog

INSTALL

Makefile.am

Makefile.in

NEWS

README

TODO

aclocal.m4

config.guess

config.sub

configure

configure.ac

depcomp

doc/Makefile.am

doc/Makefile.in

doc/dipole.1.html

doc/first.1.html

doc/index.html

doc/input.1.html

doc/optimise.1.html

doc/output.1.html

doc/pattern.jpg

doc/yagi.1.html

doc/yagi.jpg

install-sh

man/Makefile.am

man/Makefile.in

man/man1

man/man1/Makefile.am

man/man1/Makefile.in

man/man1/dipole.1

man/man1/first.1

man/man1/input.1

man/man1/optimise.1

man/man1/output.1

man/man1/yagi.1

man/man5

man/man5/Makefile.am

man/man5/Makefile.in

man/man5/first.5

man/man5/input.5

man/man5/optimise.5

man/man5/output.5

man/man5/yagi.5

missing

mkinstalldirs

src/3-element-yagi

src/Makefile.am

src/Makefile.in

src/auto.c

src/better.c

src/change_max_percentage_changes.c

src/check_flags.c

src/ci.c

src/cin.c

src/cis_hack.c

src/com_hack.c

src/com_hack.h

src/copy_matrix.c

src/dipole.c

src/display_antenna_currents.c

src/dobetter.c

src/dynamic.c

src/end_stop.c

src/error_message.c

src/fill_v_vector.c

src/fill_z_matrix.c

src/first.c

src/fitness.c

src/gain.c

src/gaussian.c

src/genetic.c

src/genetic_algorithm_lib.c

src/get_command_line_options.c

src/get_number_of_elements.c

src/getfiles.c

src/getopt.c

src/globals.h

src/input.c

src/install-sh

src/linear.c

src/lub_hack.c

src/lud_hack.c

src/max_gain.c

src/max_side.c

src/missing

src/mkinstalldirs

src/mpr_hack.c

src/mutual.c

src/new_length.c

src/nr_hack.h

src/nrutil.c

src/nrutil.h

src/optimise.c

src/optimising_for.c

src/output.c

src/perform.c

src/power_input.c

src/print_relavent_performance_data.c

src/print_z_matrix.c

src/random.c

src/randomise.c

src/rantest.c

src/read_header.c

src/read_yagi_data.c

src/reflection_coefficient.c

src/self.c

src/self2.c

src/selftest.c

src/sens.c

src/set_mean_structure.c

src/set_performance_structures.c

src/show_all_optimise_parameters.c

src/solve.c

src/string.c

src/subtract_structures.c

src/test2.c

src/test_stop.c

src/usage_first.c

src/usage_input.c

src/usage_optimise.c

src/usage_output.c

src/usage_yagi.c

src/version.c

src/vswr.c

src/write_coordinates.c

src/write_gain.c

src/write_gnuplot_header.c

src/write_header_to_disk.c

src/write_input_data.c

src/yagi.c

src/yagi.h

src/z_input.c

src/zbr_hack.c

Show diffs side-by-side

added added

removed removed

src/getopt.c

#ifdef HAVE_STDLIB_H

#include <stdlib.h>

#endif

* Here's something you've all been waiting for: the AT&T public domain

* source for getopt(3). It is the code which was given out at the 1985

* UNIFORUM conference in Dallas. I obtained it by electronic mail

* directly from AT&T. The people there assure me that it is indeed

* in the public domain.

* There is no manual page. That is because the one they gave out at

* UNIFORUM was slightly different from the current System V Release 2

* manual page. The difference apparently involved a note about the

* famous rules 5 and 6, recommending using white space between an option

* and its first argument, and not grouping options that have arguments.

* Getopt itself is currently lenient about both of these things White

* space is allowed, but not mandatory, and the last option in a group can

* have an argument. That particular version of the man page evidently

* has no official existence, and my source at AT&T did not send a copy.

* The current SVR2 man page reflects the actual behavor of this getopt.

* However, I am not about to post a copy of anything licensed by AT&T.

#include <stdio.h>

#include <strings.h>

#include <string.h>

/*LINTLIBRARY*/

#ifndef NULL

#define NULL 0

#endif

#define EOF (-1)

int opterr = 1;

int optind = 1;

int optopt;

char *optarg;

void ERR(char *s, char c, char **argv)

{

if(opterr)

{

char errbuf[2];

errbuf[0] = c;

errbuf[1] = '\n';

/* (void) write(2, argv[0], (unsigned)strlen(argv[0]));

(void) write(2, s, (unsigned)strlen(s));

(void) write(2, errbuf, 2); */

(void) fwrite(argv[0], (unsigned)strlen(argv[0]),1,stderr);

(void) fwrite(s, (unsigned)strlen(s),1,stderr);

(void) fwrite(errbuf, 2, 1,stderr);

}

char *index2(char *str, char c)

{

char *ret;

ret=strchr(str,c);

return(ret);

}

int getoptions(int argc, char **argv, char *opts)

{

static int sp = 1;

if(sp == 1)

if(optind >= argc ||

argv[optind][0] != '-' || argv[optind][1] == '\0')

return(EOF);

else if(strcmp(argv[optind], "--") == 0) {

optind++;

return(EOF);

}

optopt = c = argv[optind][sp];

if(c == ':' || (cp=index2(opts, c)) == NULL) {

ERR(": illegal option -- ", c,argv);

if(argv[optind][++sp] == '\0') {

optind++;

sp = 1;

}

return('?');

}

if(*++cp == ':') {

if(argv[optind][sp+1] != '\0')

optarg = &argv[optind++][sp+1];

else if(++optind >= argc) {

ERR(": option requires an argument -- ", c,argv);

sp = 1;

return('?');

} else

optarg = argv[optind++];

sp = 1;

} else {

if(argv[optind][++sp] == '\0') {

100

sp = 1;

101

optind++;

102

}

103

optarg = NULL;

104

}

105

return(c);

106

}

Older »