zeda_ztk.h

Go to the documentation of this file.

/* ZEDA - Elementary Data and Algorithms
 * Copyright (C) 1998 Tomomichi Sugihara (Zhidao)
 */
#ifndef __ZEDA_ZTK_H__
#define __ZEDA_ZTK_H__

#ifndef __KERNEL__

#include <zeda/zeda_strlist.h>

__BEGIN_DECLS

/* ********************************************************** *//* ******************************************************* */
typedef struct _zFileStack{
  char *pathname;           
  FILE *fp;                 
  struct _zFileStack *prev; 
} zFileStack;

/* initialize a file stack. */
__EXPORT void zFileStackInit(zFileStack *stack);

/* check if the given file is already in a file stack, and if not,
 * open the file and push it. */
__EXPORT zFileStack *zFileStackPush(zFileStack *head, char *pathname);

/* pop the latest file from a file stack. */
__EXPORT zFileStack *zFileStackPop(zFileStack *head);

/* destroy a file stack. */
__EXPORT void zFileStackDestroy(zFileStack *head);

/* ********************************************************** *//* ******************************************************* */
typedef struct{
  char *key;        
  zStrList vallist; 
} ZTKKeyField;

/* print out a key field of ZTK format. */
__EXPORT void ZTKKeyFieldFPrint(FILE *fp, ZTKKeyField *kf);

/* ********************************************************** *//* ******************************************************* */
zListClass( ZTKKeyFieldList, ZTKKeyFieldListCell, ZTKKeyField );

/* insert a new key field of ZTK format to a list. */
__EXPORT ZTKKeyFieldListCell *ZTKKeyFieldListNew(ZTKKeyFieldList *list, char *key);

/* destroy a list of key fields of ZTK format. */
__EXPORT void ZTKKeyFieldListDestroy(ZTKKeyFieldList *list);

/* ********************************************************** *//* ******************************************************* */
typedef struct{
  char *tag;
  ZTKKeyFieldList kflist;
} ZTKTagField;

/* print out a tagged field of ZTK format (for debug). */
__EXPORT void ZTKTagFieldFPrint(FILE *fp, ZTKTagField *tf);

/* ********************************************************** *//* ******************************************************* */
zListClass( ZTKTagFieldList, ZTKTagFieldListCell, ZTKTagField );

/* insert a new tagged field of ZTK format to a list. */
__EXPORT ZTKTagFieldListCell *ZTKTagFieldListNew(char buf[]);

/* destroy a list of tagged fields of ZTK format. */
__EXPORT void ZTKTagFieldListDestroy(ZTKTagFieldList *list);

/* print out a list of tagged fields of ZTK format (for debug). */
__EXPORT void ZTKTagFieldListFPrint(FILE *fp, ZTKTagFieldList *list);

/* ********************************************************** *//* ******************************************************* */
typedef struct{
  zFileStack fs;
  ZTKTagFieldList tflist;
  ZTKTagFieldListCell *tf_cp;
  ZTKKeyFieldListCell *kf_cp;
  zStrListCell *val_cp;
} ZTK;

__EXPORT ZTK *ZTKInit(ZTK *ztk);

__EXPORT void ZTKDestroy(ZTK *ztk);

__EXPORT bool ZTKParseFP(ZTK *ztk, FILE *fp);

__EXPORT bool ZTKParse(ZTK *ztk, char *path);

__EXPORT int ZTKCountTag(ZTK *ztk, const char *tag);

__EXPORT int ZTKCountKey(ZTK *ztk, const char *key);

#define ZTKValPtr(ztk) (ztk)->val_cp

#define ZTKVal(ztk) ( (ztk)->val_cp ? (ztk)->val_cp->data : "" )

__EXPORT zStrListCell *ZTKValNext(ZTK *ztk);
__EXPORT zStrListCell *ZTKValRewind(ZTK *ztk);
#define ZTKValCmp(ztk,str) ( strcmp( ZTKVal(ztk), str ) == 0 )

#define ZTKKey(ztk) ( (ztk)->kf_cp ? (ztk)->kf_cp->data.key : "" )

__EXPORT ZTKKeyFieldListCell *ZTKKeyNext(ZTK *ztk);
__EXPORT ZTKKeyFieldListCell *ZTKKeyRewind(ZTK *ztk);
#define ZTKKeyCmp(ztk,str) ( strcmp( ZTKKey(ztk), str ) == 0 )

#define ZTKTag(ztk) ( (ztk)->tf_cp ? (ztk)->tf_cp->data.tag : "" )

__EXPORT ZTKTagFieldListCell *ZTKTagNext(ZTK *ztk);
__EXPORT ZTKTagFieldListCell *ZTKTagRewind(ZTK *ztk);
#define ZTKTagCmp(ztk,str) ( strcmp( ZTKTag(ztk), str ) == 0 )

#define ZTKRewind(ztk) ZTKTagRewind( ztk )

__EXPORT int ZTKInt(ZTK *ztk);
__EXPORT double ZTKDouble(ZTK *ztk);

__EXPORT void ZTKFPrint(FILE *fp, ZTK *ztk);
#define ZTKPrint(ztk) ZTKFPrint( stdout, ztk )

/* ********************************************************** *//* ******************************************************* */
typedef struct{
  char *str; 
  int num;   
  void *(* _eval)(void *, int, void *, ZTK *); 
  void (* _fprint)(FILE *, int, void *); 
} ZTKPrp;

/* evaluate a key field of a ZTK format processor based on a ZTK property. */
__EXPORT void *_ZTKEvalKey(void *obj, void *arg, ZTK *ztk, ZTKPrp prp[], int num);
#define ZTKEvalKey(obj,arg,ztk,prp) _ZTKEvalKey( obj, arg, ztk, prp, sizeof(prp)/sizeof(ZTKPrp) )

/* print out a key field of a ZTK format processor based on a ZTK property. */
__EXPORT void _ZTKPrpKeyFPrint(FILE *fp, void *obj, ZTKPrp prp[], int num);
#define ZTKPrpKeyFPrint(fp,obj,prp) _ZTKPrpKeyFPrint( fp, obj, prp, sizeof(prp)/sizeof(ZTKPrp) )

/* evaluate a tag field of a ZTK format processor based on a ZTK property. */
__EXPORT void *_ZTKEvalTag(void *obj, void *arg, ZTK *ztk, ZTKPrp prp[], int num);
#define ZTKEvalTag(obj,arg,ztk,prp) _ZTKEvalTag( obj, arg, ztk, prp, sizeof(prp)/sizeof(ZTKPrp) )

/* print out a tag field of a ZTK format processor based on a ZTK property. */
__EXPORT void _ZTKPrpTagFPrint(FILE *fp, void *obj, ZTKPrp prp[], int num);
#define ZTKPrpTagFPrint(fp,obj,prp) _ZTKPrpTagFPrint( fp, obj, prp, sizeof(prp)/sizeof(ZTKPrp) )

__END_DECLS

#endif /* __KERNEL__ */

#endif /* __ZEDA_ZTK_H__ */