pep_utils.H

/* pep_utils.H */
/* $Id: pep_utils.H,v 1.5 2009/04/14 12:08:44 vlad Exp $ */
#ifndef __pep_utils_H
#define __pep_utils_H

#include <string.h>
#include <stdio.h>

#include <mix/Exceptions.h>
#include <csi/param.H>
#include <csi/CharAr.H>

/*************************************************************
 *
 *              PEP utility functions and classes
 *
 *************************************************************/


class ZString : public CharAr
{
public:

  ZString ()
    {}
  ZString (const ZString& zstring) : CharAr(zstring)
    {}
  ZString (const char* s);

  int   len ();

  char* clone ();

  operator char* ()
    {  return &operator[](0);  }

};


typedef ParView* (*ParViewInit)(Protocol* protocol,
                const char* pname,
                Widget wParent);


struct PEP_Type
{
  char      *name;  
  ParType   *type;  
  ParViewInit   create_view;    
};

/* Table of types */
#define AnyType     PEP_Type
#define AnyAr       TypesAr
#define AnyCmp(x,y) strcmp(x.name, y.name)
#define AnyFormatSpec   "\n%d: name='%s' base='%s' type=%p create_view=%p"
#define AnyPrintList    i, item.name, item.type? item.type->base_type(): "?", item.type, item.create_view
#include <mix/AnyAr.H>


struct PEP_CommKeys
{
  key_t page_k;     
  key_t lock_k;     
};


int PEP_FindProtocolSection (FILE* fp, const char* application,
                 const char* protocol);

void    PEP_ReadName (FILE* fp, CharAr& car);

int PEP_ReadCLikeCharLiteral (FILE* fp, char eos);

int PEP_ReadCLikeString (FILE* fp, char eos, CharAr& car);


int PEP_ReadCLikeString (const char* raw, char eos, CharAr& car);


int PEP_WriteCLikeString (FILE* fp, char eos, CharAr& car);

Logic   PEP_IsNameChar (char x);

void    PEP_SkipSpaces (FILE* fp);

void    PEP_SkipEndOfLine (FILE* fp);

ParType*    PEP_TypeByName (char* name);

int PEP_IndexByName (const char* name);

Logic   PEP_CompatibleTypes (const ParType& pt1, const ParType& pt2);

ParView*    PEP_CreateParView (Protocol *protocol,
                   const char* pname,
                   Widget wParent);

void    PEP_ScanConfig (const char* filename,
            const char* application,
            const char* protocol,
            ParDescAr& pdar);

void    PEP_AddStdProps (ParDescAr& pdar);

char*   PEP_BuildEnvName (const char* application,
              const char* protocol);

Logic   PEP_GetCommKeys (const char* application,
             const char* protocol,
             PEP_CommKeys& ckeys);

void    PEP_SetCommKeys (const char* application,
             const char* protocol,
             PEP_CommKeys& ckeys);

void    PEP_CleanCommKeys (const char* application,
               const char* protocol);

/*************************************************************
 * Support for two-range parsing functions.
 *************************************************************/
#define LOW_BOUND   (1<<0)      /* r[0] */
#define HIGH_BOUND  (1<<1)      /* r[1] */

int PEP_IntRange (const char* s, int r[2]);


#define AssocAr         pepNamedValues
#define AssocItemType       pepNamedValue
#define AssocKeyField       name
#define AssocKeyType        char*
#define AssocKeysCmp(key1,key2) strcmp(key1,key2)
#define AssocFormatSpec     "name=\"%s\", value=\"%s\"\n"
#define AssocPrintList      item.name, item.value
#include <mix/AssocAr.H>

/* Format of targs is "name1=value1;name2=value2...nameN=valueN".  So,
   '=' is special name-value delimiter and ';' - value-name delimiter.
 */
#define TARG_NV_DELIM       '='
#define TARG_VN_DELIM       ';'

void    PEP_ParseNameValue (const char* targ, pepNamedValues& nv,
                const char* defname = NULL);


void    PEP_Initialize ();

void    PEP_RegisterTypes ();

void    PEP_RegisterViews ();

/* End of initialization procedures
 *************************************************************/


#ifndef __pep_global_vars

/*************************************************************
 * Internal global variables of PEP runtime environment.
 * Hidden for custom applications!!!
 *************************************************************/

extern TypesAr  peptypes;

extern ErrCode  pepStatus;

extern FILE *pepFpWrite, *pepFpRead;

#endif /* __pep_global_vars */

#endif /* pep_utils.H */