HTS_INLINE int rech_tageq_all(const char* adr, const char* s) {
int p;
char quot = 0;
const char *token = NULL;
int s_len = (int) strlen(s);
if (adr == NULL) {
return 0;
}
for(p = 0 ; adr[p] != 0 ; p++) {
if (quot == 0) {
if (adr[p] == '"' || adr[p] == '\'' ) {
quot = adr[p];
} else if (adr[p] == '=' || is_realspace(adr[p]) ) {
token = NULL;
} else if (adr[p] == '>') {
break;
} else { /* note: bogus for bogus foo = bar */
if (token == NULL) {
if (strncasecmp(&adr[p], s, s_len) == 0
&& (is_realspace(adr[p + s_len]) || adr[p + s_len] == '=')
) {
for( p += s_len ; is_realspace(adr[p]) || adr[p] == '=' ; p++ );
return p;
}
token = &adr[p];
}
}
} else if (adr[p] == quot) {
quot = 0;
}
}
return 0;
}
/* Note: NOT utf-8 */
int optinclude_file(const char *name, int *argc, char **argv, char *x_argvblk,
int *x_ptr) {
FILE *fp;
fp = fopen(name, "rb");
if (fp) {
char line[256];
int insert_after = 1; /* first, insert after program filename */
while(!feof(fp)) {
char *a, *b;
int result;
/* read line */
linput(fp, line, 250);
hts_lowcase(line);
if (strnotempty(line)) {
/* no comment line: # // ; */
if (strchr("#/;", line[0]) == NULL) {
/* right trim */
a = line + strlen(line) - 1;
while(is_realspace(*a))
*(a--) = '\0';
/* jump "set " and spaces */
a = line;
while(is_realspace(*a))
a++;
if (strncmp(a, "set", 3) == 0) {
if (is_realspace(*(a + 3))) {
a += 4;
}
}
while(is_realspace(*a))
a++;
/* delete = ("sockets=8") */
if ((b = strchr(a, '=')))
*b = ' ';
/* isolate option and parameter */
b = a;
while((!is_realspace(*b)) && (*b))
b++;
if (*b) {
*b = '\0';
b++;
}
/* a is now the option, b the parameter */
{
int return_argc;
char return_error[256];
char _tmp_argv[4][HTS_CDLMAXSIZE];
char *tmp_argv[4];
tmp_argv[0] = _tmp_argv[0];
tmp_argv[1] = _tmp_argv[1];
tmp_argv[2] = _tmp_argv[2];
tmp_argv[3] = _tmp_argv[3];
strcpybuff(_tmp_argv[0], "--");
strcatbuff(_tmp_argv[0], a);
strcpybuff(_tmp_argv[1], b);
result =
optalias_check(2, (const char *const *) tmp_argv, 0, &return_argc,
(tmp_argv + 2), return_error);
if (!result) {
printf("%s\n", return_error);
} else {
int insert_after_argc;
/* Insert parameters BUT so that they can be in the same order */
/* temporary argc: Number of parameters after minus insert_after_argc */
insert_after_argc = (*argc) - insert_after;
cmdl_ins((tmp_argv[2]), insert_after_argc, (argv + insert_after),
x_argvblk, (*x_ptr));
*argc = insert_after_argc + insert_after;
insert_after++;
/* Second one */
if (return_argc > 1) {
insert_after_argc = (*argc) - insert_after;
cmdl_ins((tmp_argv[3]), insert_after_argc,
(argv + insert_after), x_argvblk, (*x_ptr));
*argc = insert_after_argc + insert_after;
insert_after++;
}
/* increment to nbr of used parameters */
/* insert_after+=result; */
}
}
}
}
}
fclose(fp);
return 1;
}
return 0;
}
