---

init.c

/*
GOCR Copyright (C) 2000  Joerg Schulenburg Joerg.Schulenburg@physik.uni-magdeburg.de 
GOCR API Copyright (C) 2001 Bruno Barberi Gnecco <brunobg@sourceforge.net>

This program is free software; you can redistribute it and/or
modify it under the terms of the GNU General Public License
as published by the Free Software Foundation; either version 2
of the License, or (at your option) any later version.

This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
GNU General Public License for more details.

You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.

*/

#include "_gocr.h"
#include "gocr.h"
#ifdef HAVE_PAM_H 
#include <pam.h>
#else if HAVE_PNM_H
#include <pnm.h>
#endif

static int loaded = 0;
_gocr_Data _data;

int gocr_init ( int argc, char **argv ) {
  const char *interr = "Internal error";

  _gocr_debug(2, fprintf(_data.error, 
      "GOCR (C) 2000 Joerg Schulenburg <Joerg.Schulenburg@physik.uni-magdeburg.de>\n"
      "GOCR API Copyright (C) 2001 Bruno Barberi Gnecco <brunobg@sourceforge.net>\n"
      "Please report bugs you find, with the log, to http://jocr.sourceforge.net\n");)

  _gocr_debug(3, fprintf(_data.error, "gocr_init(%d, %p)\n", argc, argv);)
  if ( loaded ) {
    _gocr_debug(1, fprintf(_data.error, "gocr already loaded\n");)
    return -1;
  }
  loaded = 1;

  /* start internal data */
  _data.verbose = 1;
  _data.block_overlap = 0;
  _data.no_block = 1;
  _data.error = stderr;
  _data.print = 0;
  _data.print_image = 1;

  /* call other init functions */
  if ( _gocr_initModule() ) {
    _gocr_debug(1, fprintf(_data.error, "%s: initModules()\n", interr);)
    return -1;
  }

  if ( _gocr_initBlock() ) {
    _gocr_debug(1, fprintf(_data.error, "%s: initBlock()\n", interr);)
    return -1;
  }

  if ( _gocr_initUnicode() ) {
    _gocr_debug(1, fprintf(_data.error, "%s: initBlock()\n", interr);)
    return -1;
  }

  /* call external library init functions */
#if defined HAVE_PAM_H || defined HAVE_PNM_H
  pnm_init( &argc, argv );
#endif
  
  return 0;
}

void gocr_finalize ( void ) {
  _gocr_debug(3, fprintf(_data.error, "gocr_Finalize\n");)
  if ( !loaded )
    return;

  _gocr_endUnicode();
  _gocr_endModule();
  _gocr_endBlock();
}

int gocr_setAttribute ( gocrAttributeType t, void *value ) {
  _gocr_debug(3, fprintf(_data.error, "gocr_setAttribute(%d, %p)\n", t, value);)
  switch ( t ) {
    case VERBOSE:
      if ( (int)value < 0 || (int)value > 3 ) {
        _gocr_debug(2, fprintf(_data.error, "VERBOSE out of bonds: %d\n", (int)value);)
        return -1;
      }
      _data.verbose = (int)value;
      return 0;
    case BLOCK_OVERLAP:
      if ( (int)value != 0 && (int)value != 1 ) {
        _gocr_debug(2, fprintf(_data.error, "BLOCK_OVERLAP out of bonds: %d\n", (int)value);)
        return -1;
      }
      _data.block_overlap = (int)value;
      return 0;
    case NO_BLOCK:
      if ( (int)value != 0 && (int)value != 1 ) {
        _gocr_debug(2, fprintf(_data.error, "NO_BLOCK out of bonds: %d\n", (int)value);)
        return -1;
      }
      _data.no_block = (int)value;
      return 0;
    case ERROR_FILE:
      if ( !value ) {
        _gocr_debug(2, fprintf(_data.error, "OUTPUT_FILE: got NULL pointer");)
        return -1;
      }
      _data.error = (FILE *)value;
      return 0;
    case PRINT:
      if ( (int)value < 0 || (int)value > 6 ) {
        _gocr_debug(2, fprintf(_data.error, "PRINT: value out of bounds");)
        return -1;
      }
      _data.print = (int)value;
      return 0;
    case PRINT_IMAGE:
      if ( (int)value != 0 && (int)value != 1 ) {
        _gocr_debug(2, fprintf(_data.error, "PRINT_IMAGE: value out of bounds");)
        return -1;
      }
      _data.print_image = (int)value;
      return 0;
    default:
      _gocr_debug(2, fprintf(_data.error, "No such attribute %d\n", t);)
      return -1;
  }
}

void *gocr_getAttribute ( gocrAttributeType t ) {
  _gocr_debug(3, fprintf(_data.error, "gocr_getAttribute(%d)\n", t);)
  switch ( t ) {
    case VERBOSE:
      return (void *)_data.verbose;
    case BLOCK_OVERLAP:
      return (void *)_data.block_overlap;
    case NO_BLOCK:
      return (void *)_data.no_block;
    case ERROR_FILE:
      return (void *)_data.error;
    case PRINT:
      return (void *)_data.print;
    case PRINT_IMAGE:
      return (void *)_data.print_image;
    default:
      _gocr_debug(2, fprintf(_data.error, "No such attribute %d\n", t);)
  }
  return NULL;
}

---