unbound/testcode/readhex.c

   1 /*
   2  * testcode/readhex.c - read hex data.
   3  *
   4  * Copyright (c) 2007, NLnet Labs. All rights reserved.
   5  *
   6  * This software is open source.
   7  *
   8  * Redistribution and use in source and binary forms, with or without
   9  * modification, are permitted provided that the following conditions
  10  * are met:
  11  *
  12  * Redistributions of source code must retain the above copyright notice,
  13  * this list of conditions and the following disclaimer.
  14  *
  15  * Redistributions in binary form must reproduce the above copyright notice,
  16  * this list of conditions and the following disclaimer in the documentation
  17  * and/or other materials provided with the distribution.
  18  *
  19  * Neither the name of the NLNET LABS nor the names of its contributors may
  20  * be used to endorse or promote products derived from this software without
  21  * specific prior written permission.
  22  *
  23  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
  24  * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
  25  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
  26  * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
  27  * HOLDER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
  28  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED
  29  * TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
  30  * PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
  31  * LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
  32  * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
  33  * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  34  *
  35  */
  36 /**
  37  * \file
  38  * Declarations useful for the unit tests.
  39  */
  40 #include "config.h"
  41 #include <ctype.h>
  42 #include "testcode/readhex.h"
  43 #include "util/log.h"
  44 #include "ldns/sbuffer.h"
  45 #include "ldns/parseutil.h"
  46
  47 /** skip whitespace */
  48 static void
  49 skip_whites(const char** p)
  50 {
  51         while(1) {
  52                 while(isspace((unsigned char)**p))
  53                         (*p)++;
  54                 if(**p == ';') {
  55                         /* comment, skip until newline */
  56                         while(**p && **p != '\n')
  57                                 (*p)++;
  58                         if(**p == '\n')
  59                                 (*p)++;
  60                 } else return;
  61         }
  62 }
  63
  64 /* takes a hex string and puts into buffer */
  65 void hex_to_buf(sldns_buffer* pkt, const char* hex)
  66 {
  67         const char* p = hex;
  68         int val;
  69         sldns_buffer_clear(pkt);
  70         while(*p) {
  71                 skip_whites(&p);
  72                 if(sldns_buffer_position(pkt) == sldns_buffer_limit(pkt))
  73                         fatal_exit("hex_to_buf: buffer too small");
  74                 if(!isalnum((unsigned char)*p))
  75                         break;
  76                 val = sldns_hexdigit_to_int(*p++) << 4;
  77                 skip_whites(&p);
  78                 log_assert(*p && isalnum((unsigned char)*p));
  79                 val |= sldns_hexdigit_to_int(*p++);
  80                 sldns_buffer_write_u8(pkt, (uint8_t)val);
  81                 skip_whites(&p);
  82         }
  83         sldns_buffer_flip(pkt);
  84 }
  85