| Line 17... |
Line 17... |
| 17 |
int _is_r_sym(char *sym);
|
17 |
int _is_r_sym(char *sym);
|
| 18 |
int _file_exists(char *filename);
|
18 |
int _file_exists(char *filename);
|
| 19 |
int _sdf_exists2(char *iname);
|
19 |
int _sdf_exists2(char *iname);
|
| 20 |
|
20 |
|
| 21 |
/* sdf utilities */
|
21 |
/* sdf utilities */
|
| 22 |
int USE_SDF(const char *iname, int exists); /* call this before doing anything on an SDF */
|
22 |
int USE_SDF1(const char *iname, int exists); /* call this before doing anything on an SDF */
|
| 23 |
SEXP _create_sdf_sexp(const char *iname); /* create a SEXP for an SDF */
|
23 |
SEXP _create_sdf_sexp(const char *iname); /* create a SEXP for an SDF */
|
| 24 |
int _add_sdf1(char *filename, char *internal_name); /* add SDF to workspace */
|
24 |
int _add_sdf1(char *filename, char *internal_name); /* add SDF to workspace */
|
| 25 |
void _delete_sdf2(const char *iname); /* remove SDF from workspace */
|
25 |
void _delete_sdf2(const char *iname); /* remove SDF from workspace */
|
| 26 |
int _get_factor_levels1(const char *iname, const char *varname, SEXP var);
|
26 |
int _get_factor_levels1(const char *iname, const char *varname, SEXP var);
|
| 27 |
int _get_row_count2(const char *table);
|
27 |
int _get_row_count2(const char *table, int quote);
|
| 28 |
SEXP _get_rownames(const char *sdf_iname);
|
28 |
SEXP _get_rownames(const char *sdf_iname);
|
| 29 |
char *_get_full_pathname2(char *relpath); /* get full path given relpath, used in workspace mgmt */
|
29 |
char *_get_full_pathname2(char *relpath); /* get full path given relpath, used in workspace mgmt */
|
| 30 |
|
30 |
|
| 31 |
/* utilities for creating SDF's */
|
31 |
/* utilities for creating SDF's */
|
| 32 |
char *_create_sdf_skeleton2(SEXP name, int *o_namelen);
|
32 |
char *_create_sdf_skeleton1(SEXP name, int *o_namelen);
|
| - |
|
33 |
int _copy_factor_levels2(const char *factor_type, const char *iname_src,
|
| - |
|
34 |
const char *colname_src, const char *iname_dst, const char *colname_dst);
|
| 33 |
|
35 |
|
| 34 |
/* R utilities */
|
36 |
/* R utilities */
|
| 35 |
SEXP _getListElement(SEXP list, char *varname);
|
37 |
SEXP _getListElement(SEXP list, char *varname);
|
| 36 |
SEXP _shrink_vector(SEXP vec, int len); /* shrink vector size */
|
38 |
SEXP _shrink_vector(SEXP vec, int len); /* shrink vector size */
|
| 37 |
|
39 |
|
| Line 44... |
Line 46... |
| 44 |
int _expand_buf(int i, int size); /* expand ith buf if size > buf[i].size */
|
46 |
int _expand_buf(int i, int size); /* expand ith buf if size > buf[i].size */
|
| 45 |
|
47 |
|
| 46 |
|
48 |
|
| 47 |
/* sqlite.vector utilities */
|
49 |
/* sqlite.vector utilities */
|
| 48 |
SEXP sdf_get_variable(SEXP sdf, SEXP name);
|
50 |
SEXP sdf_get_variable(SEXP sdf, SEXP name);
|
| - |
|
51 |
SEXP sdf_detach_sdf(SEXP internal_name);
|
| 49 |
|
52 |
|
| 50 |
/* misc utilities */
|
53 |
/* misc utilities */
|
| 51 |
char *_r2iname(char *internal_name, char *filename);
|
54 |
char *_r2iname(char *internal_name, char *filename);
|
| 52 |
char *_fixname(char *rname);
|
55 |
char *_fixname(char *rname);
|
| 53 |
|
56 |
|
| Line 80... |
Line 83... |
| 80 |
|
83 |
|
| 81 |
/* detail constants (see _get_sdf_detail2 in sqlite_workspace.c) */
|
84 |
/* detail constants (see _get_sdf_detail2 in sqlite_workspace.c) */
|
| 82 |
#define SDF_DETAIL_EXISTS 0
|
85 |
#define SDF_DETAIL_EXISTS 0
|
| 83 |
#define SDF_DETAIL_FULLFILENAME 1
|
86 |
#define SDF_DETAIL_FULLFILENAME 1
|
| 84 |
|
87 |
|
| - |
|
88 |
/* R SXP type constants */
|
| - |
|
89 |
#define FACTORSXP 11
|
| - |
|
90 |
#define ORDEREDSXP 12
|
| - |
|
91 |
|
| 85 |
#ifndef __SQLITE_WORKSPACE__
|
92 |
#ifndef __SQLITE_WORKSPACE__
|
| 86 |
extern sqlite3 *g_workspace;
|
93 |
extern sqlite3 *g_workspace;
|
| 87 |
extern char *g_sql_buf[NBUFS];
|
94 |
extern char *g_sql_buf[NBUFS];
|
| 88 |
extern int g_sql_buf_sz[NBUFS];
|
95 |
extern int g_sql_buf_sz[NBUFS];
|
| 89 |
#endif
|
96 |
#endif
|