程序readenv.c显示了在c语言中存取环境变量的若干技巧。该程序将以与dos的SET命令相同的格式打印出当前所有的环境变量，然后寻找PATH变量，打印出整个路径字符串。该程序中有两个重要的子程序，find_env_string(),它的主要作用是：根据从调用这传来的要求，或者从环境空间的起点开始，或者从上一次搜索後停留的地方开始，寻找随后的第一个环境字符串，具体程序清单如下。


/**************readnv.c****************/
#include<stdio.h>
#include<stdlib.h>
#include<dos.h>

#define MAX 127
#define TRUE 1
#define FALSE 0
#define FIRST 1
#define NEXT 0

void dispenv(void);
int find_env_string(int restart);

char env_string[MAX+2];
int env_offset=0;

void main()
{
char *path_string; /*调用子程序dispenv(),以与SET命令相同的格式打印出当前环境字符串*/
dispenv(); /*在环境变量中寻找PATH变量，并打印出整个论经字符串*/
if(path_string==getenv("PATH"))
printf("\nPATH=%s",path_string);
}
/********************************************/

void dispenv()
{
int restart; /*在for循环中，先置restart为FIRST，调用子程序find_env_string()
寻找第一个环境字符串并打印，而后置restart为NEXT,继续寻找下一
个环境字符串，直到结束子程序find_env_string()返回FALSE为止*/
for(restart=FIRST;find_env_string(restart);restart=NEXT)
printf("\n%s",env_string);
}
/********************************************/

int find_env_string(int restart)
{
int buf_offset;
int environment;
if(!environment) /*将环境空间短地址送入变量environment中*/
environment=peek(_psp,0x2c);
if(restart)
environment=0; /*首次调用时，偏移量置0，即从环境空间起点开始*/
for(buf_offset=0;TRUE;env_offset++){
env_string[buf_offset]=peekb(environment,env_offset);
/*将环境空间中的字符逐个读入数组env_string中
if(env_string[buf_offset]){/*若为空字符，继续*/
buf_offset++;
continue;
}
if(!buf_offset) /*若buf_offset=0,则中个环境结束，回FALSE*/
return FALSE;
env_offset++;/*若为空字符，则一个环境字符串结束，回TRUE*/
return TRUE;
}
}