1 /*
2  *	Copyright 1996, University Corporation for Atmospheric Research
3  *      See netcdf/COPYRIGHT file for copying and redistribution conditions.
4  */
5 
6 #if HAVE_CONFIG_H
7 #include <config.h>
8 #endif
9 
10 #include <stdlib.h>
11 
12 #include "xxxnetcdf.h"
13 #include "ncio.h"
14 #include "fbits.h"
15 
16 /* With the advent of diskless io, we need to provide
17    for multiple ncio packages at the same time,
18    so we have multiple versions of ncio_create.
19 */
20 
21 /* Define known ncio packages */
22 extern int posixio_create(const char*,int,size_t,off_t,size_t,size_t*,void*,ncio**,void** const);
23 extern int posixio_open(const char*,int,off_t,size_t,size_t*,void*,ncio**,void** const);
24 
25 extern int stdio_create(const char*,int,size_t,off_t,size_t,size_t*,void*,ncio**,void** const);
26 extern int stdio_open(const char*,int,off_t,size_t,size_t*,void*,ncio**,void** const);
27 
28 #ifdef USE_FFIO
29 extern int ffio_create(const char*,int,size_t,off_t,size_t,size_t*,void*,ncio**,void** const);
30 extern int ffio_open(const char*,int,off_t,size_t,size_t*,void*,ncio**,void** const);
31 #endif
32 
33 #ifdef USE_DISKLESS
34 #  ifdef USE_MMAP
35      extern int mmapio_create(const char*,int,size_t,off_t,size_t,size_t*,void*,ncio**,void** const);
36      extern int mmapio_open(const char*,int,off_t,size_t,size_t*,void*,ncio**,void** const);
37 #  endif
38      extern int memio_create(const char*,int,size_t,off_t,size_t,size_t*,void*,ncio**,void** const);
39      extern int memio_open(const char*,int,off_t,size_t,size_t*,void*,ncio**,void** const);
40 #endif
41 
42 int
ncio_create(const char * path,int ioflags,size_t initialsz,off_t igeto,size_t igetsz,size_t * sizehintp,void * parameters,ncio ** iopp,void ** const mempp)43 ncio_create(const char *path, int ioflags, size_t initialsz,
44                        off_t igeto, size_t igetsz, size_t *sizehintp,
45 		       void* parameters,
46                        ncio** iopp, void** const mempp)
47 {
48 #ifdef USE_DISKLESS
49     if(fIsSet(ioflags,NC_DISKLESS)) {
50 #  ifdef USE_MMAP
51       if(fIsSet(ioflags,NC_MMAP))
52         return mmapio_create(path,ioflags,initialsz,igeto,igetsz,sizehintp,parameters,iopp,mempp);
53       else
54 #  endif /*USE_MMAP*/
55         return memio_create(path,ioflags,initialsz,igeto,igetsz,sizehintp,parameters,iopp,mempp);
56     }
57 #endif
58 
59 #ifdef USE_STDIO
60     return stdio_create(path,ioflags,initialsz,igeto,igetsz,sizehintp,parameters,iopp,mempp);
61 #elif defined(USE_FFIO)
62     return ffio_create(path,ioflags,initialsz,igeto,igetsz,sizehintp,parameters,iopp,mempp);
63 #else
64     return posixio_create(path,ioflags,initialsz,igeto,igetsz,sizehintp,parameters,iopp,mempp);
65 #endif
66 }
67 
68 int
ncio_open(const char * path,int ioflags,off_t igeto,size_t igetsz,size_t * sizehintp,void * parameters,ncio ** iopp,void ** const mempp)69 ncio_open(const char *path, int ioflags,
70                      off_t igeto, size_t igetsz, size_t *sizehintp,
71 		     void* parameters,
72                      ncio** iopp, void** const mempp)
73 {
74     /* Diskless open has the following constraints:
75        1. file must be classic version 1 or 2
76      */
77 #ifdef USE_DISKLESS
78     if(fIsSet(ioflags,NC_DISKLESS)) {
79 #  ifdef USE_MMAP
80       if(fIsSet(ioflags,NC_MMAP))
81         return mmapio_open(path,ioflags,igeto,igetsz,sizehintp,parameters,iopp,mempp);
82       else
83 #  endif /*USE_MMAP*/
84         return memio_open(path,ioflags,igeto,igetsz,sizehintp,parameters,iopp,mempp);
85     }
86 #endif
87 #ifdef USE_STDIO
88     return stdio_open(path,ioflags,igeto,igetsz,sizehintp,parameters,iopp,mempp);
89 #elif defined(USE_FFIO)
90     return ffio_open(path,ioflags,igeto,igetsz,sizehintp,parameters,iopp,mempp);
91 #else
92     return posixio_open(path,ioflags,igeto,igetsz,sizehintp,parameters,iopp,mempp);
93 #endif
94 }
95 
96 /**************************************************/
97 /* wrapper functions for the ncio dispatch table */
98 
99 int
ncio_rel(ncio * const nciop,off_t offset,int rflags)100 ncio_rel(ncio* const nciop, off_t offset, int rflags)
101 {
102     return nciop->rel(nciop,offset,rflags);
103 }
104 
105 int
ncio_get(ncio * const nciop,off_t offset,size_t extent,int rflags,void ** const vpp)106 ncio_get(ncio* const nciop, off_t offset, size_t extent,
107 			int rflags, void **const vpp)
108 {
109     return nciop->get(nciop,offset,extent,rflags,vpp);
110 }
111 
112 int
ncio_move(ncio * const nciop,off_t to,off_t from,size_t nbytes,int rflags)113 ncio_move(ncio* const nciop, off_t to, off_t from, size_t nbytes, int rflags)
114 {
115     return nciop->move(nciop,to,from,nbytes,rflags);
116 }
117 
118 int
ncio_sync(ncio * const nciop)119 ncio_sync(ncio* const nciop)
120 {
121     return nciop->sync(nciop);
122 }
123 
124 int
ncio_filesize(ncio * const nciop,off_t * filesizep)125 ncio_filesize(ncio* const nciop, off_t *filesizep)
126 {
127     return nciop->filesize(nciop,filesizep);
128 }
129 
130 int
ncio_pad_length(ncio * const nciop,off_t length)131 ncio_pad_length(ncio* const nciop, off_t length)
132 {
133     return nciop->pad_length(nciop,length);
134 }
135 
136 int
ncio_close(ncio * const nciop,int doUnlink)137 ncio_close(ncio* const nciop, int doUnlink)
138 {
139     /* close and release all resources associated
140        with nciop, including nciop
141     */
142     int status = nciop->close(nciop,doUnlink);
143     return status;
144 }
145