utils/sysbuilder/simpleBuilderCmd.c

/*
  File autogenerated by gengetopt version 2.11
  generated with the following command:
  /home/maul/gezelter/tim/program/gengetopt-2.11/src/gengetopt -F simpleBuilderCmd -u 

  The developers of gengetopt consider the fixed text that goes in all
  gengetopt output files to be in the public domain:
  we make no copyright claims on it.
*/


#include <stdio.h>
#include <stdlib.h>
#include <string.h>

/* If we use autoconf.  */
#ifdef HAVE_CONFIG_H
#include "config.h"
#endif

#include "getopt.h"

#include "simpleBuilderCmd.h"

void
cmdline_parser_print_version (void)
{
  printf ("%s %s\n", CMDLINE_PARSER_PACKAGE, CMDLINE_PARSER_VERSION);
}

void
cmdline_parser_print_help (void)
{
  cmdline_parser_print_version ();
  printf("\n"
  "Usage: %s [OPTIONS]... [FILES]...\n", CMDLINE_PARSER_PACKAGE);
  printf("\n");
  printf("  -h, --help                Print help and exit\n");
  printf("  -V, --version             Print version and exit\n");
  printf("  -I, --include=STRING      File name that should be included at the top of \n                              the output bass file.\n");
  printf("  -o, --output=STRING       Output file name\n");
  printf("      --latticetype=STRING  Lattice type string. Valid types are fcc,hcp,bcc \n                              and hcp-water.\n");
  printf("      --density=DOUBLE      density g/cm^3\n");
  printf("      --ndensity=DOUBLE     number density\n");
  printf("      --nx=INT              number of unit cells in x\n");
  printf("      --ny=INT              number of unit cells in y\n");
  printf("      --nz=INT              number of unit cells in z\n");
  printf("      --a1=DOUBLE           lattice spacing in Angstroms h - for cubic \n                              lattice, specify this parameter\n");
  printf("      --a2=DOUBLE           lattice spacing in Angstroms k\n");
  printf("      --a3=DOUBLE           lattice spacing in Angstroms l\n");
}


static char *gengetopt_strdup (const char *s);

/* gengetopt_strdup() */
/* strdup.c replacement of strdup, which is not standard */
char *
gengetopt_strdup (const char *s)
{
  char *result = (char*)malloc(strlen(s) + 1);
  if (result == (char*)0)
    return (char*)0;
  strcpy(result, s);
  return result;
}

int
cmdline_parser (int argc, char * const *argv, struct gengetopt_args_info *args_info)
{
  int c;        /* Character of the parsed option.  */
  int i;        /* Counter */
  struct include_list
  {
    char * include_arg;
    struct include_list * next;
  };
  struct include_list * include_list = NULL,* include_new = NULL;
  
  int missing_required_options = 0;

  args_info->help_given = 0 ;
  args_info->version_given = 0 ;
  args_info->include_given = 0 ;
  args_info->output_given = 0 ;
  args_info->latticetype_given = 0 ;
  args_info->density_given = 0 ;
  args_info->ndensity_given = 0 ;
  args_info->nx_given = 0 ;
  args_info->ny_given = 0 ;
  args_info->nz_given = 0 ;
  args_info->a1_given = 0 ;
  args_info->a2_given = 0 ;
  args_info->a3_given = 0 ;
#define clear_args() { \
  args_info->include_arg = NULL; \
  args_info->output_arg = NULL; \
  args_info->latticetype_arg = NULL; \
}

  clear_args();

  args_info->inputs = NULL;
  args_info->inputs_num = 0;

  optarg = 0;
  optind = 1;
  opterr = 1;
  optopt = '?';

  while (1)
    {
      int option_index = 0;
      char *stop_char;

      static struct option long_options[] = {
        { "help",       0, NULL, 'h' },
        { "version",    0, NULL, 'V' },
        { "include",    1, NULL, 'I' },
        { "output",     1, NULL, 'o' },
        { "latticetype",        1, NULL, 0 },
        { "density",    1, NULL, 0 },
        { "ndensity",   1, NULL, 0 },
        { "nx", 1, NULL, 0 },
        { "ny", 1, NULL, 0 },
        { "nz", 1, NULL, 0 },
        { "a1", 1, NULL, 0 },
        { "a2", 1, NULL, 0 },
        { "a3", 1, NULL, 0 },
        { NULL, 0, NULL, 0 }
      };

      stop_char = 0;
      c = getopt_long (argc, argv, "hVI:o:", long_options, &option_index);

      if (c == -1) break;       /* Exit from `while (1)' loop.  */

      switch (c)
        {
        case 'h':       /* Print help and exit.  */
          clear_args ();
          cmdline_parser_print_help ();
          exit (EXIT_SUCCESS);

        case 'V':       /* Print version and exit.  */
          clear_args ();
          cmdline_parser_print_version ();
          exit (EXIT_SUCCESS);

        case 'I':       /* File name that should be included at the top of the output bass file..  */
          args_info->include_given++;
          include_new = (struct include_list *) malloc (sizeof (struct include_list));
          include_new->next = include_list;
          include_list = include_new;
          include_new->include_arg = gengetopt_strdup (optarg);
          break;

        case 'o':       /* Output file name.  */
          if (args_info->output_given)
            {
              fprintf (stderr, "%s: `--output' (`-o') option given more than once\n", CMDLINE_PARSER_PACKAGE);
              clear_args ();
              exit (EXIT_FAILURE);
            }
          args_info->output_given = 1;
          args_info->output_arg = gengetopt_strdup (optarg);
          break;


        case 0: /* Long option with no short option */
          /* Lattice type string. Valid types are fcc,hcp,bcc and hcp-water..  */
          if (strcmp (long_options[option_index].name, "latticetype") == 0)
          {
            if (args_info->latticetype_given)
              {
                fprintf (stderr, "%s: `--latticetype' option given more than once\n", CMDLINE_PARSER_PACKAGE);
                clear_args ();
                exit (EXIT_FAILURE);
              }
            args_info->latticetype_given = 1;
            args_info->latticetype_arg = gengetopt_strdup (optarg);
            break;
          }
          
          /* density g/cm^3.  */
          else if (strcmp (long_options[option_index].name, "density") == 0)
          {
            if (args_info->density_given)
              {
                fprintf (stderr, "%s: `--density' option given more than once\n", CMDLINE_PARSER_PACKAGE);
                clear_args ();
                exit (EXIT_FAILURE);
              }
            args_info->density_given = 1;
            args_info->density_arg = strtod (optarg, NULL);
            break;
          }
          
          /* number density.  */
          else if (strcmp (long_options[option_index].name, "ndensity") == 0)
          {
            if (args_info->ndensity_given)
              {
                fprintf (stderr, "%s: `--ndensity' option given more than once\n", CMDLINE_PARSER_PACKAGE);
                clear_args ();
                exit (EXIT_FAILURE);
              }
            args_info->ndensity_given = 1;
            args_info->ndensity_arg = strtod (optarg, NULL);
            break;
          }
          
          /* number of unit cells in x.  */
          else if (strcmp (long_options[option_index].name, "nx") == 0)
          {
            if (args_info->nx_given)
              {
                fprintf (stderr, "%s: `--nx' option given more than once\n", CMDLINE_PARSER_PACKAGE);
                clear_args ();
                exit (EXIT_FAILURE);
              }
            args_info->nx_given = 1;
            args_info->nx_arg = strtol (optarg,&stop_char,0);
            break;
          }
          
          /* number of unit cells in y.  */
          else if (strcmp (long_options[option_index].name, "ny") == 0)
          {
            if (args_info->ny_given)
              {
                fprintf (stderr, "%s: `--ny' option given more than once\n", CMDLINE_PARSER_PACKAGE);
                clear_args ();
                exit (EXIT_FAILURE);
              }
            args_info->ny_given = 1;
            args_info->ny_arg = strtol (optarg,&stop_char,0);
            break;
          }
          
          /* number of unit cells in z.  */
          else if (strcmp (long_options[option_index].name, "nz") == 0)
          {
            if (args_info->nz_given)
              {
                fprintf (stderr, "%s: `--nz' option given more than once\n", CMDLINE_PARSER_PACKAGE);
                clear_args ();
                exit (EXIT_FAILURE);
              }
            args_info->nz_given = 1;
            args_info->nz_arg = strtol (optarg,&stop_char,0);
            break;
          }
          
          /* lattice spacing in Angstroms h - for cubic lattice, specify this parameter.  */
          else if (strcmp (long_options[option_index].name, "a1") == 0)
          {
            if (args_info->a1_given)
              {
                fprintf (stderr, "%s: `--a1' option given more than once\n", CMDLINE_PARSER_PACKAGE);
                clear_args ();
                exit (EXIT_FAILURE);
              }
            args_info->a1_given = 1;
            args_info->a1_arg = strtod (optarg, NULL);
            break;
          }
          
          /* lattice spacing in Angstroms k.  */
          else if (strcmp (long_options[option_index].name, "a2") == 0)
          {
            if (args_info->a2_given)
              {
                fprintf (stderr, "%s: `--a2' option given more than once\n", CMDLINE_PARSER_PACKAGE);
                clear_args ();
                exit (EXIT_FAILURE);
              }
            args_info->a2_given = 1;
            args_info->a2_arg = strtod (optarg, NULL);
            break;
          }
          
          /* lattice spacing in Angstroms l.  */
          else if (strcmp (long_options[option_index].name, "a3") == 0)
          {
            if (args_info->a3_given)
              {
                fprintf (stderr, "%s: `--a3' option given more than once\n", CMDLINE_PARSER_PACKAGE);
                clear_args ();
                exit (EXIT_FAILURE);
              }
            args_info->a3_given = 1;
            args_info->a3_arg = strtod (optarg, NULL);
            break;
          }
          

        case '?':       /* Invalid option.  */
          /* `getopt_long' already printed an error message.  */
          exit (EXIT_FAILURE);

        default:        /* bug: option not considered.  */
          fprintf (stderr, "%s: option unknown: %c\n", CMDLINE_PARSER_PACKAGE, c);
          abort ();
        } /* switch */
    } /* while */


  if (! args_info->nx_given)
    {
      fprintf (stderr, "%s: '--nx' option required\n", CMDLINE_PARSER_PACKAGE);
      missing_required_options = 1;
    }
  if (! args_info->ny_given)
    {
      fprintf (stderr, "%s: '--ny' option required\n", CMDLINE_PARSER_PACKAGE);
      missing_required_options = 1;
    }
  if (! args_info->nz_given)
    {
      fprintf (stderr, "%s: '--nz' option required\n", CMDLINE_PARSER_PACKAGE);
      missing_required_options = 1;
    }
  if (! args_info->a1_given)
    {
      fprintf (stderr, "%s: '--a1' option required\n", CMDLINE_PARSER_PACKAGE);
      missing_required_options = 1;
    }
  if ( missing_required_options )
    exit (EXIT_FAILURE);

  if (args_info->include_given)
    {
      args_info->include_arg = (char * *) malloc (args_info->include_given * sizeof (char *));
      for (i = 0; i < args_info->include_given; i++)
        {
          args_info->include_arg [i] = include_list->include_arg;
          include_list = include_list->next;
        }
    }
  
  if (optind < argc)
    {
      int i = 0 ;
  
      args_info->inputs_num = argc - optind ;
      args_info->inputs = 
        (char **)(malloc ((args_info->inputs_num)*sizeof(char *))) ;
      while (optind < argc)
        args_info->inputs[ i++ ] = gengetopt_strdup (argv[optind++]) ; 
    }
  
  return 0;
}
Revision:	1424
Committed:	Wed Jul 28 04:59:35 2004 UTC (19 years, 11 months ago) by tim
Content type:	text/plain
File size:	11538 byte(s)
Log Message:	add simpleBuilder
#	User	Rev	Content
1	tim	1424	/*
2			File autogenerated by gengetopt version 2.11
3			generated with the following command:
4			/home/maul/gezelter/tim/program/gengetopt-2.11/src/gengetopt -F simpleBuilderCmd -u
5
6			The developers of gengetopt consider the fixed text that goes in all
7			gengetopt output files to be in the public domain:
8			we make no copyright claims on it.
9			*/
10
11
12			#include <stdio.h>
13			#include <stdlib.h>
14			#include <string.h>
15
16			/* If we use autoconf. */
17			#ifdef HAVE_CONFIG_H
18			#include "config.h"
19			#endif
20
21			#include "getopt.h"
22
23			#include "simpleBuilderCmd.h"
24
25			void
26			cmdline_parser_print_version (void)
27			{
28			printf ("%s %s\n", CMDLINE_PARSER_PACKAGE, CMDLINE_PARSER_VERSION);
29			}
30
31			void
32			cmdline_parser_print_help (void)
33			{
34			cmdline_parser_print_version ();
35			printf("\n"
36			"Usage: %s [OPTIONS]... [FILES]...\n", CMDLINE_PARSER_PACKAGE);
37			printf("\n");
38			printf(" -h, --help Print help and exit\n");
39			printf(" -V, --version Print version and exit\n");
40			printf(" -I, --include=STRING File name that should be included at the top of \n the output bass file.\n");
41			printf(" -o, --output=STRING Output file name\n");
42			printf(" --latticetype=STRING Lattice type string. Valid types are fcc,hcp,bcc \n and hcp-water.\n");
43			printf(" --density=DOUBLE density g/cm^3\n");
44			printf(" --ndensity=DOUBLE number density\n");
45			printf(" --nx=INT number of unit cells in x\n");
46			printf(" --ny=INT number of unit cells in y\n");
47			printf(" --nz=INT number of unit cells in z\n");
48			printf(" --a1=DOUBLE lattice spacing in Angstroms h - for cubic \n lattice, specify this parameter\n");
49			printf(" --a2=DOUBLE lattice spacing in Angstroms k\n");
50			printf(" --a3=DOUBLE lattice spacing in Angstroms l\n");
51			}
52
53
54			static char gengetopt_strdup (const char s);
55
56			/* gengetopt_strdup() */
57			/* strdup.c replacement of strdup, which is not standard */
58			char *
59			gengetopt_strdup (const char *s)
60			{
61			char result = (char)malloc(strlen(s) + 1);
62			if (result == (char*)0)
63			return (char*)0;
64			strcpy(result, s);
65			return result;
66			}
67
68			int
69			cmdline_parser (int argc, char * const argv, struct gengetopt_args_info args_info)
70			{
71			int c; /* Character of the parsed option. */
72			int i; /* Counter */
73			struct include_list
74			{
75			char * include_arg;
76			struct include_list * next;
77			};
78			struct include_list * include_list = NULL,* include_new = NULL;
79
80			int missing_required_options = 0;
81
82			args_info->help_given = 0 ;
83			args_info->version_given = 0 ;
84			args_info->include_given = 0 ;
85			args_info->output_given = 0 ;
86			args_info->latticetype_given = 0 ;
87			args_info->density_given = 0 ;
88			args_info->ndensity_given = 0 ;
89			args_info->nx_given = 0 ;
90			args_info->ny_given = 0 ;
91			args_info->nz_given = 0 ;
92			args_info->a1_given = 0 ;
93			args_info->a2_given = 0 ;
94			args_info->a3_given = 0 ;
95			#define clear_args() { \
96			args_info->include_arg = NULL; \
97			args_info->output_arg = NULL; \
98			args_info->latticetype_arg = NULL; \
99			}
100
101			clear_args();
102
103			args_info->inputs = NULL;
104			args_info->inputs_num = 0;
105
106			optarg = 0;
107			optind = 1;
108			opterr = 1;
109			optopt = '?';
110
111			while (1)
112			{
113			int option_index = 0;
114			char *stop_char;
115
116			static struct option long_options[] = {
117			{ "help", 0, NULL, 'h' },
118			{ "version", 0, NULL, 'V' },
119			{ "include", 1, NULL, 'I' },
120			{ "output", 1, NULL, 'o' },
121			{ "latticetype", 1, NULL, 0 },
122			{ "density", 1, NULL, 0 },
123			{ "ndensity", 1, NULL, 0 },
124			{ "nx", 1, NULL, 0 },
125			{ "ny", 1, NULL, 0 },
126			{ "nz", 1, NULL, 0 },
127			{ "a1", 1, NULL, 0 },
128			{ "a2", 1, NULL, 0 },
129			{ "a3", 1, NULL, 0 },
130			{ NULL, 0, NULL, 0 }
131			};
132
133			stop_char = 0;
134			c = getopt_long (argc, argv, "hVI:o:", long_options, &option_index);
135
136			if (c == -1) break; /* Exit from `while (1)' loop. */
137
138			switch (c)
139			{
140			case 'h': /* Print help and exit. */
141			clear_args ();
142			cmdline_parser_print_help ();
143			exit (EXIT_SUCCESS);
144
145			case 'V': /* Print version and exit. */
146			clear_args ();
147			cmdline_parser_print_version ();
148			exit (EXIT_SUCCESS);
149
150			case 'I': /* File name that should be included at the top of the output bass file.. */
151			args_info->include_given++;
152			include_new = (struct include_list *) malloc (sizeof (struct include_list));
153			include_new->next = include_list;
154			include_list = include_new;
155			include_new->include_arg = gengetopt_strdup (optarg);
156			break;
157
158			case 'o': /* Output file name. */
159			if (args_info->output_given)
160			{
161			fprintf (stderr, "%s: `--output' (`-o') option given more than once\n", CMDLINE_PARSER_PACKAGE);
162			clear_args ();
163			exit (EXIT_FAILURE);
164			}
165			args_info->output_given = 1;
166			args_info->output_arg = gengetopt_strdup (optarg);
167			break;
168
169
170			case 0: /* Long option with no short option */
171			/* Lattice type string. Valid types are fcc,hcp,bcc and hcp-water.. */
172			if (strcmp (long_options[option_index].name, "latticetype") == 0)
173			{
174			if (args_info->latticetype_given)
175			{
176			fprintf (stderr, "%s: `--latticetype' option given more than once\n", CMDLINE_PARSER_PACKAGE);
177			clear_args ();
178			exit (EXIT_FAILURE);
179			}
180			args_info->latticetype_given = 1;
181			args_info->latticetype_arg = gengetopt_strdup (optarg);
182			break;
183			}
184
185			/* density g/cm^3. */
186			else if (strcmp (long_options[option_index].name, "density") == 0)
187			{
188			if (args_info->density_given)
189			{
190			fprintf (stderr, "%s: `--density' option given more than once\n", CMDLINE_PARSER_PACKAGE);
191			clear_args ();
192			exit (EXIT_FAILURE);
193			}
194			args_info->density_given = 1;
195			args_info->density_arg = strtod (optarg, NULL);
196			break;
197			}
198
199			/* number density. */
200			else if (strcmp (long_options[option_index].name, "ndensity") == 0)
201			{
202			if (args_info->ndensity_given)
203			{
204			fprintf (stderr, "%s: `--ndensity' option given more than once\n", CMDLINE_PARSER_PACKAGE);
205			clear_args ();
206			exit (EXIT_FAILURE);
207			}
208			args_info->ndensity_given = 1;
209			args_info->ndensity_arg = strtod (optarg, NULL);
210			break;
211			}
212
213			/* number of unit cells in x. */
214			else if (strcmp (long_options[option_index].name, "nx") == 0)
215			{
216			if (args_info->nx_given)
217			{
218			fprintf (stderr, "%s: `--nx' option given more than once\n", CMDLINE_PARSER_PACKAGE);
219			clear_args ();
220			exit (EXIT_FAILURE);
221			}
222			args_info->nx_given = 1;
223			args_info->nx_arg = strtol (optarg,&stop_char,0);
224			break;
225			}
226
227			/* number of unit cells in y. */
228			else if (strcmp (long_options[option_index].name, "ny") == 0)
229			{
230			if (args_info->ny_given)
231			{
232			fprintf (stderr, "%s: `--ny' option given more than once\n", CMDLINE_PARSER_PACKAGE);
233			clear_args ();
234			exit (EXIT_FAILURE);
235			}
236			args_info->ny_given = 1;
237			args_info->ny_arg = strtol (optarg,&stop_char,0);
238			break;
239			}
240
241			/* number of unit cells in z. */
242			else if (strcmp (long_options[option_index].name, "nz") == 0)
243			{
244			if (args_info->nz_given)
245			{
246			fprintf (stderr, "%s: `--nz' option given more than once\n", CMDLINE_PARSER_PACKAGE);
247			clear_args ();
248			exit (EXIT_FAILURE);
249			}
250			args_info->nz_given = 1;
251			args_info->nz_arg = strtol (optarg,&stop_char,0);
252			break;
253			}
254
255			/* lattice spacing in Angstroms h - for cubic lattice, specify this parameter. */
256			else if (strcmp (long_options[option_index].name, "a1") == 0)
257			{
258			if (args_info->a1_given)
259			{
260			fprintf (stderr, "%s: `--a1' option given more than once\n", CMDLINE_PARSER_PACKAGE);
261			clear_args ();
262			exit (EXIT_FAILURE);
263			}
264			args_info->a1_given = 1;
265			args_info->a1_arg = strtod (optarg, NULL);
266			break;
267			}
268
269			/* lattice spacing in Angstroms k. */
270			else if (strcmp (long_options[option_index].name, "a2") == 0)
271			{
272			if (args_info->a2_given)
273			{
274			fprintf (stderr, "%s: `--a2' option given more than once\n", CMDLINE_PARSER_PACKAGE);
275			clear_args ();
276			exit (EXIT_FAILURE);
277			}
278			args_info->a2_given = 1;
279			args_info->a2_arg = strtod (optarg, NULL);
280			break;
281			}
282
283			/* lattice spacing in Angstroms l. */
284			else if (strcmp (long_options[option_index].name, "a3") == 0)
285			{
286			if (args_info->a3_given)
287			{
288			fprintf (stderr, "%s: `--a3' option given more than once\n", CMDLINE_PARSER_PACKAGE);
289			clear_args ();
290			exit (EXIT_FAILURE);
291			}
292			args_info->a3_given = 1;
293			args_info->a3_arg = strtod (optarg, NULL);
294			break;
295			}
296
297
298			case '?': /* Invalid option. */
299			/* `getopt_long' already printed an error message. */
300			exit (EXIT_FAILURE);
301
302			default: /* bug: option not considered. */
303			fprintf (stderr, "%s: option unknown: %c\n", CMDLINE_PARSER_PACKAGE, c);
304			abort ();
305			} /* switch */
306			} /* while */
307
308
309			if (! args_info->nx_given)
310			{
311			fprintf (stderr, "%s: '--nx' option required\n", CMDLINE_PARSER_PACKAGE);
312			missing_required_options = 1;
313			}
314			if (! args_info->ny_given)
315			{
316			fprintf (stderr, "%s: '--ny' option required\n", CMDLINE_PARSER_PACKAGE);
317			missing_required_options = 1;
318			}
319			if (! args_info->nz_given)
320			{
321			fprintf (stderr, "%s: '--nz' option required\n", CMDLINE_PARSER_PACKAGE);
322			missing_required_options = 1;
323			}
324			if (! args_info->a1_given)
325			{
326			fprintf (stderr, "%s: '--a1' option required\n", CMDLINE_PARSER_PACKAGE);
327			missing_required_options = 1;
328			}
329			if ( missing_required_options )
330			exit (EXIT_FAILURE);
331
332			if (args_info->include_given)
333			{
334			args_info->include_arg = (char * ) malloc (args_info->include_given sizeof (char *));
335			for (i = 0; i < args_info->include_given; i++)
336			{
337			args_info->include_arg [i] = include_list->include_arg;
338			include_list = include_list->next;
339			}
340			}
341
342			if (optind < argc)
343			{
344			int i = 0 ;
345
346			args_info->inputs_num = argc - optind ;
347			args_info->inputs =
348			(char *)(malloc ((args_info->inputs_num)sizeof(char *))) ;
349			while (optind < argc)
350			args_info->inputs[ i++ ] = gengetopt_strdup (argv[optind++]) ;
351			}
352
353			return 0;
354			}