File: wvhex.cc

package info (click to toggle)
wvstreams 4.0.2-4
  • links: PTS
  • area: main
  • in suites: sarge
  • size: 6,420 kB
  • ctags: 6,518
  • sloc: cpp: 52,544; sh: 5,770; ansic: 810; makefile: 461; tcl: 114; perl: 18
file content (109 lines) | stat: -rw-r--r-- 2,111 bytes parent folder | download | duplicates (11)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
/*
 * Worldvisions Weaver Software:
 *   Copyright (C) 1997-2002 Net Integration Technologies, Inc.
 *
 * Hex encoder and decoder.
 */
#include "wvhex.h"
#include <ctype.h>


static inline char tohex(int digit, char alphabase)
{
    return (digit < 10 ? '0' : alphabase) + digit;
}

static inline int fromhex(char digit)
{
    if (isdigit(digit))
        return digit - '0';
    if (isupper(digit))
        return digit - 'A' + 10;
    return digit - 'a' + 10;
}

/***** WvHexEncoder *****/

WvHexEncoder::WvHexEncoder(bool use_uppercase) 
{
    alphabase = (use_uppercase ? 'A' : 'a') - 10;
    _reset();
}


bool WvHexEncoder::_reset()
{
    return true;
}


bool WvHexEncoder::_encode(WvBuf &in, WvBuf &out, bool flush)
{
    while (in.used() != 0)
    {
        unsigned char byte = in.getch();
        out.putch(tohex(byte >> 4, alphabase));
        out.putch(tohex(byte & 15, alphabase));
    }
    return true;
}


/***** WvHexDecoder *****/

WvHexDecoder::WvHexDecoder()
{
    _reset();
}


bool WvHexDecoder::_reset()
{
    issecond = false;
    first = 0;
    return true;
}


bool WvHexDecoder::_encode(WvBuf &in, WvBuf &out, bool flush)
{
    while (in.used() != 0)
    {
        char ch = (char) in.getch();
        if (isxdigit(ch))
        {
            int digit = fromhex(ch);
            if ( (issecond = ! issecond) )
                first = digit;
            else
                out.putch(first << 4 | digit);
            continue;
        }
        if (isspace(ch))
            continue;
        seterror("invalid character '%s' in hex input", ch);
        return false;
    }
    if (flush && issecond)
        return false; // not enough hex digits supplied
    return true;
}


/*** Compatibility ***/

void hexify(char *obuf, const void *ibuf, size_t len)
{
    size_t outlen = len * 2 + 1;
    WvHexEncoder(false /*use_uppercase*/).
        flushmemmem(ibuf, len, obuf, & outlen);
    obuf[outlen] = '\0';
}


void unhexify(void *obuf, const char *ibuf)
{
    size_t inlen = strlen(ibuf);
    size_t outlen = inlen / 2;
    WvHexDecoder().flushmemmem(ibuf, inlen, obuf, & outlen);
}