OpenCores
URL https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [newlib-1.17.0/] [newlib/] [libc/] [argz/] [envz_get.c] - Blame information for rev 297

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 148 jeremybenn
/* Copyright (C) 2002 by  Red Hat, Incorporated. All rights reserved.
2
 *
3
 * Permission to use, copy, modify, and distribute this software
4
 * is freely granted, provided that this notice is preserved.
5
 */
6
 
7
#include <errno.h>
8
#include <sys/types.h>
9
#include <string.h>
10
#include <stdlib.h>
11
#include <envz.h>
12
 
13
#include "buf_findstr.h"
14
 
15
char *
16
_DEFUN (envz_get, (envz, envz_len, name),
17
       const char *envz _AND
18
       size_t envz_len _AND
19
       const char *name)
20
{
21
  char *buf_ptr = (char *)envz;
22
  size_t buf_len = envz_len;
23
 
24
  while(buf_len)
25
    {
26
      if (_buf_findstr(name, &buf_ptr, &buf_len))
27
        {
28
          if (*buf_ptr == '=')
29
            {
30
              buf_ptr++;
31
              return (char *)buf_ptr;
32
            }
33
          else
34
            {
35
              if (*buf_ptr == '\0')
36
                /* NULL entry. */
37
                return NULL;
38
            }
39
        }
40
    }
41
  /* No matching entries found. */
42
  return NULL;
43
}

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.