#include <stdio.h> #include <stdarg.h> #include <string.h> #include "../wftk_session.h" #include "../wftk_internals.h" |
adaptor_info
structure is used to pass adaptor info (duh) back to the
config module when it's building an adaptor instance. Here's what it contains:
static char *names[] = { "init", "free", "info", "get", "set", "store", "isnull", "makenull" }; XML * DATASTORE_currecord_init (WFTK_ADAPTOR * ad, va_list args); XML * DATASTORE_currecord_free (WFTK_ADAPTOR * ad, va_list args); XML * DATASTORE_currecord_info (WFTK_ADAPTOR * ad, va_list args); XML * DATASTORE_currecord_get (WFTK_ADAPTOR * ad, va_list args); XML * DATASTORE_currecord_set (WFTK_ADAPTOR * ad, va_list args); XML * DATASTORE_currecord_store (WFTK_ADAPTOR * ad, va_list args); XML * DATASTORE_currecord_isnull (WFTK_ADAPTOR * ad, va_list args); XML * DATASTORE_currecord_makenull (WFTK_ADAPTOR * ad, va_list args); static WFTK_API_FUNC vtab[] = { DATASTORE_currecord_init, DATASTORE_currecord_free, DATASTORE_currecord_info, DATASTORE_currecord_get, DATASTORE_currecord_set, DATASTORE_currecord_store, DATASTORE_currecord_isnull, DATASTORE_currecord_makenull }; static struct wftk_adaptor_info _DATASTORE_currecord_info = { 8, names, vtab }; |
struct wftk_adaptor_info * DATASTORE_currecord_get_info () { return & _DATASTORE_currecord_info; } |
XML * DATASTORE_currecord_init (WFTK_ADAPTOR * ad, va_list args) { const char * parms; WFTK_ADAPTOR * db_ad; parms = xml_attrval (ad->parms, "parm"); if (!*parms) parms = wftk_config_get_value (ad->session, "dsrep.database.db"); db_ad = wftk_get_adaptor (ad->session, TASKINDEX, parms); if (!db_ad) { xml_setf (ad->parms, "error", "Unable to initialize database %s", parms); printf (xml_attrval (ad->parms, "error")); return NULL; } ad->bindata = (void *) db_ad; xml_setf (ad->parms, "spec", "database:%s", parms); return (XML *) 0; } |
XML * DATASTORE_currecord_free (WFTK_ADAPTOR * ad, va_list args) { WFTK_ADAPTOR * db_ad = (WFTK_ADAPTOR *) ad->bindata; wftk_free_adaptor (ad->session, db_ad); return (XML *) 0; } |
XML * DATASTORE_currecord_info (WFTK_ADAPTOR * ad, va_list args) { XML * info; info = xml_create ("info"); xml_set (info, "type", "datastore"); xml_set (info, "name", "currecord"); xml_set (info, "ver", "1.0.0"); xml_set (info, "compiled", __TIME__ " " __DATE__); xml_set (info, "author", "Michael Roberts"); xml_set (info, "contact", "wftk@vivtek.com"); xml_set (info, "extra_functions", "0"); return (info); } |
XML * DATASTORE_currecord_get (WFTK_ADAPTOR * ad, va_list args) { WFTK_ADAPTOR *db_ad = (WFTK_ADAPTOR *) ad->bindata; XML * datasheet = (XML *) 0; char * name; char * colon; XML * val; char * value; if (args) datasheet = va_arg (args, XML *); if (!datasheet) { xml_set (ad->parms, "error", "No datasheet supplied."); return (XML *) 0; } name = va_arg (args, char *); if (!name) { xml_set (ad->parms, "error", "No value named."); return (XML *) 0; } colon = strrchr (name, ':'); val = wftk_call_adaptor (db_ad, "colget", "process", "id", xml_attrval (datasheet, "id"), colon ? colon + 1 : name); xml_set (ad->parms, "error", xml_attrval (db_ad->parms, "error")); if (val) { value = strdup (xml_attrval (val, "value")); xml_free (val); return (wftk_session_stashvalue (ad->session, value)); } else { return (wftk_session_stashvalue (ad->session, strdup (""))); } } |
XML * DATASTORE_currecord_set (WFTK_ADAPTOR * ad, va_list args) { WFTK_ADAPTOR *db_ad = (WFTK_ADAPTOR *) ad->bindata; XML * datasheet = (XML *) 0; char * name; char * value; char * colon; if (args) datasheet = va_arg (args, XML *); if (!datasheet) { xml_set (ad->parms, "error", "No datasheet supplied."); return (XML *) 0; } name = va_arg (args, char *); if (!name) { xml_set (ad->parms, "error", "No value named."); return (XML *) 0; } value = va_arg (args, char *); wftk_call_adaptor (db_ad, "colput", "process", "id", xml_attrval (datasheet, "id"), colon ? colon + 1 : name, value); xml_set (ad->parms, "error", xml_attrval (db_ad->parms, "error")); return (XML *) 0; } |
XML * DATASTORE_currecord_store (WFTK_ADAPTOR * ad, va_list args) { WFTK_ADAPTOR *db_ad = (WFTK_ADAPTOR *) ad->bindata; XML * data = (XML *) 0; char * name; char * value; char * colon; if (args) data = va_arg (args, XML *); if (!data) { xml_set (ad->parms, "error", "No data given."); return (XML *) 0; } if (!xml_parent (data)) { xml_set (ad->parms, "error", "Data not in datasheet."); return (XML *) 0; } wftk_call_adaptor (db_ad, "colput", "process", "id", xml_attrval (xml_parent(data), "id"), xml_attrval (data, "id"), xml_attrval (data, "value")); xml_set (ad->parms, "error", xml_attrval (db_ad->parms, "error")); return (XML *) 0; } |
XML * DATASTORE_currecord_isnull (WFTK_ADAPTOR * ad, va_list args) { return (XML *) 0; } XML * DATASTORE_currecord_makenull (WFTK_ADAPTOR * ad, va_list args) { return (XML *) 0; } |
This code and documentation are released under the terms of the GNU license. They are additionally copyright (c) 2000, Vivtek. All rights reserved except those explicitly granted under the terms of the GNU license. This presentation was prepared with LPML. Try literate programming. You'll like it. |