src/waislen.c

   1 /*
   2  * Copyright (C) 1995-2007, Index Data ApS
   3  * See the file LICENSE for details.
   4  *
   5  * $Id: waislen.c,v 1.5 2007-01-03 08:42:15 adam Exp $
   6  */
   7 /**
   8  * \file waislen.c
   9  * \brief Implements WAIS package handling
  10  */
  11
  12 #include <stdio.h>
  13 #include <yaz/comstack.h>
  14 #include <yaz/tcpip.h>
  15 /*
  16  * Return length of WAIS package or 0
  17  */
  18 int completeWAIS(const unsigned char *buf, int len)
  19 {
  20     int i, lval = 0;
  21
  22     if (len < 25)
  23         return 0;
  24     if (*buf != '0')
  25         return 0;
  26     /* calculate length */
  27     for (i = 0; i < 10; i++)
  28         lval = lval * 10 + (buf[i] - '0');
  29     lval += 25;
  30     if (len >= lval)
  31         return lval;
  32     return 0;
  33 }
  34 /*
  35  * Local variables:
  36  * c-basic-offset: 4
  37  * indent-tabs-mode: nil
  38  * End:
  39  * vim: shiftwidth=4 tabstop=8 expandtab
  40  */
  41