src/waislen.c

   1 /*
   2  * Copyright (c) 1995-2004, Index Data.
   3  * See the file LICENSE for details.
   4  *
   5  * $Id: waislen.c,v 1.2 2004-10-15 00:19:01 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 }