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.8  1999-06-25 13:47:25  adam
   8  * Minor change that prevents MSVC warning.
   9  *
  10  * Revision 1.7  1999/05/21 12:00:17  adam
  11  * Better diagnostics for extraction process.
  12  *
  13  * Revision 1.6  1999/05/20 12:57:18  adam
  14  * Implemented TCL filter. Updated recctrl system.
  15  *
  16  * Revision 1.5  1999/02/02 14:51:31  adam
  17  * Updated WIN32 code specific sections. Changed header.
  18  *
  19  * Revision 1.4  1997/09/17 12:19:22  adam
  20  * Zebra version corresponds to YAZ version 1.4.
  21  * Changed Zebra server so that it doesn't depend on global common_resource.
  22  *
  23  * Revision 1.3  1997/09/04 13:54:41  adam
  24  * Added MARC filter - type grs.marc.<syntax> where syntax refers
  25  * to abstract syntax. New method tellf in retrieve/extract method.
  26  *
  27  * Revision 1.2  1997/04/30 08:56:08  quinn
  28  * null
  29  *
  30  * Revision 1.1  1996/10/11  10:57:32  adam
  31  * New module recctrl. Used to manage records (extract/retrieval).
  32  *
  33  */
  34 #include <log.h>
  35
  36 #include "grsread.h"
  37
  38 static data1_node *grs_read_sgml (struct grs_read_info *p)
  39 {
  40     return data1_read_record (p->dh, p->readf, p->fh, p->mem);
  41 }
  42
  43 static void *grs_init_sgml(void)
  44 {
  45     return 0;
  46 }
  47
  48 static void grs_destroy_sgml(void *clientData)
  49 {
  50 }
  51
  52 static struct recTypeGrs sgml_type = {
  53     "sgml",
  54     grs_init_sgml,
  55     grs_destroy_sgml,
  56     grs_read_sgml
  57 };
  58
  59 RecTypeGrs recTypeGrs_sgml = &sgml_type;
  60