X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=ir%2Ftv%2Fstrcalc.h;h=2986acf5b7f2e58d8b3891c3f0301cc3cd03b382;hb=f3b034366a1be7a8ee7f743d673b0343af79772c;hp=c614dba881cec2ce7e58aea372b2e85576b3cb48;hpb=c0397977e59fcfd9a1dcdb38097c2dca5655a8b9;p=libfirm diff --git a/ir/tv/strcalc.h b/ir/tv/strcalc.h index c614dba88..2986acf5b 100644 --- a/ir/tv/strcalc.h +++ b/ir/tv/strcalc.h @@ -1,29 +1,62 @@ - /****h* tools/strcalc +/* + * Copyright (C) 1995-2007 University of Karlsruhe. All right reserved. * - * NAME - * strcalc -- calculations using strings - * Provides basic mathematical operations on values represented as strings + * This file is part of libFirm. * - * AUTHORS - * Matthias Heil + * This file may be distributed and/or modified under the terms of the + * GNU General Public License version 2 as published by the Free Software + * Foundation and appearing in the file LICENSE.GPL included in the + * packaging of this file. * - * 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. + * Licensees holding valid libFirm Professional Edition licenses may use + * this file in accordance with the libFirm Commercial License. + * Agreement provided with the Software. * - ******/ + * This file is provided AS IS with NO WARRANTY OF ANY KIND, INCLUDING THE + * WARRANTY OF DESIGN, MERCHANTABILITY AND FITNESS FOR A PARTICULAR + * PURPOSE. + */ -#ifndef _STRCALC_H_ -#define _STRCALC_H_ +/** + * @file + * @brief Provides basic mathematical operations on values represented as strings. + * @date 2003 + * @author Mathias Heil + * @version $Id$ + * @summary + * + * 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 FIRM_TV_STRCALC_H +#define FIRM_TV_STRCALC_H + +#include "irmode.h" + +#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 -#define BIGGEST_INTEGER_SIZE_IN_BYTES 8 -#define SCDEBUG +/* + * constants, typedefs, enums + */ + +#define SC_DEFAULT_PRECISION 64 -/***************************************************************************** - * typedefs, enums and structs - *****************************************************************************/ enum { SC_0 = 0, SC_1, @@ -40,73 +73,110 @@ enum { SC_C, SC_D, SC_E, - SC_F, + SC_F }; -enum { - SC_ADD = 0, - SC_SUB, - SC_NEG, - SC_MUL, - SC_DIV, - SC_MOD, - SC_SHL, - SC_SHR, - SC_SHRS, - SC_ROT, - SC_AND, - SC_OR, - SC_NOT, - SC_XOR, -}; +/** + * Possible operations on integer values. + */ +typedef enum { + SC_ADD = 0, /**< Addition */ + SC_SUB, /**< Subtraction */ + 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 */ +} sc_op_t; -enum { - SC_HEX, - SC_DEC, - SC_OKT, - SC_BIN, +/** + * The output mode for integer values. + */ +enum base_t { + SC_hex, /**< hexadecimal output with small letters */ + SC_HEX, /**< hexadecimal output with BIG letters */ + SC_DEC, /**< decimal output */ + SC_OCT, /**< octal output */ + SC_BIN /**< binary output */ }; -/***************************************************************************** +/* * definitions and macros - *****************************************************************************/ -#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) - -#define sc_print_hex(a) sc_print((a), SC_HEX) -#define sc_print_dec(a) sc_print((a), SC_DEC) -#define sc_print_okt(a) sc_print((a), SC_OKT) -#define sc_print_bin(a) sc_print((a), SC_BIN) -/***************************************************************************** + */ +#define sc_add(a, b, c) sc_calc((a), (b), SC_ADD, (c)) +#define sc_sub(a, b, c) sc_calc((a), (b), SC_SUB, (c)) +#define sc_neg(a, c) sc_calc((a), NULL, SC_NEG, (c)) +#define sc_and(a, b, c) sc_calc((a), (b), SC_AND, (c)) +#define sc_or(a, b, c) sc_calc((a), (b), SC_OR, (c)) +#define sc_xor(a, b, c) sc_calc((a), (b), SC_XOR, (c)) +#define sc_not(a, c) sc_calc((a), NULL, SC_NOT, (c)) +#define sc_mul(a, b, c) sc_calc((a), (b), SC_MUL, (c)) +#define sc_div(a, b, c) sc_calc((a), (b), SC_DIV, (c)) +#define sc_mod(a, b, c) sc_calc((a), (b), SC_MOD, (c)) +#define sc_shl(a, b, c, d, e) sc_bitcalc((a), (b), (c), (d), SC_SHL, (e)) +#define sc_shr(a, b, c, d, e) sc_bitcalc((a), (b), (c), (d), SC_SHR, (e)) +#define sc_shrs(a, b, c, d, e) sc_bitcalc((a), (b), (c), (d), SC_SHRS, (e)) +#define sc_rot(a, b, c, d, e) sc_bitcalc((a), (b), (c), (d), SC_ROT, (e)) + +/* * function declarations - *****************************************************************************/ + */ const void *sc_get_buffer(void); -const int sc_get_buffer_length(void); +int sc_get_buffer_length(void); + +void sign_extend(char *calc_buffer, ir_mode *mode); + +/** create an value form a string representation */ +void sc_val_from_str(const char *str, unsigned int len, void *buffer, ir_mode *mode); + +/** create a value from a long */ +void sc_val_from_long(long l, void *buffer); -void sc_val_from_str(const char *str, unsigned int len); -void sc_val_from_long(long l); +/** create a value form an unsigned long */ +void sc_val_from_ulong(unsigned long l, void *buffer); + +/** converts a value to a long */ 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_min_from_bits(unsigned int num_bits, unsigned int sign, void *buffer); +void sc_max_from_bits(unsigned int num_bits, unsigned int sign, void *buffer); -void sc_calc(const void *val1, const void *val2, unsigned op); -void sc_bitcalc(const void *val1, const void *val2, unsigned radius, unsigned sign, unsigned op); +void sc_calc(const void *val1, const void *val2, unsigned op, void *buffer); +void sc_bitcalc(const void *val1, const void *val2, int radius, int sign, unsigned op, void *buffer); int sc_comp(const void *val1, const void *val2); -unsigned char sc_sub_bits(const void *val, int len, unsigned byte_ofs); +int sc_get_highest_set_bit(const void *value); +int sc_get_lowest_set_bit(const void *value); +int sc_is_zero(const void *value); +int sc_is_negative(const void *value); +int sc_had_carry(void); +unsigned char sc_sub_bits(const void *value, int len, unsigned byte_ofs); + +/** + * Converts a tarval into a string. + * + * @param val1 the value pointer + * @param bits number of valid bits in this value + * @param base output base + * @param signed_mode print it signed (only decimal mode supported + */ +const char *sc_print(const void *val1, unsigned bits, enum base_t base, int signed_mode); -const char *sc_print(const void *val1, unsigned base); +/** Initialize the strcalc module. + * Sets up internal data structures and constants + * After the first call subsequent calls have no effect + * + * @param precision_in_bytes Specifies internal precision to be used + * for calculations. The reason for being multiples of 8 eludes me + */ +void init_strcalc(int precision_in_bytes); +void finish_strcalc(void); +int sc_get_precision(void); -#endif /* _STRCALC_H_ */ +#endif /* FIRM_TV_STRCALC_H */