File: tst_rcapi.c

package info (click to toggle)
netcdf-parallel 1%3A4.9.3-2
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 116,192 kB
  • sloc: ansic: 279,265; sh: 14,143; cpp: 5,971; yacc: 2,612; makefile: 2,075; lex: 1,218; javascript: 280; xml: 173; awk: 2
file content (94 lines) | stat: -rw-r--r-- 2,168 bytes parent folder | download | duplicates (2)
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
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
/* This is part of the netCDF package.
   Copyright 2018 University Corporation for Atmospheric Research/Unidata
   See COPYRIGHT file for conditions of use.

   Test RC interface
   Dennis Heimbigner
*/

#ifdef HAVE_CONFIG_H
#include "config.h"
#endif
#include <stdlib.h>
#include <stdio.h>
#include <string.h>

#include "netcdf.h"

#undef DEBUG

#ifndef nullfree
#define nullfree(x) {if((x)!=NULL) free(x);}
#endif

#if 0
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);
    }
}
#endif

int
main(int argc, char **argv)
{
    int stat = NC_NOERR;
    const char* key;
    const char* value;
    char* newvalue;

    printf("load:\n");

    key = "key1";
    value = "value1";
    printf("insert: key=%s value=%s\n",key, value);
    newvalue = nc_rc_get(key);
    printf("insert: before: %s = %s\n",key,newvalue);
    nullfree(newvalue);
    stat = nc_rc_set(key, value);
    if(stat) {fprintf(stderr,"***Fail: nc_rc_set: %s\n",nc_strerror(stat)); goto done;}
    newvalue = nc_rc_get(key);
    printf("insert: after: %s = %s\n",key,newvalue);
    nullfree(newvalue);

    key = "key1";
    value = "value2";
    printf("replace: key=%s value=%s\n",key, value);
    newvalue = nc_rc_get(key);
    printf("replace: before: %s = %s\n",key,newvalue);
    nullfree(newvalue);
    stat = nc_rc_set(key, value);
    if(stat) {fprintf(stderr,"***Fail: nc_rc_set: %s\n",nc_strerror(stat)); goto done;}
    newvalue = nc_rc_get(key);
    printf("replace: after: %s = %s\n",key,newvalue);
    nullfree(newvalue);

done:
    nc_finalize();
    return 0;
}