base/applications/calc/calc.h

   1 #include <stdarg.h>
   2 #include <windef.h>
   3 #include <winuser.h>
   4 #include <tchar.h>
   5 #include <math.h>
   6 #include <float.h>
   7 #include <malloc.h>
   8 #ifndef DISABLE_HTMLHELP_SUPPORT
   9 #include <htmlhelp.h>
  10 #endif
  11
  12 /* Messages reserved for the main dialog */
  13 #define WM_CLOSE_STATS      (WM_APP+1)
  14 #define WM_HANDLE_CLIPBOARD (WM_APP+2)
  15 #define WM_INSERT_STAT      (WM_APP+3)
  16 #define WM_LOAD_STAT        (WM_APP+4)
  17 #define WM_START_CONV       (WM_APP+5)
  18 #define WM_HANDLE_FROM      (WM_APP+6)
  19 #define WM_HANDLE_TO        (WM_APP+7)
  20
  21 #ifdef ENABLE_MULTI_PRECISION
  22 #include <mpfr.h>
  23
  24 #ifndef MPFR_DEFAULT_RND
  25 #define MPFR_DEFAULT_RND mpfr_get_default_rounding_mode ()
  26 #endif
  27
  28 #define LOCAL_EXP_SIZE  100000000L
  29 #else
  30
  31 #define LOCAL_EXP_SIZE  10000L
  32
  33 #endif
  34
  35 #include "resource.h"
  36
  37 #ifndef IDC_STATIC
  38 #define IDC_STATIC  ((DWORD)-1)
  39 #endif
  40
  41 #define CALC_VERSION        TEXT("1.11")
  42
  43 #define MAX_CALC_SIZE       256
  44
  45 /*#define USE_KEYBOARD_HOOK*/
  46
  47 #define SIZEOF(_ar)     (sizeof(_ar)/sizeof(_ar[1]))
  48
  49 // RPN.C
  50
  51 enum {
  52     RPN_OPERATOR_PARENT,
  53     RPN_OPERATOR_PERCENT,
  54     RPN_OPERATOR_EQUAL,
  55
  56     RPN_OPERATOR_OR,
  57     RPN_OPERATOR_XOR,
  58     RPN_OPERATOR_AND,
  59     RPN_OPERATOR_LSH,
  60     RPN_OPERATOR_RSH,
  61     RPN_OPERATOR_ADD,
  62     RPN_OPERATOR_SUB,
  63     RPN_OPERATOR_MULT,
  64     RPN_OPERATOR_DIV,
  65     RPN_OPERATOR_MOD,
  66     RPN_OPERATOR_POW,
  67     RPN_OPERATOR_SQR,
  68
  69     RPN_OPERATOR_NONE
  70 };
  71
  72 typedef union {
  73 #ifdef ENABLE_MULTI_PRECISION
  74     mpfr_t  mf;
  75 #else
  76     double  f;
  77     INT64   i;
  78     UINT64  u;
  79 #endif
  80 } calc_number_t;
  81
  82 typedef struct {
  83     calc_number_t number;
  84     unsigned int  operation;
  85     DWORD         base;
  86 } calc_node_t;
  87
  88 void run_operator(calc_node_t *result, calc_node_t *a,
  89                   calc_node_t *b, unsigned int operation);
  90 int  exec_infix2postfix(calc_number_t *, unsigned int);
  91 void exec_closeparent(calc_number_t *);
  92 int  eval_parent_count(void);
  93 void flush_postfix(void);
  94 void exec_change_infix(void);
  95 void start_rpn_engine(void);
  96 void stop_rpn_engine(void);
  97
  98 typedef struct {
  99     char *data;
 100     char *ptr;
 101     UINT  wm_msg;
 102 } sequence_t;
 103
 104 typedef struct {
 105     calc_number_t    num;
 106     DWORD            base;
 107     void            *next;
 108 } statistic_t;
 109
 110 enum {
 111     CALC_LAYOUT_SCIENTIFIC=0,
 112     CALC_LAYOUT_STANDARD,
 113     CALC_LAYOUT_CONVERSION,
 114 };
 115
 116 typedef struct {
 117     HINSTANCE     hInstance;
 118 #ifdef USE_KEYBOARD_HOOK
 119     HHOOK         hKeyboardHook;
 120 #endif
 121     HWND          hWnd;
 122     DWORD         layout;
 123     TCHAR         buffer[MAX_CALC_SIZE];
 124     TCHAR         source[MAX_CALC_SIZE];
 125     TCHAR        *ptr;
 126     calc_number_t code;
 127     calc_number_t prev;
 128     calc_node_t   memory;
 129     statistic_t  *stat;
 130     BOOL          is_memory;
 131     BOOL          is_nan;
 132     BOOL          sci_out;
 133     BOOL          sci_in;
 134     BOOL          usesep;
 135     BOOL          is_menu_on;
 136     signed int    esp;
 137     DWORD         base;
 138     DWORD         size;
 139     DWORD         degr;
 140     DWORD         action;
 141     HWND          hStatWnd;
 142     HWND          hConvWnd;
 143     sequence_t    Clipboard;
 144     sequence_t    Convert[2];
 145     unsigned int  last_operator;
 146     unsigned int  prev_operator;
 147     TCHAR         sDecimal[8];
 148     TCHAR         sThousand[8];
 149     unsigned int  sDecimal_len;
 150     unsigned int  sThousand_len;
 151     signed int    x_coord;
 152     signed int    y_coord;
 153 } calc_t;
 154
 155 extern calc_t calc;
 156
 157 #define CALC_E      2.7182818284590452354
 158
 159 #define CALC_PI_2   1.57079632679489661923
 160 #define CALC_PI     3.14159265358979323846
 161 #define CALC_3_PI_2 4.71238898038468985769
 162 #define CALC_2_PI   6.283185307179586476925
 163
 164 #define MODIFIER_INV    0x01
 165 #define MODIFIER_HYP    0x02
 166 #define NO_CHAIN        0x04
 167
 168 void apply_int_mask(calc_number_t *a);
 169 #ifdef ENABLE_MULTI_PRECISION
 170 void validate_rad2angle(calc_number_t *c);
 171 void validate_angle2rad(calc_number_t *c);
 172 #else
 173 __int64 logic_dbl2int(calc_number_t *a);
 174 double logic_int2dbl(calc_number_t *a);
 175 double validate_rad2angle(double a);
 176 double validate_angle2rad(calc_number_t *c);
 177 #endif
 178 void rpn_sin(calc_number_t *c);
 179 void rpn_cos(calc_number_t *c);
 180 void rpn_tan(calc_number_t *c);
 181 void rpn_asin(calc_number_t *c);
 182 void rpn_acos(calc_number_t *c);
 183 void rpn_atan(calc_number_t *c);
 184 void rpn_sinh(calc_number_t *c);
 185 void rpn_cosh(calc_number_t *c);
 186 void rpn_tanh(calc_number_t *c);
 187 void rpn_asinh(calc_number_t *c);
 188 void rpn_acosh(calc_number_t *c);
 189 void rpn_atanh(calc_number_t *c);
 190 BOOL rpn_validate_result(calc_number_t *c);
 191 void rpn_int(calc_number_t *c);
 192 void rpn_frac(calc_number_t *c);
 193 void rpn_reci(calc_number_t *c);
 194 void rpn_fact(calc_number_t *c);
 195 void rpn_not(calc_number_t *c);
 196 void rpn_pi(calc_number_t *c);
 197 void rpn_2pi(calc_number_t *c);
 198 void rpn_sign(calc_number_t *c);
 199 void rpn_exp2(calc_number_t *c);
 200 void rpn_exp3(calc_number_t *c);
 201 void rpn_sqrt(calc_number_t *c);
 202 void rpn_cbrt(calc_number_t *c);
 203 void rpn_exp(calc_number_t *c);
 204 void rpn_exp10(calc_number_t *c);
 205 void rpn_ln(calc_number_t *c);
 206 void rpn_log(calc_number_t *c);
 207 void rpn_ave(calc_number_t *c);
 208 void rpn_sum(calc_number_t *c);
 209 void rpn_s(calc_number_t *c);
 210 void rpn_s_m1(calc_number_t *c);
 211 void rpn_dms2dec(calc_number_t *c);
 212 void rpn_dec2dms(calc_number_t *c);
 213 void rpn_zero(calc_number_t *c);
 214 void rpn_copy(calc_number_t *dst, calc_number_t *src);
 215 int  rpn_is_zero(calc_number_t *c);
 216 void rpn_alloc(calc_number_t *c);
 217 void rpn_free(calc_number_t *c);
 218
 219 void prepare_rpn_result_2(calc_number_t *rpn, TCHAR *buffer, int size, int base);
 220 void convert_text2number_2(calc_number_t *a);
 221 void convert_real_integer(unsigned int base);
 222
 223 INT_PTR CALLBACK AboutDlgProc(HWND hWnd, UINT msg, WPARAM wp, LPARAM lp);
 224
 225 void ConvExecute(HWND hWnd);
 226 void ConvAdjust(HWND hWnd, int n_cat);
 227 void ConvInit(HWND hWnd);