diff options
Diffstat (limited to 'vendor/voclient/voapps/voApps_spp.c')
| -rw-r--r-- | vendor/voclient/voapps/voApps_spp.c | 255 |
1 files changed, 255 insertions, 0 deletions
diff --git a/vendor/voclient/voapps/voApps_spp.c b/vendor/voclient/voapps/voApps_spp.c new file mode 100644 index 00000000..21cf4145 --- /dev/null +++ b/vendor/voclient/voapps/voApps_spp.c @@ -0,0 +1,255 @@ +/** + * VOTAPP_SPP.C -- SPP Interface routines to applications code. + * + * @file votApp_spp.c + * @author Mike Fitzpatrick + * @date 6/03/11 + * + * @brief SPP Interface routines to applications code. + */ + +#include <stdio.h> +#include <stdlib.h> +#include <string.h> +#include <stdarg.h> +#include <unistd.h> +#include <ctype.h> +#include <errno.h> + +/* +#include "votParseP.h" +*/ +#include "votParse.h" + + +/* SPP Type definitions. +*/ +#define XCHAR short +#define PKCHAR char +#define XINT int +#define XEOS 0 + + +/* SPP Interface Definitions. + * + * SPP compilers on various platforms may append one or more trailing + * underscores to symbol names, we'll use macros for the interface names + * and use defines to see what the symbol name is. +*/ +#ifdef _NO_US_ + +#define VX_VODATA vxvoda +#define VX_VODIRECTORY vxvody +#define VX_VOSESAME vxvose + +#define VX_VOCOPY vxvocy +#define VX_VOGET vxvogt +#define VX_VOINFO vxvoio + +#else + +#define VX_VODATA vxvoda_ +#define VX_VODIRECTORY vxvody_ +#define VX_VOSESAME vxvose_ + +#define VX_VOCOPY vxvocy_ +#define VX_VOGET vxvogt_ +#define VX_VOINFO vxvoio_ + +#endif + +typedef void (*PFV)(); +typedef int (*PFI)(); + + + +/** + * Local interface declarations. + */ +static PKCHAR *spp2c (XCHAR *instr, int maxch); +static int spplen (XCHAR *str); +static void func_exec (PFV func, char *name, int *argc, XCHAR *firstArg, + va_list argp); + + + +/***************************************************************************** + * Application Interfaces + ****************************************************************************/ + +#define MAX_ARGS 64 + +void vodata (int argc, char **argv); +void voregistry (int argc, char **argv); +void vosesame (int argc, char **argv); + +void votcnv (int argc, char **argv); +void votget (int argc, char **argv); +void votinfo (int argc, char **argv); + +void voc_debug (void); + + + +/** + * FUNC_EXEC -- Execute a VOClient function from the SPP binding. + */ +static void +func_exec (PFV func, char *name, int *argc, XCHAR *firstArg, va_list argp) +{ + int i, _argc = *argc; + char *_argv[MAX_ARGS]; + XCHAR *arg; + + if (firstArg == NULL) /* must pass in at least one arg */ + return; + + + /* Process the argument list. + */ + _argc = *argc + 1; + _argv[0] = strdup (name); + _argv[1] = spp2c (firstArg, spplen (firstArg)); + + for (i=2; i < _argc && (arg=(XCHAR *)va_arg(argp,XCHAR *)) != NULL; i++) + if (arg) + _argv[i] = spp2c (arg, spplen (arg)); + + /* Debug output. + */ + if (access ("/tmp/VOC_DEBUG", F_OK) == 0) { + for (i=0; i < _argc; i++) + fprintf (stderr, "%s ", _argv[i]); + fprintf (stderr, "\n"); + } + + + (*func) (_argc, _argv); /* call the task */ + + for (i=0; i < *argc; i++) /* free the arg pointers */ + if (_argv[i]) + free ((char *) _argv[i]); + + return; +} + + +/**************************************************************************** + * Task wrappers + ****************************************************************************/ + +/** + * VX_VOCOPY -- Application interface to the VOCOPY task. + */ +void VX_VOCOPY (int *argc, XCHAR *firstArg, ...) +{ + va_list argp; + + va_start (argp, firstArg); + func_exec (votcnv, "votcopy", argc, firstArg, argp); + va_end (argp); +} + + +/** + * VX_VODATA -- Application interface to the VODATA task. + */ +void VX_VODATA (int *argc, XCHAR *firstArg, ...) +{ + va_list argp; + + va_start (argp, firstArg); + func_exec (vodata, "vodata", argc, firstArg, argp); + va_end (argp); +} + + +/** + * VX_VODIRECTORY -- Application interface to the VODIRECTORY task. + */ +void VX_VODIRECTORY (int *argc, XCHAR *firstArg, ...) +{ + va_list argp; + + va_start (argp, firstArg); + func_exec (voregistry, "vodirectory", argc, firstArg, argp); + va_end (argp); +} + + +/** + * VX_VOGET -- Application interface to the VOGET task. + */ +void VX_VOGET (int *argc, XCHAR *firstArg, ...) +{ + va_list argp; + + va_start (argp, firstArg); + func_exec (votget, "votget", argc, firstArg, argp); + va_end (argp); +} + +/** + * VX_VOINFO -- Application interface to the VOTINFO task. + */ +void VX_VOINFO (int *argc, XCHAR *firstArg, ...) +{ + va_list argp; + + va_start (argp, firstArg); + func_exec (votinfo, "votinfo", argc, firstArg, argp); + va_end (argp); +} + + +/** + * VX_VOSESAME -- Application interface to the VOSESAME task. + */ +void VX_VOSESAME (int *argc, XCHAR *firstArg, ...) +{ + va_list argp; + + va_start (argp, firstArg); + func_exec (vosesame, "vosesame", argc, firstArg, argp); + va_end (argp); +} + + + +/**************************************************************************** + * Private utility procedures + ****************************************************************************/ + +/** + * SPP2C -- Convert an SPP string to a host C string. + */ +static char * +spp2c (XCHAR *instr, int maxch) +{ + XCHAR *ip = instr; + char *outstr = (char *) calloc (1, maxch+1); + char *op = (char *) outstr; + int n = maxch; + + while ((*op++ = (char)*ip++) != (char)XEOS && --n >= 0) + ; + *--op = (char) XEOS; + + return (outstr); +} + + +/** + * SPPLEN -- Get the length of an SPP string. + */ +static int +spplen (XCHAR *str) +{ + int len = 0; + + for (len=0; str[len] != (XCHAR) XEOS; len++) + ; + return (len); +} + +void voc_debug () { int junk; junk = 1; } |