recctrl/sgmlread.c

   1 /*
   2  * Copyright (C) 1994-1999, Index Data
   3  * All rights reserved.
   4  * Sebastian Hammer, Adam Dickmeiss
   5  *
   6  * $Log: sgmlread.c,v $
   7  * Revision 1.6  1999-05-20 12:57:18  adam
   8  * Implemented TCL filter. Updated recctrl system.
   9  *
  10  * Revision 1.5  1999/02/02 14:51:31  adam
  11  * Updated WIN32 code specific sections. Changed header.
  12  *
  13  * Revision 1.4  1997/09/17 12:19:22  adam
  14  * Zebra version corresponds to YAZ version 1.4.
  15  * Changed Zebra server so that it doesn't depend on global common_resource.
  16  *
  17  * Revision 1.3  1997/09/04 13:54:41  adam
  18  * Added MARC filter - type grs.marc.<syntax> where syntax refers
  19  * to abstract syntax. New method tellf in retrieve/extract method.
  20  *
  21  * Revision 1.2  1997/04/30 08:56:08  quinn
  22  * null
  23  *
  24  * Revision 1.1  1996/10/11  10:57:32  adam
  25  * New module recctrl. Used to manage records (extract/retrieval).
  26  *
  27  */
  28 #include <log.h>
  29
  30 #include "grsread.h"
  31
  32 static data1_node *grs_read_sgml (struct grs_read_info *p)
  33 {
  34     logf (LOG_LOG, "grs_read_sgml");
  35     return data1_read_record (p->dh, p->readf, p->fh, p->mem);
  36 }
  37
  38 static void *grs_init_sgml()
  39 {
  40     logf (LOG_LOG, "grs_init_gsml");
  41     return 0;
  42 }
  43
  44 static void grs_destroy_sgml(void *clientData)
  45 {
  46     logf (LOG_LOG, "grs_destroy_sgml");
  47 }
  48
  49 static struct recTypeGrs sgml_type = {
  50     "sgml",
  51     grs_init_sgml,
  52     grs_destroy_sgml,
  53     grs_read_sgml
  54 };
  55
  56 RecTypeGrs recTypeGrs_sgml = &sgml_type;
  57