1/* number.h: Arbitrary precision numbers header file. */ 2/* 3 Copyright (C) 1991, 1992, 1993, 1994, 1997, 2000 Free Software Foundation, Inc. 4 5 This program is free software; you can redistribute it and/or modify 6 it under the terms of the GNU General Public License as published by 7 the Free Software Foundation; either version 2 of the License , or 8 (at your option) any later version. 9 10 This program is distributed in the hope that it will be useful, 11 but WITHOUT ANY WARRANTY; without even the implied warranty of 12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 13 GNU General Public License for more details. 14 15 You should have received a copy of the GNU General Public License 16 along with this program; see the file COPYING. If not, write to: 17 18 The Free Software Foundation, Inc. 19 59 Temple Place, Suite 330 20 Boston, MA 02111-1307 USA. 21 22 23 You may contact the author by: 24 e-mail: philnelson@acm.org 25 us-mail: Philip A. Nelson 26 Computer Science Department, 9062 27 Western Washington University 28 Bellingham, WA 98226-9062 29 30*************************************************************************/ 31 32#ifndef _NUMBER_H_ 33#define _NUMBER_H_ 34 35typedef enum {PLUS, MINUS} sign; 36 37typedef struct bc_struct *bc_num; 38 39typedef struct bc_struct 40 { 41 sign n_sign; 42 int n_len; /* The number of digits before the decimal point. */ 43 int n_scale; /* The number of digits after the decimal point. */ 44 int n_refs; /* The number of pointers to this number. */ 45 bc_num n_next; /* Linked list for available list. */ 46 char *n_ptr; /* The pointer to the actual storage. 47 If NULL, n_value points to the inside of 48 another number (bc_multiply...) and should 49 not be "freed." */ 50 char *n_value; /* The number. Not zero char terminated. 51 May not point to the same place as n_ptr as 52 in the case of leading zeros generated. */ 53 } bc_struct; 54 55 56/* The base used in storing the numbers in n_value above. 57 Currently this MUST be 10. */ 58 59#define BASE 10 60 61/* Some useful macros and constants. */ 62 63#define CH_VAL(c) (c - '0') 64#define BCD_CHAR(d) (d + '0') 65 66#ifdef MIN 67#undef MIN 68#undef MAX 69#endif 70#define MAX(a,b) ((a)>(b)?(a):(b)) 71#define MIN(a,b) ((a)>(b)?(b):(a)) 72#define ODD(a) ((a)&1) 73 74#ifndef TRUE 75#define TRUE 1 76#define FALSE 0 77#endif 78 79#ifndef LONG_MAX 80#define LONG_MAX 0x7ffffff 81#endif 82 83 84/* Global numbers. */ 85extern bc_num _zero_; 86extern bc_num _one_; 87extern bc_num _two_; 88 89 90/* Function Prototypes */ 91 92/* Define the _PROTOTYPE macro if it is needed. */ 93 94#ifndef _PROTOTYPE 95#ifdef __STDC__ 96#define _PROTOTYPE(func, args) func args 97#else 98#define _PROTOTYPE(func, args) func() 99#endif 100#endif 101 102_PROTOTYPE(void bc_init_numbers, (void)); 103 104_PROTOTYPE(bc_num bc_new_num, (int length, int scale)); 105 106_PROTOTYPE(void bc_free_num, (bc_num *num)); 107 108_PROTOTYPE(bc_num bc_copy_num, (bc_num num)); 109 110_PROTOTYPE(void bc_init_num, (bc_num *num)); 111 112_PROTOTYPE(void bc_str2num, (bc_num *num, char *str, int scale)); 113 114_PROTOTYPE(char *bc_num2str, (bc_num num)); 115 116_PROTOTYPE(void bc_int2num, (bc_num *num, int val)); 117 118_PROTOTYPE(long bc_num2long, (bc_num num)); 119 120_PROTOTYPE(int bc_compare, (bc_num n1, bc_num n2)); 121 122_PROTOTYPE(char bc_is_zero, (bc_num num)); 123 124_PROTOTYPE(char bc_is_near_zero, (bc_num num, int scale)); 125 126_PROTOTYPE(char bc_is_neg, (bc_num num)); 127 128_PROTOTYPE(void bc_add, (bc_num n1, bc_num n2, bc_num *result, int scale_min)); 129 130_PROTOTYPE(void bc_sub, (bc_num n1, bc_num n2, bc_num *result, int scale_min)); 131 132_PROTOTYPE(void bc_multiply, (bc_num n1, bc_num n2, bc_num *prod, int scale)); 133 134_PROTOTYPE(int bc_divide, (bc_num n1, bc_num n2, bc_num *quot, int scale)); 135 136_PROTOTYPE(int bc_modulo, (bc_num num1, bc_num num2, bc_num *result, 137 int scale)); 138 139_PROTOTYPE(int bc_divmod, (bc_num num1, bc_num num2, bc_num *quot, 140 bc_num *rem, int scale)); 141 142_PROTOTYPE(int bc_raisemod, (bc_num base, bc_num expo, bc_num mod, 143 bc_num *result, int scale)); 144 145_PROTOTYPE(void bc_raise, (bc_num num1, bc_num num2, bc_num *result, 146 int scale)); 147 148_PROTOTYPE(int bc_sqrt, (bc_num *num, int scale)); 149 150_PROTOTYPE(void bc_out_num, (bc_num num, int o_base, void (* out_char)(int), 151 int leading_zero)); 152 153#endif 154