strcalc.h 4.28 KB
Newer Older
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
  /****h* tools/strcalc
 *
 * NAME
 *   strcalc -- calculations using strings
 *   Provides basic mathematical operations on values represented as strings
 *
 * AUTHORS
 *   Matthias Heil
 *
 * DESCRIPTION
 *    The module uses a string to represent values, and provides operations
 *   to perform calculations with these values.
 *    Results are stored in an internal buffer, so you have to make a copy
 *   of them if you need to store the result.
 *
 ******/

#ifndef _STRCALC_H_
#define _STRCALC_H_

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
#ifdef STRCALC_DEBUG_ALL             /* switch on all debug options */
#  ifndef STRCALC_DEBUG
#    define STRCALC_DEBUG            /* switch on debug output */
#  endif
#  ifndef STRCALC_DEBUG_PRINTCOMP    /* print arguments and result of each computation */
#    define STRCALC_DEBUG_PRINTCOMP
#  endif
#  ifndef STRCALC_DEBUG_FULLPRINT
#    define STRCALC_DEBUG_FULLPRINT  /* print full length of values (e.g. 128 bit instead of 64 bit using default init) */
#  endif
#  ifndef STRCALC_DEBUG_GROUPPRINT
#    define STRCALC_DEBUG_GROUPPRINT /* print spaces after each 8 bits */
#  endif
#endif

#ifdef STRCALC_DEBUG
  /* shortcut output for debugging */
#  define sc_print_hex(a) sc_print((a), 0, SC_HEX)
#  define sc_print_dec(a) sc_print((a), 0, SC_DEC)
#  define sc_print_oct(a) sc_print((a), 0, SC_OCT)
#  define sc_print_bin(a) sc_print((a), 0, SC_BIN)
#endif

/*
 * constants, typedefs, enums
 */

Matthias Heil's avatar
Matthias Heil committed
48
#define DEFAULT_PRECISION_IN_BYTES 8
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68

enum {
  SC_0 = 0,
  SC_1,
  SC_2,
  SC_3,
  SC_4,
  SC_5,
  SC_6,
  SC_7,
  SC_8,
  SC_9,
  SC_A,
  SC_B,
  SC_C,
  SC_D,
  SC_E,
  SC_F,
};

69
70
71
/**
 * Possible operations on integer values.
 */
72
enum {
73
74
75
76
77
78
79
80
81
82
83
84
85
86
  SC_ADD = 0,		/**< Addition */
  SC_SUB,		/**< Substraction */
  SC_NEG,		/**< Unary Minus */
  SC_MUL,		/**< Multiplication */
  SC_DIV,		/**< Integer Division (with rounding toward zero ?) */
  SC_MOD,		/**< Devision Remainder */
  SC_SHL,		/**< Left Shift */
  SC_SHR,		/**< Logical (unsigned) Right Shift */
  SC_SHRS,		/**< Arithmetic (signed) Right Shift */
  SC_ROT,		/**< Rotation (both directions) */
  SC_AND,		/**< Bitwise And */
  SC_OR,		/**< Bitwise Or */
  SC_NOT,		/**< Bitwise Not */
  SC_XOR,		/**< Bitwise Exclusive Or */
87
88
};

89
90
91
92
/**
 * The output mode for ntger values.
 */
enum base_t {
Michael Beck's avatar
Michael Beck committed
93
94
  SC_hex,	/**< hexadecimal output with small letters */
  SC_HEX,	/**< hexadecimal output with BIG letters */
95
96
97
  SC_DEC,	/**< decimal output */
  SC_OCT,	/**< octal output */
  SC_BIN,	/**< binary output */
98
99
};

100
/*
101
 * definitions and macros
102
 */
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
#define sc_add(a, b) sc_calc((a), (b), SC_ADD)
#define sc_sub(a, b) sc_calc((a), (b), SC_SUB)
#define sc_neg(a) sc_calc((a), NULL, SC_NEG)
#define sc_and(a, b) sc_calc((a), (b), SC_AND)
#define sc_or(a, b) sc_calc((a), (b), SC_OR)
#define sc_xor(a, b) sc_calc((a), (b), SC_XOR)
#define sc_not(a) sc_calc((a), NULL, SC_NOT)
#define sc_mul(a, b) sc_calc((a), (b), SC_MUL)
#define sc_div(a, b) sc_calc((a), (b), SC_DIV)
#define sc_mod(a, b) sc_calc((a), (b), SC_MOD)
#define sc_shl(a, b, c, d) sc_bitcalc((a), (b), (c), (d), SC_SHL)
#define sc_shr(a, b, c, d) sc_bitcalc((a), (b), (c), (d), SC_SHR)
#define sc_shrs(a, b, c, d) sc_bitcalc((a), (b), (c), (d), SC_SHRS)
#define sc_rot(a, b, c, d) sc_bitcalc((a), (b), (c), (d), SC_ROT)

118
/*
119
 * function declarations
120
 */
121
122
123
124
125
126
127
128
129
130
const void *sc_get_buffer(void);
const int sc_get_buffer_length(void);

void sc_val_from_str(const char *str, unsigned int len);
void sc_val_from_long(long l);
long sc_val_to_long(const void *val);
void sc_min_from_bits(unsigned int num_bits, unsigned int sign);
void sc_max_from_bits(unsigned int num_bits, unsigned int sign);

void sc_calc(const void *val1, const void *val2, unsigned op);
Matthias Heil's avatar
Matthias Heil committed
131
void sc_bitcalc(const void *val1, const void *val2, int radius, int sign, unsigned op);
132
133
int  sc_comp(const void *val1, const void *val2);

Matthias Heil's avatar
Matthias Heil committed
134
135
int sc_get_highest_set_bit(const void *value);
int sc_get_lowest_set_bit(const void *value);
136
137
138
int sc_is_zero(const void *value);
int sc_is_negative(const void *value);
int sc_had_carry(void);
Matthias Heil's avatar
Matthias Heil committed
139
unsigned char sc_sub_bits(const void *value, int len, unsigned byte_ofs);
140

141
142
143
144
145
146
147
148
/**
 * Converts a tarval into a string.
 *
 * @param val1		the value pointer
 * @param bits		number of valid bits in this value
 * @param base		output base
 */
const char *sc_print(const void *val1, unsigned bits, enum base_t base);
149

Matthias Heil's avatar
Matthias Heil committed
150
void init_strcalc(int precision_in_bytes);
Michael Beck's avatar
Tarval:    
Michael Beck committed
151
int get_precision(void);
Matthias Heil's avatar
Matthias Heil committed
152

153
#endif /* _STRCALC_H_ */