You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
52 lines
1.0 KiB
52 lines
1.0 KiB
2 years ago
|
#include <stdlib.h>
|
||
|
|
#include <stdio.h>
|
||
|
|
#include <string.h>
|
||
|
|
#include "netcdf.h"
|
||
|
|
#include "ncrc.h"
|
||
|
|
#include "nc4internal.h"
|
||
|
|
|
||
|
|
static void
|
||
|
|
printrc(NCglobalstate* ngs)
|
||
|
|
{
|
||
|
|
size_t i,nentries = 0;
|
||
|
|
NCRCinfo* info = NULL;
|
||
|
|
NCRCentry* entry = NULL;
|
||
|
|
|
||
|
|
info = ngs->rcinfo;
|
||
|
|
if(info->ignore) {
|
||
|
|
fprintf(stderr,".rc ignored\n");
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
|
||
|
|
/* Print out the .rc entries */
|
||
|
|
if((nentries = NC_rcfile_length(info))==0) {
|
||
|
|
printf("<empty>\n");
|
||
|
|
exit(0);
|
||
|
|
}
|
||
|
|
for(i=0;i<nentries;i++) {
|
||
|
|
entry = NC_rcfile_ith(info,i);
|
||
|
|
if(entry == NULL) abort();
|
||
|
|
if(entry->host != NULL) {
|
||
|
|
printf("[%s ",entry->host);
|
||
|
|
if(entry->urlpath != NULL)
|
||
|
|
printf("/%s] ",entry->urlpath);
|
||
|
|
printf("]");
|
||
|
|
}
|
||
|
|
printf("|%s|->|%s|\n",entry->key,entry->value);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
int
|
||
|
|
main(int argc, char** argv)
|
||
|
|
{
|
||
|
|
NCglobalstate* ngs = NC_getglobalstate();
|
||
|
|
|
||
|
|
/* Cause the .rc files to be read and merged */
|
||
|
|
nc_initialize();
|
||
|
|
|
||
|
|
if((ngs = NC_getglobalstate())==NULL) abort();
|
||
|
|
printrc(ngs);
|
||
|
|
|
||
|
|
return 0;
|
||
|
|
}
|