close_all() { oc_close(); co_close(); ss_close(); sd_close(); }
main() { register total; putenv("_filesize_caps"); chdir(getenv("HOME")); ss_open(); co_open(); oc_open(); pr_open(); total = ss_size + co_size + oc_size + pr_size; printf("\n\n"); printf(" CAPS Shared Segment File Sizes\n"); printf(" ------------------------------\n"); printf(" ss segment is %7d bytes\n", ss_size); printf(" co segment is %7d bytes\n", co_size); printf(" oc segment is %7d bytes\n", oc_size); printf(" pr segment is %7d bytes\n", pr_size); printf(" -------\n"); printf(" total size is %7d bytes\n\n", total); pr_close(); co_close(); oc_close(); ss_close(); return; }
NCerror freeNCDAPCOMMON(NCDAPCOMMON* dapcomm) { /* abort the metadata file */ (void)nc_abort(getncid(dapcomm)); freenccache(dapcomm,dapcomm->cdf.cache); nclistfree(dapcomm->cdf.projectedvars); nullfree(dapcomm->cdf.recorddimname); /* free the trees */ freecdfroot34(dapcomm->cdf.ddsroot); dapcomm->cdf.ddsroot = NULL; freecdfroot34(dapcomm->cdf.fullddsroot); dapcomm->cdf.fullddsroot = NULL; if(dapcomm->oc.ocdasroot != NULL) oc_root_free(dapcomm->oc.conn,dapcomm->oc.ocdasroot); dapcomm->oc.ocdasroot = NULL; oc_close(dapcomm->oc.conn); /* also reclaims remaining OC trees */ ncurifree(dapcomm->oc.url); nullfree(dapcomm->oc.urltext); nullfree(dapcomm->oc.rawurltext); dcefree((DCEnode*)dapcomm->oc.dapconstraint); dapcomm->oc.dapconstraint = NULL; free(dapcomm); return NC_NOERR; }
close_all() { sd_close(); ss_close(); co_close(); oc_close(); od_close(); database_close(); }
/*-------------------------------------------------------------------------* * Save And Close Shared Segment *-------------------------------------------------------------------------*/ oc_close_save() { oc_save(); return oc_close(); }