-static int
-copyenvhelper(const char **oldenvp, const char **safeset, int nsafe,
- char **envp, int ei)
-{
- int i;
-
- for (i = 0; i < nsafe; i++) {
- const char **oe = oldenvp;
- while (*oe) {
- size_t len = strlen(safeset[i]);
- if (strncmp(*oe, safeset[i], len) == 0 &&
- (*oe)[len] == '=') {
- if (!(envp[ei++] = strdup(*oe)))
- err(1, "strdup");
- break;
- }
- oe++;
- }
- }
- return ei;
-}
-
-static char **
-copyenv(const char **oldenvp, struct rule *rule)
-{
- const char *safeset[] = {
- "DISPLAY", "HOME", "LOGNAME", "MAIL",
- "PATH", "TERM", "USER", "USERNAME",
- NULL
- };
- const char *badset[] = {
- "ENV",
- NULL
- };
- char **envp;
- const char **extra;
- int ei;
- int nsafe, nbad;
- int nextras = 0;
-
- nbad = arraylen(badset);
- if ((rule->options & KEEPENV) && !rule->envlist) {
- size_t i, ii;
- size_t oldlen = arraylen(oldenvp);
- envp = reallocarray(NULL, oldlen + 1, sizeof(char *));
- if (!envp)
- err(1, "reallocarray");
- for (ii = i = 0; i < oldlen; i++) {
- size_t j;
- for (j = 0; j < nbad; j++) {
- size_t len = strlen(badset[j]);
- if (strncmp(oldenvp[i], badset[j], len) == 0 &&
- oldenvp[i][len] == '=') {
- break;
- }
- }
- if (j == nbad) {
- if (!(envp[ii] = strdup(oldenvp[i])))
- err(1, "strdup");
- ii++;
- }
- }
- envp[ii] = NULL;
- return envp;
- }
-
- nsafe = arraylen(safeset);
- if ((extra = rule->envlist)) {
- size_t i;
- nextras = arraylen(extra);
- for (i = 0; i < nsafe; i++) {
- size_t j;
- for (j = 0; j < nextras; j++) {
- if (strcmp(extra[j], safeset[i]) == 0) {
- extra[j--] = extra[nextras--];
- extra[nextras] = NULL;
- }
- }
- }
- }
-
- envp = reallocarray(NULL, nsafe + nextras + 1, sizeof(char *));
- if (!envp)
- err(1, "can't allocate new environment");
-
- ei = 0;
- ei = copyenvhelper(oldenvp, safeset, nsafe, envp, ei);
- ei = copyenvhelper(oldenvp, rule->envlist, nextras, envp, ei);
- envp[ei] = NULL;
-
- return envp;
-}
-