Contents of /trunk/mkinitrd-magellan/busybox/scripts/basic/split-include.c
Parent Directory | Revision Log
Revision 532 -
(show annotations)
(download)
Sat Sep 1 22:45:15 2007 UTC (16 years, 9 months ago) by niro
File MIME type: text/plain
File size: 5593 byte(s)
Sat Sep 1 22:45:15 2007 UTC (16 years, 9 months ago) by niro
File MIME type: text/plain
File size: 5593 byte(s)
-import if magellan mkinitrd; it is a fork of redhats mkinitrd-5.0.8 with all magellan patches and features; deprecates magellan-src/mkinitrd
1 | /* |
2 | * split-include.c |
3 | * |
4 | * Copyright abandoned, Michael Chastain, <mailto:mec@shout.net>. |
5 | * This is a C version of syncdep.pl by Werner Almesberger. |
6 | * |
7 | * This program takes autoconf.h as input and outputs a directory full |
8 | * of one-line include files, merging onto the old values. |
9 | * |
10 | * Think of the configuration options as key-value pairs. Then there |
11 | * are five cases: |
12 | * |
13 | * key old value new value action |
14 | * |
15 | * KEY-1 VALUE-1 VALUE-1 leave file alone |
16 | * KEY-2 VALUE-2A VALUE-2B write VALUE-2B into file |
17 | * KEY-3 - VALUE-3 write VALUE-3 into file |
18 | * KEY-4 VALUE-4 - write an empty file |
19 | * KEY-5 (empty) - leave old empty file alone |
20 | */ |
21 | |
22 | #include <sys/stat.h> |
23 | #include <sys/types.h> |
24 | |
25 | #include <ctype.h> |
26 | #include <errno.h> |
27 | #include <fcntl.h> |
28 | #include <stdio.h> |
29 | #include <stdlib.h> |
30 | #include <string.h> |
31 | #include <unistd.h> |
32 | |
33 | #define ERROR_EXIT(strExit) \ |
34 | { \ |
35 | const int errnoSave = errno; \ |
36 | fprintf(stderr, "%s: ", str_my_name); \ |
37 | errno = errnoSave; \ |
38 | perror((strExit)); \ |
39 | exit(1); \ |
40 | } |
41 | |
42 | |
43 | |
44 | int main(int argc, const char * argv []) |
45 | { |
46 | const char * str_my_name; |
47 | const char * str_file_autoconf; |
48 | const char * str_dir_config; |
49 | |
50 | FILE * fp_config; |
51 | FILE * fp_target; |
52 | FILE * fp_find; |
53 | |
54 | int buffer_size; |
55 | |
56 | char * line; |
57 | char * old_line; |
58 | char * list_target; |
59 | char * ptarget; |
60 | |
61 | struct stat stat_buf; |
62 | |
63 | /* Check arg count. */ |
64 | if (argc != 3) |
65 | { |
66 | fprintf(stderr, "%s: wrong number of arguments.\n", argv[0]); |
67 | exit(1); |
68 | } |
69 | |
70 | str_my_name = argv[0]; |
71 | str_file_autoconf = argv[1]; |
72 | str_dir_config = argv[2]; |
73 | |
74 | /* Find a buffer size. */ |
75 | if (stat(str_file_autoconf, &stat_buf) != 0) |
76 | ERROR_EXIT(str_file_autoconf); |
77 | buffer_size = 2 * stat_buf.st_size + 4096; |
78 | |
79 | /* Allocate buffers. */ |
80 | if ( (line = malloc(buffer_size)) == NULL |
81 | || (old_line = malloc(buffer_size)) == NULL |
82 | || (list_target = malloc(buffer_size)) == NULL ) |
83 | ERROR_EXIT(str_file_autoconf); |
84 | |
85 | /* Open autoconfig file. */ |
86 | if ((fp_config = fopen(str_file_autoconf, "r")) == NULL) |
87 | ERROR_EXIT(str_file_autoconf); |
88 | |
89 | /* Make output directory if needed. */ |
90 | if (stat(str_dir_config, &stat_buf) != 0) |
91 | { |
92 | if (mkdir(str_dir_config, 0755) != 0) |
93 | ERROR_EXIT(str_dir_config); |
94 | } |
95 | |
96 | /* Change to output directory. */ |
97 | if (chdir(str_dir_config) != 0) |
98 | ERROR_EXIT(str_dir_config); |
99 | |
100 | /* Put initial separator into target list. */ |
101 | ptarget = list_target; |
102 | *ptarget++ = '\n'; |
103 | |
104 | /* Read config lines. */ |
105 | while (fgets(line, buffer_size, fp_config)) |
106 | { |
107 | const char * str_config; |
108 | int is_same; |
109 | int itarget; |
110 | |
111 | if (line[0] != '#') |
112 | continue; |
113 | if ((str_config = strstr(line, "CONFIG_")) == NULL) |
114 | continue; |
115 | |
116 | /* Make the output file name. */ |
117 | str_config += sizeof("CONFIG_") - 1; |
118 | for (itarget = 0; !isspace(str_config[itarget]); itarget++) |
119 | { |
120 | int c = (unsigned char) str_config[itarget]; |
121 | if (isupper(c)) c = tolower(c); |
122 | if (c == '_') c = '/'; |
123 | ptarget[itarget] = c; |
124 | } |
125 | ptarget[itarget++] = '.'; |
126 | ptarget[itarget++] = 'h'; |
127 | ptarget[itarget++] = '\0'; |
128 | |
129 | /* Check for existing file. */ |
130 | is_same = 0; |
131 | if ((fp_target = fopen(ptarget, "r")) != NULL) |
132 | { |
133 | fgets(old_line, buffer_size, fp_target); |
134 | if (fclose(fp_target) != 0) |
135 | ERROR_EXIT(ptarget); |
136 | if (!strcmp(line, old_line)) |
137 | is_same = 1; |
138 | } |
139 | |
140 | if (!is_same) |
141 | { |
142 | /* Auto-create directories. */ |
143 | int islash; |
144 | for (islash = 0; islash < itarget; islash++) |
145 | { |
146 | if (ptarget[islash] == '/') |
147 | { |
148 | ptarget[islash] = '\0'; |
149 | if (stat(ptarget, &stat_buf) != 0 |
150 | && mkdir(ptarget, 0755) != 0) |
151 | ERROR_EXIT( ptarget ); |
152 | ptarget[islash] = '/'; |
153 | } |
154 | } |
155 | |
156 | /* Write the file. */ |
157 | if ((fp_target = fopen(ptarget, "w" )) == NULL) |
158 | ERROR_EXIT(ptarget); |
159 | fputs(line, fp_target); |
160 | if (ferror(fp_target) || fclose(fp_target) != 0) |
161 | ERROR_EXIT(ptarget); |
162 | } |
163 | |
164 | /* Update target list */ |
165 | ptarget += itarget; |
166 | *(ptarget-1) = '\n'; |
167 | } |
168 | |
169 | /* |
170 | * Close autoconfig file. |
171 | * Terminate the target list. |
172 | */ |
173 | if (fclose(fp_config) != 0) |
174 | ERROR_EXIT(str_file_autoconf); |
175 | *ptarget = '\0'; |
176 | |
177 | /* |
178 | * Fix up existing files which have no new value. |
179 | * This is Case 4 and Case 5. |
180 | * |
181 | * I re-read the tree and filter it against list_target. |
182 | * This is crude. But it avoids data copies. Also, list_target |
183 | * is compact and contiguous, so it easily fits into cache. |
184 | * |
185 | * Notice that list_target contains strings separated by \n, |
186 | * with a \n before the first string and after the last. |
187 | * fgets gives the incoming names a terminating \n. |
188 | * So by having an initial \n, strstr will find exact matches. |
189 | */ |
190 | |
191 | fp_find = popen("find * -type f -name \"*.h\" -print", "r"); |
192 | if (fp_find == 0) |
193 | ERROR_EXIT( "find" ); |
194 | |
195 | line[0] = '\n'; |
196 | while (fgets(line+1, buffer_size, fp_find)) |
197 | { |
198 | if (strstr(list_target, line) == NULL) |
199 | { |
200 | /* |
201 | * This is an old file with no CONFIG_* flag in autoconf.h. |
202 | */ |
203 | |
204 | /* First strip the \n. */ |
205 | line[strlen(line)-1] = '\0'; |
206 | |
207 | /* Grab size. */ |
208 | if (stat(line+1, &stat_buf) != 0) |
209 | ERROR_EXIT(line); |
210 | |
211 | /* If file is not empty, make it empty and give it a fresh date. */ |
212 | if (stat_buf.st_size != 0) |
213 | { |
214 | if ((fp_target = fopen(line+1, "w")) == NULL) |
215 | ERROR_EXIT(line); |
216 | if (fclose(fp_target) != 0) |
217 | ERROR_EXIT(line); |
218 | } |
219 | } |
220 | } |
221 | |
222 | if (pclose(fp_find) != 0) |
223 | ERROR_EXIT("find"); |
224 | |
225 | return 0; |
226 | } |