source: libcf/trunk/src/cf_codec.c@ 72

/**
 * @file    cf_codec.c
 * @author  myusgun <myusgun@gmail.com>
 */
#include "cf_codec.h"
#include "cf_error.h"

#include <string.h>
#include <stdio.h>

#define ASSERT_ARGS(x)                  \
    if ((x))                            \
        return CF_ERROR_CODEC_INVALID_ARGS

#define IS_NUMBER(x)        (x >= '0' && x <= '9')
#define IS_LOWERCASE(x)     (x >= 'a' && x <= 'f')
#define IS_UPPERCASE(x)     (x >= 'A' && x <= 'F')

typedef unsigned char __uchar;

/**
 * 바이너리 데이터를 16진수 문자열로 변환
 *
 * @return 성공 시, CF_OK; 실패 시, 오류 코드
 *
 * @param bin   바이너리 데이터
 * @param len   바이너리 데이터 길이
 * @param hex   16진수 문자열을 저장할 주소
 *
 * @remark 16진수 문자열을 저장할 메모리가 미리 할당되어야 하며, 크기는 len * 2 + 1
 */
int
CF_Codec_BinaryToHex (const unsigned char   * bin,
                      const size_t          len,
                      char                  * hex)
{
    size_t      iter = 0;
    size_t      count = len * 2 + 1;

    const char  hexchar[] = {'0', '1', '2', '3',
                             '4', '5', '6', '7',
                             '8', '9', 'a', 'b',
                             'c', 'd', 'e', 'f'};

    const __uchar   * ptr = bin;

    ASSERT_ARGS (bin == NULL);
    ASSERT_ARGS (hex == NULL);

    for (iter = 0 ; iter < count ; iter += 2, ptr++)
    {
        hex[iter    ] = hexchar[((*(ptr)) >> 4) & 0x0f];
        hex[iter + 1] = hexchar[((*(ptr))     ) & 0x0f];
    }
    hex[count - 1] = '\0';

    return CF_OK;
}

/**
 * 16진수 문자열을 바이너리 데이터로 변환
 *
 * @return 성공 시, CF_OK; 실패 시, 오류 코드
 *
 * @param hex   16진수 문자열
 * @param bin   바이너리 데이터를 저장할 주소
 * @param len   바이너리 데이터의 길이를 저장할 주소
 *
 * @remark 바이너리 데이터를 저장할 메모리가 미리 할당되어야 하며, 크기는 strlen (hex) / 2
 */
int
CF_Codec_HexToBinary (const char    * hex,
                      unsigned char * bin,
                      size_t        * len)
{
    int     result = 0;

    size_t  length = strlen (hex); /* absolutely even-number */
    size_t  iter = 0;
    size_t  count = length / 2;
    int     twochar = 0;

    const char  * ptr = hex;
    char        buf = 0;
    __uchar     val = 0;

    ASSERT_ARGS (hex == NULL);
    ASSERT_ARGS (bin == NULL);
    ASSERT_ARGS (len == NULL);

    for (iter = 0 ; iter < count ; iter++)
    {
        for (twochar = 2, val = 0 ; twochar ; ptr++, twochar--)
        {
            buf = *ptr;
            val = (__uchar)(val << 4);

            if      (IS_NUMBER (buf))       val |= (__uchar)(buf - '0' +  0);
            else if (IS_LOWERCASE (buf))    val |= (__uchar)(buf - 'a' + 10);
            else if (IS_UPPERCASE (buf))    val |= (__uchar)(buf - 'A' + 10);
            else
            {
                result = CF_ERROR_CODEC_NOT_HEXSTRING;
                break;
            }
        }

        bin[iter] = val;
    }

    if (result == 0)
        *len = count;

    return result;
}