zlint/test-init-01.cpp

   1 /*
   2  * Copyright (c) 2004, Index Data.
   3  * See the file LICENSE for details.
   4  *
   5  * $Id: test-init-01.cpp,v 1.4 2005-06-25 15:53:21 adam Exp $
   6  */
   7
   8 #include <yaz/log.h>
   9
  10 #include <zlint.h>
  11
  12 Zlint_test_init_01::Zlint_test_init_01()
  13 {
  14 }
  15
  16 Zlint_test_init_01::~Zlint_test_init_01()
  17 {
  18 }
  19
  20 Zlint_code Zlint_test_init_01::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 V3 init");
  27
  28     ODR_MASK_ZERO(init->protocolVersion);
  29     ODR_MASK_SET(init->protocolVersion, Z_ProtocolVersion_1);
  30     ODR_MASK_SET(init->protocolVersion, Z_ProtocolVersion_2);
  31     ODR_MASK_SET(init->protocolVersion, Z_ProtocolVersion_3);
  32
  33     int r = z->send_Z_PDU(apdu, &len);
  34     if (r < 0)
  35     {
  36         z->msg_check_fail("unable to send init request");
  37         return TEST_FINISHED;
  38     }
  39     return TEST_CONTINUE;
  40 }
  41
  42 Zlint_code Zlint_test_init_01::recv_gdu(Zlint *z, Z_GDU *gdu)
  43 {
  44     if (gdu->which == Z_GDU_Z3950 &&
  45         gdu->u.z3950 && gdu->u.z3950->which == Z_APDU_initResponse)
  46     {
  47         Z_InitResponse *init = gdu->u.z3950->u.initResponse;
  48         int ver = z->initResponseGetVersion(init);
  49         int result = init->result ? *init->result : 0;
  50         if (ver > 3 || ver < 2)
  51             z->msg_check_fail("got version %d, expected 2 or 3", ver);
  52         if (!result)
  53         {
  54             z->msg_check_fail("init rejected (result false)");
  55             return TEST_FINISHED;
  56         }
  57         else
  58             z->msg_check_ok();
  59     }
  60     else
  61         z->msg_check_fail("did not receive init response as expected");
  62     return TEST_FINISHED;
  63 }
  64
  65
  66 /*
  67  * Local variables:
  68  * c-basic-offset: 4
  69  * indent-tabs-mode: nil
  70  * End:
  71  * vim: shiftwidth=4 tabstop=8 expandtab
  72  */
  73