linkoptions.c File Reference

#include <stdio.h>
#include <stdlib.h>
#include <errno.h>
#include <string.h>
#include <limits.h>
#include <math.h>
#include <dbDefs.h>
#include <epicsTypes.h>
#include <epicsString.h>
#include <macLib.h>
#include "linkoptions.h"

Include dependency graph for linkoptions.c:

Go to the source code of this file.

Macros
#define	epicsExportSharedSymbols
#define	HUGE_VALF   HUGE_VAL
#define	HUGE_VALL   (-(HUGE_VAL))

Functions
int epicsShareAPI	linkOptionsStore (const linkOptionDef *opts, void *user, const char *str, int options)
	Parse a string a store the result. More...
epicsShareFunc const char *epicsShareAPI	linkOptionsEnumString (const linkOptionEnumType *emap, int i, const char *def)
	Return the string associated with Enum 'i'. More...

Macro Definition Documentation

epicsExportSharedSymbols

#define epicsExportSharedSymbols

Definition at line 23 of file linkoptions.c.

HUGE_VALF

#define HUGE_VALF   HUGE_VAL

Definition at line 27 of file linkoptions.c.

HUGE_VALL

#define HUGE_VALL   (-(HUGE_VAL))

Definition at line 30 of file linkoptions.c.

Function Documentation

linkOptionsEnumString()

epicsShareFunc const char* epicsShareAPI linkOptionsEnumString	(	const linkOptionEnumType *	Enums,
		int	i,
		const char *	def
	)

Return the string associated with Enum 'i'.

Parameters

Enums	A null-terminated array of string/integer pairs
i	An Enum index
def	String to be returned in 'i' isn't a valid Enum index.

Returns

A constant string

Definition at line 226 of file linkoptions.c.

{
    for(; emap && emap->name; emap++) {
        if ( i == emap->value ) {
            return emap->name;
        }
    }
    return def;
}

linkOptionsStore()

int epicsShareAPI linkOptionsStore	(	const linkOptionDef *	opts,
		void *	user,
		const char *	str,
		int	options
	)

Parse a string a store the result.

Takes the string 'str', parses it according to 'opts', then sorts the result in 'user'.

Parameters

opts	A null-terminated array of options.
user	Pointer to a structure whos member offsets are given in 'opts'
str	The string to parse
options	Some modifiers for the parsing process or 0. The only option is LINKOPTIONDEBUG.

Returns

0 Ok

-1 Fail ('user' may be partially modified)

Definition at line 135 of file linkoptions.c.

{
    MAC_HANDLE handle; /* only .debug is used */

    int status=0;
    size_t i;
    epicsUInt32 *found;
    const linkOptionDef *cur;
    char **pairs=NULL, **arg;

    for(i=0, cur=opts; cur && cur->name; i++, cur++) {}

    /* Bit array to find missing required keys */
    found=calloc( (i/32)+1, sizeof(epicsUInt32) );
    if (!found) {
        fprintf(stderr,"store_options: calloc failed\n");
        status=-1;
        goto errbitarray;
    }

    memset((void*)&handle, 0, sizeof(handle));

    if (options&LINKOPTIONDEBUG)
        handle.debug=0xff;

    /* Parses 'str' and stores the result in the array pairs.
     * The length of pairs is twice the number of pairs found.
     * Each even element is a key, each odd element is a value.
     *
     * Pair N is (pairs[2*N], pairs[2*N+1])
     *
     * After the last pair is a (NULL, NULL)
     */
    if (macParseDefns(&handle, str, &pairs)<0) {
        status=-1;
        goto errparse;
    }

    for (arg=pairs; arg && arg[0]; arg+=2) {
        int match=0;

        if (options&LINKOPTIONDEBUG)
            printf("key %s\n",arg[0]);

        for (i=0, cur=opts; !match && cur && cur->name; i++, cur++) {

            if (options&LINKOPTIONDEBUG)
                fprintf(stderr,"For option: %s\n",cur->name);

            if( strcmp(arg[0], cur->name)!=0 )
                continue;
            match=1;

            if (found[i/32]&(1<<(i%32)) && !cur->overwrite) {
                fprintf(stderr,"Option %s was already given\n",cur->name);
                status=-1;
                goto errsemantix;
            }

            found[i/32] |= 1<<(i%32);

            status=store_value(cur, user, arg[1], options);
            if (status)
                goto errsemantix;
        }

        if(!match) {
            printf("Warning: ignoring unknown INP/OUT option %s=\n", arg[0]);
        }
    }

    for (i=0, cur=opts; cur && cur->name; i++, cur++) {

        if ( !(found[i/32]&(1<<(i%32))) && cur->required ) {
            fprintf(stderr,"Missing required option %s\n",cur->name);
            status=-1;
            goto errsemantix;
        }
    }

errsemantix:
    free((void*)pairs);
errparse:
    free(found);
errbitarray:
    return status;
}