File: putenv.c

package info (click to toggle)
bind9 1%3A9.3.4-2etch6
  • links: PTS, VCS
  • area: main
  • in suites: etch
  • size: 24,476 kB
  • ctags: 22,776
  • sloc: ansic: 222,420; sh: 20,927; xml: 7,441; makefile: 3,681; perl: 3,026; cpp: 1,764; tcl: 842; python: 77
file content (25 lines) | stat: -rw-r--r-- 427 bytes parent folder | download | duplicates (4) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
 
#ifndef LINT
static const char rcsid[] = "$Id: putenv.c,v 1.1 2001/03/29 06:30:33 marka Exp $";
#endif

#include "port_before.h"
#include "port_after.h"

/*
 * To give a little credit to Sun, SGI,
 * and many vendors in the SysV world.
 */

#if !defined(NEED_PUTENV)
int __bindcompat_putenv;
#else
int
putenv(char *str) {
	char *tmp;

	for (tmp = str; *tmp && (*tmp != '='); tmp++)
		;

	return (setenv(str, tmp, 1));
}
#endif