zlint/test-init-06.cpp

   1 /*
   2  * Copyright (c) 2004, Index Data.
   3  * See the file LICENSE for details.
   4  *
   5  * $Id: test-init-06.cpp,v 1.1 2004-03-25 23:14:07 adam Exp $
   6  */
   7
   8 #include <yaz/log.h>
   9
  10 #include <zlint.h>
  11
  12 Zlint_test_init_06::Zlint_test_init_06()
  13 {
  14 }
  15
  16 Zlint_test_init_06::~Zlint_test_init_06()
  17 {
  18 }
  19
  20 Zlint_code Zlint_test_init_06::init(Zlint *z)
  21 {
  22     int len;
  23     Z_APDU *apdu = z->create_Z_PDU(Z_APDU_initRequest);
  24     Z_InitRequest *init = apdu->u.initRequest;
  25
  26     z->msg_check_for("for init options");
  27
  28     /* set all options.. see what target really supports .. */
  29     ODR_MASK_SET(init->protocolVersion, Z_ProtocolVersion_3);
  30     ODR_MASK_ZERO(init->options);
  31     int i;
  32     for (i = 0; i <= 24; i++)
  33         ODR_MASK_SET(init->options, i);
  34
  35     int r = z->send_Z_PDU(apdu, &len);
  36     if (r < 0)
  37     {
  38         z->msg_check_fail("unable to send init request");
  39         return TEST_FINISHED;
  40     }
  41     return TEST_CONTINUE;
  42 }
  43
  44 Zlint_code Zlint_test_init_06::recv_gdu(Zlint *z, Z_GDU *gdu)
  45 {
  46     if (gdu->which == Z_GDU_Z3950 &&
  47         gdu->u.z3950 && gdu->u.z3950->which == Z_APDU_initResponse)
  48     {
  49         Z_InitResponse *init = gdu->u.z3950->u.initResponse;
  50         int ver = z->initResponseGetVersion(init);
  51         int result = init->result ? *init->result : 0;
  52
  53         if (init->options)
  54         {
  55             int i;
  56             int no_set = 0;
  57             int no_reset = 0;
  58             for (i = 0; i <= 24; i++)
  59                 if (ODR_MASK_GET(init->options, i))
  60                     no_set++;
  61                 else
  62                     no_reset++;
  63             if (no_set < 2)
  64             {
  65                 z->msg_check_fail("suspicuously few option bits set");
  66                 return TEST_FINISHED;
  67             }
  68             if (no_reset == 0)
  69             {
  70                 z->msg_check_fail("suspicuously many option bits set");
  71                 return TEST_FINISHED;
  72             }
  73         }
  74         z->msg_check_ok();
  75     }
  76     else
  77         z->msg_check_fail("did not receive init response as expected");
  78     return TEST_FINISHED;
  79 }
  80
  81