1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
|
/* This file is part of "reprepro"
* Copyright (C) 2005,2006 Bernhard R. Link
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License version 2 as
* published by the Free Software Foundation.
*
* 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., 51 Franklin St, Fifth Floor, Boston, MA 02111-1301 USA
*/
#include <config.h>
#include <errno.h>
#include <assert.h>
#include <stdio.h>
#include <stdlib.h>
#include <ctype.h>
#include <string.h>
#include "error.h"
#include "names.h"
#include "optionsfile.h"
void optionsfile_parse(const char *directory, const struct option *longopts, void handle_option(int,const char *)) {
FILE *f;
char *filename;
char buffer[1000];
int linenr = 0;
const struct option *option;
filename = calc_dirconcat(directory, "options");
if( FAILEDTOALLOC(filename) ) {
(void)fputs("Out of memory!\n", stderr);
exit(EXIT_FAILURE);
}
f = fopen(filename,"r");
if( f == NULL ) {
free(filename);
return;
}
while( fgets(buffer,999,f) != NULL ) {
size_t l;
char *optionname,*argument;
linenr++;
l = strlen(buffer);
if( l == 0 || buffer[l-1] != '\n' ) {
fprintf(stderr,"%s:%d: Ignoring too long (or incomplete) line.\n",filename,linenr);
do {
if( fgets(buffer,999,f) == NULL )
break;
l = strlen(buffer);
} while( l > 0 && buffer[l-1] != '\n' );
continue;
}
do{
buffer[l-1] = '\0';
l--;
} while( l > 0 && xisspace(buffer[l-1]));
if( l == 0 )
continue;
optionname = buffer;
while( *optionname != '\0' && xisspace(*optionname) )
optionname++;
assert( *optionname != '\0' );
if( *optionname == '#' || *optionname == ';' )
continue;
argument = optionname;
while( *argument != '\0' && !xisspace(*argument) )
argument++;
while( *argument != '\0' && xisspace(*argument) ) {
*argument = '\0';
argument++;
}
if( *argument == '\0' )
argument = NULL;
option = longopts;
while( option->name != NULL && strcmp(option->name,optionname) != 0 )
option++;
if( option->name == NULL ) {
fprintf(stderr,"%s:%d: unknown option '%s'!\n",
filename,linenr,optionname);
exit(EXIT_FAILURE);
}
if( option->has_arg==no_argument && argument != NULL ) {
fprintf(stderr,"%s:%d: option '%s' has an unexpected argument '%s'!\n",
filename,linenr,optionname,argument);
exit(EXIT_FAILURE);
}
if( option->has_arg==required_argument && argument == NULL ) {
fprintf(stderr,"%s:%d: option '%s' is missing an argument!\n",
filename,linenr,optionname);
exit(EXIT_FAILURE);
}
if( option->flag == NULL )
handle_option(option->val,argument);
else {
*option->flag = option->val;
handle_option(0,argument);
}
}
if( ferror(f) != 0 ) {
int e = ferror(f);
fprintf(stderr,"%s: error while reading config file: %d=%s\n",
filename, e, strerror(e));
exit(EXIT_FAILURE);
}
if( fclose(f) != 0 ) {
int e = errno;
fprintf(stderr,"%s: error while reading config file: %d=%s\n",
filename, e, strerror(e));
exit(EXIT_FAILURE);
}
free(filename);
}
|
