--- /dev/null
+#define _POSIX_C_SOURCE 199509L
+
+#include "param.h"
+
+#define BUFFERSIZE 130
+
+int conParam(Param *my)
+{
+ int i = 0;
+ char fileName[PARAM_MAX_NAME_LEN];
+ FILE *f;
+ char buf[BUFFERSIZE];
+
+ strcpy(fileName, fn);
+ if (fileName == NULL) {
+ strcmp(fileName, "param.tcl");
+ }
+ if (NULL == (f = fopen(fileName, "r"))) {
+ msglog(LOG_ERR, "opening param file: %s\n", strerror(errno));
+ exit (-1);
+ } else {
+ int oneMore = 1;
+ my->overFullParamFile = 0;
+ while (oneMore) {
+ oneMore = 0;
+ if (i < PARAM_MAX_NVALS) {
+ if (fgets(buf, BUFFERSIZE, f) != NULL) {
+ oneMore = 1;
+ }
+ if (oneMore && (buf[0] != '#')) {
+ sscanf(buf, "set%s%s", my->pname[i], my->value[i]);
+ i++;
+ }
+ } else {
+ oneMore = 0;
+ msglog(LOG_WARNING, "Too many parameters in file, ignoring the rest.\n");
+ my->overFullParamFile = 1;
+ }
+ }
+ my->nVals = i;
+ fclose(f);
+ }
+ return 0;
+}
+
+void desParam(Param *my)
+{
+}
+
+int Param_getParamNumber(const Param *my, const char *name, const char *idx, int num)
+{
+ int retVal = -1;
+ int i;
+ char fullName[PARAM_MAX_NAME_LEN];
+
+ if (num == -1) {
+ sprintf(fullName, "%s(%s)", name, idx);
+ } else {
+ sprintf(fullName, "%s(%s%d)", name, idx, num);
+ }
+ for (i = 0; i < my->nVals; i++) {
+ if (strcmp(my->pname[i], fullName) == 0) {
+ retVal = i;
+ }
+ }
+ return retVal;
+}
+
+int Param_getInt(const Param *my, const char *name, const char *idx, int *val)
+{
+ int status;
+ char valstr[PARAM_MAX_VALUE_LEN];
+ char *endptr;
+ if ((status = Param_getString(my, name, idx, valstr)) != 1) {
+ msglog(LOG_ERR, "Error: cannot get Parameter %s as a string", idx);
+ return status;
+ }
+ *val = strtoul(valstr, &endptr, 0);
+ if (*endptr == '\0') {
+ return PARAM_RV_NO_INT;
+ }
+ return 1;
+}
+
+int Param_getString(const Param *my, const char *name, const char *idx, char *val)
+{
+ int n;
+ n = Param_getParamNumber(name, index, num);
+ if (n == -1) {
+ msglog(LOG_WARNING, "Parameter %s(%s) not found, returning NULL-pointer.\n", name, idx);
+ return 0;
+ } else {
+ strcpy(val[i], my->value[n]);
+ }
+ return 1;
+}
+
+int Param_getIntArray(const Param *my, const char *name, const char *idx, int num, int *val)
+{
+ int status;
+ int tmp;
+ char index[PARAM_MAX_NAME_LEN];
+ for (int i = 0 ; i < num ; i++) {
+ sprintf(index,"%s%d", idx, i);
+ if ((tmp = Param_getInt(my, name, index, val[i]) == 1) && (status >= 0)) {
+ status++;
+ } else {
+ status = tmp;
+ }
+ }
+
+ return status;
+}
+
+int Param_getStringArray(const Param *my, const char *name, const char *idx, int num, char **val)
+{
+ int status;
+ int tmp;
+ char index[PARAM_MAX_NAME_LEN];
+ for (int i = 0 ; i < num ; i++) {
+ sprintf(index,"%s%d", idx, i);
+ if ((tmp = Param_getString(my, name, index, val[i]) == 1) && (status >= 0)) {
+ status++;
+ } else {
+ status = tmp;
+ }
+ }
+
+ return status;
+}
+
--- /dev/null
+#ifndef PARAM_H
+#define PARAM_H
+
+/**************************************************************************
+ * Section containing struct Param (different in the different param.h's) *
+ **************************************************************************/
+
+#define PARAM_MAX_NAME_LEN 128
+#define PARAM_MAX_NVALS 1024
+
+typedef struct ParamS {
+ int nVals;
+ int overFullParamFile;
+ char pname[PARAM_MAX_NVALS][PARAM_MAX_NAME_LEN];
+ char value[PARAM_MAX_NVALS][PARAM_MAX_NAME_LEN];
+};
+
+} Param;
+
+int Param_getParamNumber(const Param *, const char *, const char *, int);
+
+/******************************************************************
+ * Section containing the API for param (common to all param.h's) *
+ ******************************************************************/
+
+int conParam(Param *);
+void desParam(Param *);
+
+/*
+ * All functions have a status as return value. If the return value is positive,
+ * it contains the number of array members returned (1 in case of
+ * Param_getString and Param_getInt, between 1 and num in case of
+ * Param_getStringArray and Param_getIntArray).
+ *
+ * Memory must be allocated for the result before the function is called.
+ * For example, calling Param_getInt needs
+ *
+ * > int status;
+ * > unsigned long int value;
+ * > if(status = Param_getInt(param, name, idx, value) != 1) {
+ * > printf("No parameter 'value' found. Exiting.\n");
+ * > exit(-1);
+ * > }
+ *
+ * For strings char[PARAM_MAX_VALUE_LEN] has to be allocated. Therefore the
+ * above example expands to
+ *
+ * > int status;
+ * > int num = 32;
+ * > char value[PARAM_MAX_VALUE_LEN][num];
+ * > if(status = Param_getStringArray(param, name, idx, num, value) != num) {
+ * > printf("Not enough elements of 'value' found. Exiting.\n");
+ * > exit(-1);
+ * > }
+ *
+ */
+
+#define PARAM_RV_NO_SUCH_PARAMETER 0
+#define PARAM_RV_FAILED -1
+#define PARAM_RV_NO_INT -2
+
+#define PARAM_MAX_VALUE_LEN 128
+
+int Param_getInt(const Param *, const char *, const char *, unsigned long int *);
+int Param_getString(const Param *, const char *, const char *, char *);
+
+int Param_getIntArray(const Param *, const char *, const char *, int, unsigned long int *);
+int Param_getStringArray(const Param *, const char *, const char *, int, char **);
+
+#endif
+
include=$(ORACLE_HOME)/plsql/public \
include=$(ORACLE_HOME)/network/public
+liboraParam.a : param.o
+ $(AR) $(ARFLAGS) $@ $<
+
+param.o : param.c param.h
+
+param.c : param.pc
+ $(PROC) $(PROCFLAGS) $(PROC_INCLUDES) iname=$< oname=$@
+
oraParam.o : oraParam.cc oraParam.h ../param/enhParam.h
oraParam.cc : oraParam.pc
$(PROC) $(PROCFLAGS) $(PROC_INCLUDES) iname=$< oname=$@
clean :
- rm -f *.o oraParam.cc oraParam.lis
+ rm -f *.o param.c param.lis oraParam.cc oraParam.lis
lib_clean :
- rm -f *.o *.a oraParam.cc oraParam.lis
+ rm -f *.o *.a param.c param.lis oraParam.cc oraParam.lis
--- /dev/null
+#ifndef PARAM_H
+#define PARAM_H
+
+/**************************************************************************
+ * Section containing struct Param (different in the different param.h's) *
+ **************************************************************************/
+
+typedef struct ParamS {
+} Param;
+
+/******************************************************************
+ * Section containing the API for param (common to all param.h's) *
+ ******************************************************************/
+
+int conParam(Param *);
+void desParam(Param *);
+
+/*
+ * All functions have a status as return value. If the return value is positive,
+ * it contains the number of array members returned (1 in case of
+ * Param_getString and Param_getInt, between 1 and num in case of
+ * Param_getStringArray and Param_getIntArray).
+ *
+ * Memory must be allocated for the result before the function is called.
+ * For example, calling Param_getInt needs
+ *
+ * > int status;
+ * > unsigned long int value;
+ * > if(status = Param_getInt(param, name, idx, value) != 1) {
+ * > printf("No parameter 'value' found. Exiting.\n");
+ * > exit(-1);
+ * > }
+ *
+ * For strings char[PARAM_MAX_VALUE_LEN] has to be allocated. Therefore the
+ * above example expands to
+ *
+ * > int status;
+ * > int num = 32;
+ * > char value[PARAM_MAX_VALUE_LEN][num];
+ * > if(status = Param_getStringArray(param, name, idx, num, value) != num) {
+ * > printf("Not enough elements of 'value' found. Exiting.\n");
+ * > exit(-1);
+ * > }
+ *
+ */
+
+#define PARAM_RV_NO_SUCH_PARAMETER 0
+#define PARAM_RV_FAILED -1
+
+#define PARAM_MAX_VALUE_LEN 128
+
+int Param_getInt(const Param *, const char *, const char *, unsigned long int *);
+int Param_getString(const Param *, const char *, const char *, char *);
+
+int Param_getIntArray(const Param *, const char *, const char *, int, unsigned long int *);
+int Param_getStringArray(const Param *, const char *, const char *, int, char **);
+
+#endif
+
--- /dev/null
+#define _POSIX_C_SOURCE 199509L
+
+/* Oracle communication area */
+#include <oraca.h>
+/* SQL communication area */
+#include <sqlca.h>
+
+#include "param.h"
+
+int conParam(Param *my)
+{
+ return 0;
+}
+
+void desParam(Param *my)
+{
+}
+
+int Param_getInt(const Param *my, const char *n, const char *i, int *v)
+{
+ return Param_getIntArray(my, n, i, 1, v);
+}
+
+int Param_getString(const Param *my, const char *n, const char *i, char *v)
+{
+ return Param_getStringArray(my, n, i, 1, &v);
+}
+
+int Param_getIntArray(const Param *my, const char *n, const char *i, int num, int *v)
+{
+ for (int i = 0 ; i<num ; i++) {
+ v[i] = 0;
+ }
+ return num;
+}
+
+int Param_getStringArray(const Param *my, const char *n, const char *i, int num, char **v)
+{
+ for (int i = 0 ; i<num ; i++) {
+ v[i] = "Blub";
+ }
+ return num;
+}
+
jspc29 / daqdata.git / commitdiff