URL
https://opencores.org/ocsvn/or1k/or1k/trunk
Subversion Repositories or1k
[/] [or1k/] [trunk/] [uclinux/] [uC-libc/] [misc/] [putenv.c] - Rev 199
Go to most recent revision | Compare with Previous | Blame | View Log
/* Copyright (C) 1995,1996 Robert de Bath <rdebath@cix.compulink.co.uk> * This file is part of the Linux-8086 C library and is distributed * under the GNU Library General Public License. */ #include <string.h> #include <stdlib.h> #include <malloc.h> extern char ** environ; #define ADD_NUM 4 int putenv(var) const char * var; { static char ** mall_env = 0; static int extras = 0; char **p, **d; char * r; int len; r = strchr(var, '='); if( r == 0 ) len = strlen(var); else len = r-var; if (!environ) { environ = (char**)malloc(ADD_NUM * sizeof(char*)); memset(environ, 0, sizeof(char*)*ADD_NUM); extras = ADD_NUM; } for(p=environ; *p; p++) { if( memcmp(var, *p, len) == 0 && (*p)[len] == '=' ) { while( p[0] = p[1] ) p++; extras++; break; } } if( r == 0 ) return 0; if( extras <= 0 ) /* Need more space */ { d = malloc((p-environ+1+ADD_NUM)*sizeof(char*)); if( d == 0 ) return -1; memcpy((void*) d, (void*) environ, (p-environ+1)*sizeof(char*)); p = d + (p-environ); extras=ADD_NUM; if( mall_env ) free(mall_env); environ = d; mall_env = d; } *p++ = strdup((char*)var); *p = '\0'; extras--; return 0; }
Go to most recent revision | Compare with Previous | Blame | View Log