none/tests/solaris/proc_auxv.c

   1 /* Test if /proc/{self,$PID}/auxv is correctly simulated and that the aux
   2    vector contains plausible values. */
   3
   4 #include <errno.h>
   5 #include <stdio.h>
   6 #include <string.h>
   7 #include <unistd.h>
   8 #include <sys/auxv.h>
   9 #include <sys/fcntl.h>
  10
  11 static int check_file(const char *path, auxv_t *auxv)
  12 {
  13    auxv_t rauxv;
  14    int res = 1;
  15    FILE *fi;
  16
  17    if (!(fi = fopen(path, "r"))) {
  18       perror("fopen");
  19       return 1;
  20    }
  21    while (1) {
  22       if (fread(&rauxv, sizeof(rauxv), 1, fi) != 1) {
  23          if (ferror(fi)) {
  24             perror("fread");
  25             goto out;
  26          }
  27          fprintf(stderr, "unexpected EOF\n");
  28          goto out;
  29       }
  30       if (memcmp(auxv, &rauxv, sizeof(rauxv))) {
  31          fprintf(stderr, "incorrect auxv in %s\n", path);
  32          fprintf(stderr, "expected: type=%d, val=%ld\n", auxv->a_type,
  33                  auxv->a_un.a_val);
  34          fprintf(stderr, "got: type=%d, val=%ld\n", rauxv.a_type,
  35                  rauxv.a_un.a_val);
  36          goto out;
  37       }
  38
  39       if (auxv->a_type == AT_NULL)
  40          break;
  41
  42       auxv++;
  43    }
  44
  45    res = 0;
  46
  47 out:
  48    fclose(fi);
  49    return res;
  50 }
  51
  52 int main(int argc, char *argv[], char *envp[])
  53 {
  54    auxv_t *auxv;
  55    char buf[128];
  56
  57    /* Find aux vector. */
  58    while (*envp)
  59       envp++;
  60    auxv = (auxv_t*)(envp + 1);
  61
  62    /* /proc/self/auxv check */
  63    if (check_file("/proc/self/auxv", auxv))
  64       return 1;
  65
  66    /* /proc/$PID/auxv check */
  67    snprintf(buf, sizeof(buf), "/proc/%ld/auxv", (long)getpid());
  68    if (check_file(buf, auxv))
  69       return 1;
  70
  71    /* AT_SUN_EXECNAME check */
  72    while (auxv->a_type != AT_NULL) {
  73       if (auxv->a_type == AT_SUN_EXECNAME) {
  74          const char *execname = auxv->a_un.a_ptr;
  75          if (!execname) {
  76             fprintf(stderr, "AT_SUN_EXECNAME is null\n");
  77             return 1;
  78          }
  79          if (access(execname, R_OK | X_OK)) {
  80             fprintf(stderr, "AT_SUN_EXECNAME (%s) is invalid: %s\n",
  81                     execname, strerror(errno));
  82             return 1;
  83          }
  84          break;
  85       }
  86       auxv++;
  87    }
  88
  89    return 0;
  90 }
  91