diff options
Diffstat (limited to 'scripts/basic/split-include.c')
| -rw-r--r-- | scripts/basic/split-include.c | 226 |
1 files changed, 226 insertions, 0 deletions
diff --git a/scripts/basic/split-include.c b/scripts/basic/split-include.c new file mode 100644 index 000000000..459c45276 --- /dev/null +++ b/scripts/basic/split-include.c | |||
| @@ -0,0 +1,226 @@ | |||
| 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 | } | ||
