/* Copyright (C) 2015-2020, Dirk Krause SPDX-License-Identifier: BSD-3-Clause */ /* WARNING: This file was generated by the dkct program (see http://dktools.sourceforge.net/ for details). Changes you make here will be lost if dkct is run again! You should modify the original source and run dkct on it. Original source: dk4ahd.ctr */ /** @file dk4ahd.c The dk4ahd module. */ #line 118 "dk4ahd.ctr" #include "dk4conf.h" #if DK4_HAVE_ASSERT_H #ifndef ASSERT_H_INCLUDED #include #define ASSERT_H_INCLUDED 1 #endif #endif #include "dk4ahd.h" #include "dk4mem.h" #include "dk4edstm.h" #line 135 "dk4ahd.ctr" void dk4ahex_dec_init(dk4_ahex_dec_t *dec, dk4_er_t *erp) { #if DK4_USE_ASSERT assert(NULL != dec); #endif if (NULL != dec) { DK4_MEMRES(dec, sizeof(dk4_ahex_dec_t)); dec->cpos = 0; dec->obyte = 0x00; } else { dk4error_set_simple_error_code(erp, DK4_E_INVALID_ARGUMENTS); } } int dk4ahex_dec_add(dk4_ahex_dec_t *dec, char tc, dk4_er_t *erp) { int back = DK4_EDSTM_ERROR; #if DK4_USE_ASSERT assert(NULL != dec); #endif if (NULL != dec) { switch (tc) { case ' ' : case '\t' : case '\r' : case '\n' : case 0x00 : case 0x0C : { back = DK4_EDSTM_ACCEPT; } break; case '>' : { back = DK4_EDSTM_STOP; } break; case '0' : { if (0 != dec->cpos) { dec->cpos = 2; } else { dec->obyte = 0x00; dec->cpos = 1; } } break; case '1' : { if (0 != dec->cpos) { dec->obyte |= 0x01; dec->cpos = 2; } else { dec->obyte = 0x10; dec->cpos = 1; } } break; case '2' : { if (0 != dec->cpos) { dec->obyte |= 0x02; dec->cpos = 2; } else { dec->obyte = 0x20; dec->cpos = 1; } } break; case '3' : { if (0 != dec->cpos) { dec->obyte |= 0x03; dec->cpos = 2; } else { dec->obyte = 0x30; dec->cpos = 1; } } break; case '4' : { if (0 != dec->cpos) { dec->obyte |= 0x04; dec->cpos = 2; } else { dec->obyte = 0x40; dec->cpos = 1; } } break; case '5' : { if (0 != dec->cpos) { dec->obyte |= 0x05; dec->cpos = 2; } else { dec->obyte = 0x50; dec->cpos = 1; } } break; case '6' : { if (0 != dec->cpos) { dec->obyte |= 0x06; dec->cpos = 2; } else { dec->obyte = 0x60; dec->cpos = 1; } } break; case '7' : { if (0 != dec->cpos) { dec->obyte |= 0x07; dec->cpos = 2; } else { dec->obyte = 0x70; dec->cpos = 1; } } break; case '8' : { if (0 != dec->cpos) { dec->obyte |= 0x08; dec->cpos = 2; } else { dec->obyte = 0x80; dec->cpos = 1; } } break; case '9' : { if (0 != dec->cpos) { dec->obyte |= 0x09; dec->cpos = 2; } else { dec->obyte = 0x90; dec->cpos = 1; } } break; case 'a' : case 'A' : { if (0 != dec->cpos) { dec->obyte |= 0x0A; dec->cpos = 2; } else { dec->obyte = 0xA0; dec->cpos = 1; } } break; case 'b' : case 'B' : { if (0 != dec->cpos) { dec->obyte |= 0x0B; dec->cpos = 2; } else { dec->obyte = 0xB0; dec->cpos = 1; } } break; case 'c' : case 'C' : { if (0 != dec->cpos) { dec->obyte |= 0x0C; dec->cpos = 2; } else { dec->obyte = 0xC0; dec->cpos = 1; } } break; case 'd' : case 'D' : { if (0 != dec->cpos) { dec->obyte |= 0x0D; dec->cpos = 2; } else { dec->obyte = 0xD0; dec->cpos = 1; } } break; case 'e' : case 'E' : { if (0 != dec->cpos) { dec->obyte |= 0x0E; dec->cpos = 2; } else { dec->obyte = 0xE0; dec->cpos = 1; } } break; case 'f' : case 'F' : { if (0 != dec->cpos) { dec->obyte |= 0x0F; dec->cpos = 2; } else { dec->obyte = 0xF0; dec->cpos = 1; } } break; } if (2 == dec->cpos) { dec->cpos = 0; back = DK4_EDSTM_FINISHED; } } else { dk4error_set_simple_error_code(erp, DK4_E_INVALID_ARGUMENTS); } return back; } int dk4ahex_finish(dk4_ahex_dec_t *dec, dk4_er_t *erp) { int back = DK4_EDSTM_ERROR; #if DK4_USE_ASSERT assert(NULL != dec); #endif if (NULL != dec) { switch (dec->cpos) { case 1: { back = DK4_EDSTM_FINISHED; } break; default : { back = DK4_EDSTM_ACCEPT; } break; } } else { dk4error_set_simple_error_code(erp, DK4_E_INVALID_ARGUMENTS); } return back; } unsigned char dk4ahex_output(dk4_ahex_dec_t const *dec, dk4_er_t *erp) { unsigned char back = 0x00; #if DK4_USE_ASSERT assert(NULL != dec); #endif if (NULL != dec) { back = dec->obyte; } else { dk4error_set_simple_error_code(erp, DK4_E_INVALID_ARGUMENTS); } return back; }