skalibs

Mirror/fork of https://skarnet.org/software/skalibs/
git clone https://ccx.te2000.cz/git/skalibs
Log | Files | Refs | README | LICENSE

env_get2.c (357B)

      1 /* ISC license. */
      2 
      3 #include <string.h>
      4 #include <skalibs/bytestr.h>
      5 #include <skalibs/env.h>
      6 
      7 char const *env_get2 (char const *const *envp, char const *s)
      8 {
      9   size_t len, i ;
     10   if (!s) return 0 ;
     11   len = strlen(s) ;
     12   for (i = 0 ; envp[i] ; ++i)
     13     if (str_start(envp[i], s)
     14      && (envp[i][len] == '='))
     15       return envp[i] + len + 1 ;
     16   return 0 ;
     17 }