Ruby  2.4.2p198(2017-09-14revision59899)
Data Structures | Macros | Typedefs | Functions | Variables
util.c File Reference
#include "internal.h"
#include <ctype.h>
#include <stdio.h>
#include <errno.h>
#include <math.h>
#include <float.h>
#include "ruby/util.h"
#include <sys/types.h>
#include <sys/stat.h>
#include "stdlib.h"
#include "string.h"
Include dependency graph for util.c:

Go to the source code of this file.

Data Structures

struct  stack_node
 
union  U
 
struct  Bigint
 

Macros

#define hexdigit   ruby_hexdigits
 
#define S_ISDIR(m)   (((m) & S_IFMT) == S_IFDIR)
 
#define mmtype   long
 
#define mmcount   (16 / SIZEOF_LONG)
 
#define A   ((mmtype*)a)
 
#define B   ((mmtype*)b)
 
#define C   ((mmtype*)c)
 
#define D   ((mmtype*)d)
 
#define mmstep   (sizeof(mmtype) * mmcount)
 
#define mmprepare(base, size)
 
#define mmarg   mmkind, size, high, low
 
#define mmargdecl   int mmkind, size_t size, size_t high, size_t low
 
#define mmswap(a, b)   mmswap_((a),(b),mmarg)
 
#define mmrot3(a, b, c)   mmrot3_((a),(b),(c),mmarg)
 
#define PUSH(ll, rr)   do { top->LL = (ll); top->RR = (rr); ++top; } while (0) /* Push L,l,R,r */
 
#define POP(ll, rr)   do { --top; (ll) = top->LL; (rr) = top->RR; } while (0) /* Pop L,l,R,r */
 
#define med3(a, b, c)
 
#define PATH_MAX   8192
 
#define IEEE_LITTLE_ENDIAN
 
#define MALLOC   xmalloc
 
#define FREE   xfree
 
#define PRIVATE_MEM   2304
 
#define PRIVATE_mem   ((PRIVATE_MEM+sizeof(double)-1)/sizeof(double))
 
#define IEEE_Arith
 
#define word0(x)   ((x).L[1])
 
#define word1(x)   ((x).L[0])
 
#define dval(x)   ((x).d)
 
#define Storeinc(a, b, c)
 
#define Exp_shift   20
 
#define Exp_shift1   20
 
#define Exp_msk1   0x100000
 
#define Exp_msk11   0x100000
 
#define Exp_mask   0x7ff00000
 
#define P   53
 
#define Bias   1023
 
#define Emin   (-1022)
 
#define Exp_1   0x3ff00000
 
#define Exp_11   0x3ff00000
 
#define Ebits   11
 
#define Frac_mask   0xfffff
 
#define Frac_mask1   0xfffff
 
#define Ten_pmax   22
 
#define Bletch   0x10
 
#define Bndry_mask   0xfffff
 
#define Bndry_mask1   0xfffff
 
#define LSB   1
 
#define Sign_bit   0x80000000
 
#define Log2P   1
 
#define Tiny0   0
 
#define Tiny1   1
 
#define Quick_max   14
 
#define Int_max   14
 
#define Avoid_Underflow
 
#define Flt_Rounds   1
 
#define Rounding   Flt_Rounds
 
#define rounded_product(a, b)   ((a) *= (b))
 
#define rounded_quotient(a, b)   ((a) /= (b))
 
#define Big0   (Frac_mask1 | Exp_msk1*(DBL_MAX_EXP+Bias-1))
 
#define Big1   0xffffffff
 
#define Pack_32
 
#define FFFFFFFF   0xffffffffUL
 
#define Llong   long long
 
#define ULLong   unsigned Llong
 
#define MULTIPLE_THREADS   1
 
#define ACQUIRE_DTOA_LOCK(n)   /*unused right now*/
 
#define FREE_DTOA_LOCK(n)   /*unused right now*/
 
#define Kmax   15
 
#define Bcopy(x, y)
 
#define d0   word0(d)
 
#define d1   word1(d)
 
#define d0   word0(d)
 
#define d1   word1(d)
 
#define Scale_Bit   0x10
 
#define n_bigtens   5
 
#define rv_alloc(i)   xmalloc(i)
 
#define rv_strdup(s, rve)   nrv_alloc((s), (rve), strlen(s)+1)
 
#define DBL_MANH_SIZE   20
 
#define DBL_MANL_SIZE   32
 
#define DBL_ADJ   (DBL_MAX_EXP - 2)
 
#define SIGFIGS   ((DBL_MANT_DIG + 3) / 4 + 1)
 
#define dexp_get(u)   ((int)(word0(u) >> Exp_shift) & ~Exp_msk1)
 
#define dexp_set(u, v)   (word0(u) = (((int)(word0(u)) & ~Exp_mask) | ((v) << Exp_shift)))
 
#define dmanh_get(u)   ((uint32_t)(word0(u) & Frac_mask))
 
#define dmanl_get(u)   ((uint32_t)word1(u))
 

Typedefs

typedef int() cmpfunc_t(const void *, const void *, void *)
 
typedef U double_u
 
typedef struct Bigint Bigint
 

Functions

unsigned long ruby_scan_oct (const char *start, size_t len, size_t *retlen)
 
unsigned long ruby_scan_hex (const char *start, size_t len, size_t *retlen)
 
unsigned long ruby_scan_digits (const char *str, ssize_t len, int base, size_t *retlen, int *overflow)
 
unsigned long ruby_strtoul (const char *str, char **endptr, int base)
 
static void mmswap_ (register char *a, register char *b, mmargdecl)
 
static void mmrot3_ (register char *a, register char *b, register char *c, mmargdecl)
 
void ruby_qsort (void *base, const size_t nel, const size_t size, cmpfunc_t *cmp, void *d)
 
char * ruby_strdup (const char *str)
 
char * ruby_getcwd (void)
 
static BigintBalloc (int k)
 
static void Bfree (Bigint *v)
 
static Bigintmultadd (Bigint *b, int m, int a)
 
static Bigints2b (const char *s, int nd0, int nd, ULong y9)
 
static int hi0bits (register ULong x)
 
static int lo0bits (ULong *y)
 
static Biginti2b (int i)
 
static Bigintmult (Bigint *a, Bigint *b)
 
static Bigintpow5mult (Bigint *b, int k)
 
static Bigintlshift (Bigint *b, int k)
 
static int cmp (Bigint *a, Bigint *b)
 
static Bigintdiff (Bigint *a, Bigint *b)
 
static double ulp (double x_)
 
static double b2d (Bigint *a, int *e)
 
static Bigintd2b (double d_, int *e, int *bits)
 
static double ratio (Bigint *a, Bigint *b)
 
double ruby_strtod (const char *s00, char **se)
 
static int quorem (Bigint *b, Bigint *S)
 
static char * nrv_alloc (const char *s, char **rve, size_t n)
 
char * ruby_dtoa (double d_, int mode, int ndigits, int *decpt, int *sign, char **rve)
 
void ruby_each_words (const char *str, void(*func)(const char *, int, void *), void *arg)
 
char * ruby_hdtoa (double d, const char *xdigs, int ndigits, int *decpt, int *sign, char **rve)
 

Variables

const char ruby_hexdigits [] = "0123456789abcdef0123456789ABCDEF"
 
const signed char ruby_digit36_to_number_table []
 
static double private_mem [PRIVATE_mem]
 
static double * pmem_next = private_mem
 
static Bigintfreelist [Kmax+1]
 
static Bigintp5s
 
static const double tens []
 
static const double bigtens [] = { 1e16, 1e32, 1e64, 1e128, 1e256 }
 
static const double tinytens []
 
static const char INFSTR [] = "Infinity"
 
static const char NANSTR [] = "NaN"
 
static const char ZEROSTR [] = "0"
 

Macro Definition Documentation

◆ A

#define A   ((mmtype*)a)

Definition at line 231 of file util.c.

◆ ACQUIRE_DTOA_LOCK

#define ACQUIRE_DTOA_LOCK (   n)    /*unused right now*/

Definition at line 1031 of file util.c.

Referenced by Balloc(), Bfree(), and pow5mult().

◆ Avoid_Underflow

#define Avoid_Underflow

Definition at line 901 of file util.c.

Referenced by ruby_strtod().

◆ B

#define B   ((mmtype*)b)

Definition at line 232 of file util.c.

Referenced by des_cipher_r().

◆ Bcopy

#define Bcopy (   x,
 
)
Value:
memcpy((char *)&(x)->sign, (char *)&(y)->sign, \
(y)->wds*sizeof(Long) + 2*sizeof(int))
#define memcpy(d, s, n)
Definition: ffi_common.h:55

Definition at line 1097 of file util.c.

Referenced by multadd(), ruby_dtoa(), and ruby_strtod().

◆ Bias

#define Bias   1023

Definition at line 882 of file util.c.

Referenced by d2b(), ruby_dtoa(), and ruby_strtod().

◆ Big0

#define Big0   (Frac_mask1 | Exp_msk1*(DBL_MAX_EXP+Bias-1))

Definition at line 997 of file util.c.

Referenced by ruby_strtod().

◆ Big1

#define Big1   0xffffffff

Definition at line 998 of file util.c.

Referenced by ruby_strtod().

◆ Bletch

#define Bletch   0x10

Definition at line 890 of file util.c.

Referenced by ruby_dtoa().

◆ Bndry_mask

#define Bndry_mask   0xfffff

Definition at line 891 of file util.c.

Referenced by ruby_dtoa(), and ruby_strtod().

◆ Bndry_mask1

#define Bndry_mask1   0xfffff

Definition at line 892 of file util.c.

Referenced by ruby_strtod().

◆ C

#define C   ((mmtype*)c)

Definition at line 233 of file util.c.

◆ D

#define D   ((mmtype*)d)

Definition at line 234 of file util.c.

Referenced by permute().

◆ d0 [1/2]

#define d0   word0(d)

Referenced by b2d(), and d2b().

◆ d0 [2/2]

#define d0   word0(d)

◆ d1 [1/2]

#define d1   word1(d)

◆ d1 [2/2]

#define d1   word1(d)

◆ DBL_ADJ

#define DBL_ADJ   (DBL_MAX_EXP - 2)

Definition at line 3858 of file util.c.

Referenced by ruby_hdtoa().

◆ DBL_MANH_SIZE

#define DBL_MANH_SIZE   20

Definition at line 3856 of file util.c.

Referenced by ruby_hdtoa().

◆ DBL_MANL_SIZE

#define DBL_MANL_SIZE   32

Definition at line 3857 of file util.c.

Referenced by ruby_hdtoa().

◆ dexp_get

#define dexp_get (   u)    ((int)(word0(u) >> Exp_shift) & ~Exp_msk1)

Definition at line 3860 of file util.c.

Referenced by ruby_hdtoa().

◆ dexp_set

#define dexp_set (   u,
 
)    (word0(u) = (((int)(word0(u)) & ~Exp_mask) | ((v) << Exp_shift)))

Definition at line 3861 of file util.c.

Referenced by ruby_hdtoa().

◆ dmanh_get

#define dmanh_get (   u)    ((uint32_t)(word0(u) & Frac_mask))

Definition at line 3862 of file util.c.

Referenced by ruby_hdtoa().

◆ dmanl_get

#define dmanl_get (   u)    ((uint32_t)word1(u))

Definition at line 3863 of file util.c.

Referenced by ruby_hdtoa().

◆ dval

#define dval (   x)    ((x).d)

Definition at line 854 of file util.c.

Referenced by b2d(), d2b(), ratio(), ruby_dtoa(), ruby_strtod(), and ulp().

◆ Ebits

#define Ebits   11

Definition at line 886 of file util.c.

Referenced by b2d().

◆ Emin

#define Emin   (-1022)

Definition at line 883 of file util.c.

Referenced by ruby_strtod().

◆ Exp_1

#define Exp_1   0x3ff00000

Definition at line 884 of file util.c.

Referenced by b2d(), ruby_dtoa(), and ruby_strtod().

◆ Exp_11

#define Exp_11   0x3ff00000

Definition at line 885 of file util.c.

Referenced by ruby_dtoa().

◆ Exp_mask

#define Exp_mask   0x7ff00000

Definition at line 880 of file util.c.

Referenced by ruby_dtoa(), ruby_strtod(), and ulp().

◆ Exp_msk1

#define Exp_msk1   0x100000

Definition at line 878 of file util.c.

Referenced by d2b(), ratio(), ruby_dtoa(), ruby_strtod(), and ulp().

◆ Exp_msk11

#define Exp_msk11   0x100000

Definition at line 879 of file util.c.

Referenced by d2b().

◆ Exp_shift

#define Exp_shift   20

Definition at line 876 of file util.c.

Referenced by d2b(), ruby_dtoa(), ruby_strtod(), and ulp().

◆ Exp_shift1

#define Exp_shift1   20

Definition at line 877 of file util.c.

Referenced by ruby_dtoa().

◆ FFFFFFFF

#define FFFFFFFF   0xffffffffUL

Definition at line 1004 of file util.c.

Referenced by diff(), mult(), multadd(), and quorem().

◆ Flt_Rounds

#define Flt_Rounds   1

Definition at line 911 of file util.c.

Referenced by ruby_dtoa(), and ruby_strtod().

◆ Frac_mask

#define Frac_mask   0xfffff

Definition at line 887 of file util.c.

Referenced by d2b(), ruby_dtoa(), and ruby_strtod().

◆ Frac_mask1

#define Frac_mask1   0xfffff

Definition at line 888 of file util.c.

Referenced by ruby_dtoa().

◆ FREE

#define FREE   xfree

Definition at line 765 of file util.c.

Referenced by Bfree().

◆ FREE_DTOA_LOCK

#define FREE_DTOA_LOCK (   n)    /*unused right now*/

Definition at line 1032 of file util.c.

Referenced by Balloc(), Bfree(), and pow5mult().

◆ hexdigit

#define hexdigit   ruby_hexdigits

Definition at line 31 of file util.c.

Referenced by ruby_scan_hex(), and ruby_strtod().

◆ IEEE_Arith

#define IEEE_Arith

Definition at line 782 of file util.c.

Referenced by ruby_strtod().

◆ IEEE_LITTLE_ENDIAN

#define IEEE_LITTLE_ENDIAN

Definition at line 716 of file util.c.

◆ Int_max

#define Int_max   14

Definition at line 899 of file util.c.

Referenced by ruby_dtoa().

◆ Kmax

#define Kmax   15

Definition at line 1035 of file util.c.

Referenced by Balloc(), and Bfree().

◆ Llong

#define Llong   long long

Definition at line 1018 of file util.c.

◆ Log2P

#define Log2P   1

Definition at line 895 of file util.c.

Referenced by ruby_dtoa(), and ruby_strtod().

◆ LSB

#define LSB   1

Definition at line 893 of file util.c.

Referenced by ruby_strtod().

◆ MALLOC

#define MALLOC   xmalloc

Definition at line 760 of file util.c.

Referenced by Balloc().

◆ med3

#define med3 (   a,
  b,
 
)
Value:
((*cmp)((a),(b),d)<0 ? \
((*cmp)((b),(c),d)<0 ? (b) : ((*cmp)((a),(c),d)<0 ? (c) : (a))) : \
((*cmp)((b),(c),d)>0 ? (b) : ((*cmp)((a),(c),d)<0 ? (a) : (c))))
static int cmp(Bigint *a, Bigint *b)
Definition: util.c:1478

Definition at line 338 of file util.c.

Referenced by ruby_qsort().

◆ mmarg

#define mmarg   mmkind, size, high, low

Definition at line 246 of file util.c.

◆ mmargdecl

#define mmargdecl   int mmkind, size_t size, size_t high, size_t low

Definition at line 247 of file util.c.

◆ mmcount

#define mmcount   (16 / SIZEOF_LONG)

Definition at line 230 of file util.c.

◆ mmprepare

#define mmprepare (   base,
  size 
)
Value:
do {\
if (((VALUE)(base) % sizeof(mmtype)) == 0 && ((size) % sizeof(mmtype)) == 0) \
if ((size) >= mmstep) mmkind = 1;\
else mmkind = 0;\
else mmkind = -1;\
high = ((size) / mmstep) * mmstep;\
low = ((size) % mmstep);\
} while (0)\
#define mmstep
Definition: util.c:236
unsigned long VALUE
Definition: ruby.h:85
#define mmtype
Definition: util.c:229
int size
Definition: encoding.c:57

Definition at line 237 of file util.c.

Referenced by ruby_qsort().

◆ mmrot3

#define mmrot3 (   a,
  b,
 
)    mmrot3_((a),(b),(c),mmarg)

Definition at line 323 of file util.c.

Referenced by ruby_qsort().

◆ mmstep

#define mmstep   (sizeof(mmtype) * mmcount)

Definition at line 236 of file util.c.

Referenced by mmrot3_(), and mmswap_().

◆ mmswap

#define mmswap (   a,
 
)    mmswap_((a),(b),mmarg)

Definition at line 285 of file util.c.

Referenced by ruby_qsort().

◆ mmtype

#define mmtype   long

Definition at line 229 of file util.c.

Referenced by mmrot3_(), and mmswap_().

◆ MULTIPLE_THREADS

#define MULTIPLE_THREADS   1

Definition at line 1025 of file util.c.

◆ n_bigtens

#define n_bigtens   5

Definition at line 1892 of file util.c.

Referenced by ruby_dtoa(), and ruby_strtod().

◆ P

#define P   53

Definition at line 881 of file util.c.

Referenced by d2b(), ruby_dtoa(), ruby_strtod(), and ulp().

◆ Pack_32

#define Pack_32

Definition at line 1001 of file util.c.

◆ PATH_MAX

#define PATH_MAX   8192

◆ POP

#define POP (   ll,
  rr 
)    do { --top; (ll) = top->LL; (rr) = top->RR; } while (0) /* Pop L,l,R,r */

Definition at line 336 of file util.c.

Referenced by ruby_qsort().

◆ PRIVATE_MEM

#define PRIVATE_MEM   2304

Definition at line 770 of file util.c.

◆ PRIVATE_mem

#define PRIVATE_mem   ((PRIVATE_MEM+sizeof(double)-1)/sizeof(double))

Definition at line 772 of file util.c.

Referenced by Balloc().

◆ PUSH

#define PUSH (   ll,
  rr 
)    do { top->LL = (ll); top->RR = (rr); ++top; } while (0) /* Push L,l,R,r */

Definition at line 335 of file util.c.

Referenced by ruby_qsort().

◆ Quick_max

#define Quick_max   14

Definition at line 898 of file util.c.

Referenced by ruby_dtoa().

◆ rounded_product

#define rounded_product (   a,
 
)    ((a) *= (b))

Definition at line 993 of file util.c.

Referenced by ruby_strtod().

◆ rounded_quotient

#define rounded_quotient (   a,
 
)    ((a) /= (b))

Definition at line 994 of file util.c.

Referenced by ruby_strtod().

◆ Rounding

#define Rounding   Flt_Rounds

Definition at line 920 of file util.c.

Referenced by ruby_dtoa(), and ruby_strtod().

◆ rv_alloc

#define rv_alloc (   i)    xmalloc(i)

Definition at line 3066 of file util.c.

Referenced by nrv_alloc(), quorem(), ruby_dtoa(), and ruby_hdtoa().

◆ rv_strdup

#define rv_strdup (   s,
  rve 
)    nrv_alloc((s), (rve), strlen(s)+1)

Definition at line 3081 of file util.c.

Referenced by ruby_dtoa(), and ruby_hdtoa().

◆ S_ISDIR

#define S_ISDIR (   m)    (((m) & S_IFMT) == S_IFDIR)

Definition at line 195 of file util.c.

◆ Scale_Bit

#define Scale_Bit   0x10

Definition at line 1891 of file util.c.

Referenced by ruby_strtod().

◆ SIGFIGS

#define SIGFIGS   ((DBL_MANT_DIG + 3) / 4 + 1)

Definition at line 3859 of file util.c.

Referenced by ruby_hdtoa().

◆ Sign_bit

#define Sign_bit   0x80000000

Definition at line 894 of file util.c.

Referenced by ruby_dtoa(), and ruby_hdtoa().

◆ Storeinc

#define Storeinc (   a,
  b,
 
)
Value:
(((unsigned short *)(a))[1] = (unsigned short)(b), \
((unsigned short *)(a))[0] = (unsigned short)(c), (a)++)

Definition at line 862 of file util.c.

Referenced by diff(), mult(), and quorem().

◆ Ten_pmax

#define Ten_pmax   22

Definition at line 889 of file util.c.

Referenced by ruby_dtoa(), and ruby_strtod().

◆ Tiny0

#define Tiny0   0

Definition at line 896 of file util.c.

Referenced by ruby_strtod().

◆ Tiny1

#define Tiny1   1

Definition at line 897 of file util.c.

Referenced by ruby_strtod().

◆ ULLong

#define ULLong   unsigned Llong

Definition at line 1021 of file util.c.

Referenced by diff(), mult(), multadd(), and quorem().

◆ word0

#define word0 (   x)    ((x).L[1])

Definition at line 848 of file util.c.

Referenced by b2d(), d2b(), ratio(), ruby_dtoa(), ruby_hdtoa(), ruby_strtod(), and ulp().

◆ word1

#define word1 (   x)    ((x).L[0])

Definition at line 849 of file util.c.

Referenced by b2d(), d2b(), ruby_dtoa(), ruby_strtod(), and ulp().

Typedef Documentation

◆ Bigint

typedef struct Bigint Bigint

Definition at line 1043 of file util.c.

◆ cmpfunc_t

typedef int() cmpfunc_t(const void *, const void *, void *)

Definition at line 342 of file util.c.

◆ double_u

typedef U double_u

Definition at line 846 of file util.c.

Function Documentation

◆ b2d()

static double b2d ( Bigint a,
int *  e 
)
static

Definition at line 1631 of file util.c.

References d0, d1, dval, Ebits, Exp_1, hi0bits(), Bigint::k, Bigint::wds, word0, word1, and Bigint::x.

Referenced by ratio().

◆ Balloc()

static Bigint* Balloc ( int  k)
static

◆ Bfree()

static void Bfree ( Bigint v)
static

Definition at line 1083 of file util.c.

References ACQUIRE_DTOA_LOCK, FREE, FREE_DTOA_LOCK, Bigint::k, Kmax, and Bigint::next.

Referenced by lshift(), multadd(), pow5mult(), ruby_dtoa(), and ruby_strtod().

◆ cmp()

static int cmp ( Bigint a,
Bigint b 
)
static

Definition at line 1478 of file util.c.

References Bigint::wds, and Bigint::x.

Referenced by diff(), quorem(), ruby_dtoa(), and ruby_strtod().

◆ d2b()

static Bigint* d2b ( double  d_,
int *  e,
int *  bits 
)
static

Definition at line 1696 of file util.c.

References Balloc(), Bias, d0, d1, dval, Exp_msk1, Exp_msk11, Exp_shift, Frac_mask, hi0bits(), Bigint::k, lo0bits(), P, Bigint::wds, word0, word1, and Bigint::x.

Referenced by ruby_dtoa(), and ruby_strtod().

◆ diff()

static Bigint* diff ( Bigint a,
Bigint b 
)
static

◆ hi0bits()

static int hi0bits ( register ULong  x)
static

Definition at line 1186 of file util.c.

References Bigint::k.

Referenced by b2d(), d2b(), and ruby_dtoa().

◆ i2b()

static Bigint* i2b ( int  i)
static

Definition at line 1258 of file util.c.

References Balloc(), Bigint::wds, and Bigint::x.

Referenced by pow5mult(), ruby_dtoa(), and ruby_strtod().

◆ lo0bits()

static int lo0bits ( ULong *  y)
static

Definition at line 1215 of file util.c.

References Bigint::k, and Bigint::x.

Referenced by d2b().

◆ lshift()

static Bigint* lshift ( Bigint b,
int  k 
)
static

Definition at line 1424 of file util.c.

References Balloc(), Bfree(), Bigint::k, Bigint::maxwds, Bigint::wds, and Bigint::x.

Referenced by ruby_dtoa(), and ruby_strtod().

◆ mmrot3_()

static void mmrot3_ ( register char *  a,
register char *  b,
register char *  c,
mmargdecl   
)
static

Definition at line 288 of file util.c.

References mmstep, mmtype, and size.

◆ mmswap_()

static void mmswap_ ( register char *  a,
register char *  b,
mmargdecl   
)
static

Definition at line 249 of file util.c.

References mmstep, mmtype, and size.

◆ mult()

static Bigint* mult ( Bigint a,
Bigint b 
)
static

◆ multadd()

static Bigint* multadd ( Bigint b,
int  m,
int  a 
)
static

Definition at line 1101 of file util.c.

References Balloc(), Bcopy, Bfree(), FFFFFFFF, Bigint::k, Bigint::maxwds, ULLong, Bigint::wds, and Bigint::x.

Referenced by pow5mult(), ruby_dtoa(), and s2b().

◆ nrv_alloc()

static char* nrv_alloc ( const char *  s,
char **  rve,
size_t  n 
)
static

Definition at line 3070 of file util.c.

References rv_alloc.

◆ pow5mult()

static Bigint* pow5mult ( Bigint b,
int  k 
)
static

Definition at line 1372 of file util.c.

References ACQUIRE_DTOA_LOCK, Bfree(), FREE_DTOA_LOCK, i2b(), mult(), multadd(), and Bigint::next.

Referenced by ruby_dtoa(), and ruby_strtod().

◆ quorem()

static int quorem ( Bigint b,
Bigint S 
)
static

Definition at line 2945 of file util.c.

References cmp(), FFFFFFFF, rv_alloc, Storeinc, ULLong, Bigint::wds, Bigint::x, and xmalloc.

Referenced by ruby_dtoa().

◆ ratio()

static double ratio ( Bigint a,
Bigint b 
)
static

Definition at line 1833 of file util.c.

References b2d(), dval, Exp_msk1, Bigint::k, Bigint::wds, and word0.

Referenced by ruby_strtod().

◆ ruby_dtoa()

char* ruby_dtoa ( double  d_,
int  mode,
int  ndigits,
int *  decpt,
int *  sign,
char **  rve 
)

◆ ruby_each_words()

void ruby_each_words ( const char *  str,
void(*)(const char *, int, void *)  func,
void *  arg 
)

Definition at line 3814 of file util.c.

References ISSPACE, and len.

Referenced by proc_options(), and ruby_set_debug_option().

◆ ruby_getcwd()

char* ruby_getcwd ( void  )

Definition at line 508 of file util.c.

References buf, errno, free(), NULL, PATH_MAX, rb_sys_fail(), rb_syserr_fail(), ruby_strdup(), size, xfree(), xmalloc, and xrealloc.

◆ ruby_hdtoa()

char* ruby_hdtoa ( double  d,
const char *  xdigs,
int  ndigits,
int *  decpt,
int *  sign,
char **  rve 
)

◆ ruby_qsort()

void ruby_qsort ( void *  base,
const size_t  nel,
const size_t  size,
cmpfunc_t cmp,
void *  d 
)

Definition at line 344 of file util.c.

References CHAR_BIT, fail, L, med3, mmprepare, mmrot3, mmswap, POP, PUSH, R, size, and top.

◆ ruby_scan_digits()

unsigned long ruby_scan_digits ( const char *  str,
ssize_t  len,
int  base,
size_t *  retlen,
int *  overflow 
)

◆ ruby_scan_hex()

unsigned long ruby_scan_hex ( const char *  start,
size_t  len,
size_t *  retlen 
)

Definition at line 48 of file util.c.

References hexdigit, and strchr().

Referenced by unescape_unicode_bmp(), and unescape_unicode_list().

◆ ruby_scan_oct()

unsigned long ruby_scan_oct ( const char *  start,
size_t  len,
size_t *  retlen 
)

Definition at line 34 of file util.c.

Referenced by parser_tokadd_escape(), and unescape_nonascii().

◆ ruby_strdup()

char* ruby_strdup ( const char *  str)

◆ ruby_strtod()

double ruby_strtod ( const char *  s00,
char **  se 
)

◆ ruby_strtoul()

unsigned long ruby_strtoul ( const char *  str,
char **  endptr,
int  base 
)

Definition at line 117 of file util.c.

References errno, ISSPACE, len, and ruby_scan_digits().

Referenced by rb_pipe().

◆ s2b()

static Bigint* s2b ( const char *  s,
int  nd0,
int  nd,
ULong  y9 
)
static

Definition at line 1152 of file util.c.

References Balloc(), Bigint::k, multadd(), Bigint::wds, and Bigint::x.

Referenced by ruby_strtod().

◆ ulp()

static double ulp ( double  x_)
static

Definition at line 1593 of file util.c.

References dval, Exp_mask, Exp_msk1, Exp_shift, L, P, word0, word1, and Bigint::x.

Referenced by ruby_strtod().

Variable Documentation

◆ bigtens

const double bigtens[] = { 1e16, 1e32, 1e64, 1e128, 1e256 }
static

Definition at line 1880 of file util.c.

Referenced by ruby_dtoa(), and ruby_strtod().

◆ freelist

Bigint* freelist[Kmax+1]
static

Definition at line 1045 of file util.c.

◆ INFSTR

const char INFSTR[] = "Infinity"
static

Definition at line 3097 of file util.c.

Referenced by ruby_dtoa(), and ruby_hdtoa().

◆ NANSTR

const char NANSTR[] = "NaN"
static

Definition at line 3098 of file util.c.

Referenced by ruby_dtoa(), and ruby_hdtoa().

◆ p5s

Bigint* p5s
static

Definition at line 1369 of file util.c.

◆ pmem_next

double * pmem_next = private_mem
static

Definition at line 773 of file util.c.

Referenced by Balloc().

◆ private_mem

double private_mem[PRIVATE_mem]
static

Definition at line 773 of file util.c.

Referenced by Balloc().

◆ ruby_digit36_to_number_table

const signed char ruby_digit36_to_number_table[]
Initial value:
= {
-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,
-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,
-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,
0, 1, 2, 3, 4, 5, 6, 7, 8, 9,-1,-1,-1,-1,-1,-1,
-1,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,-1,-1,-1,-1,-1,
-1,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,-1,-1,-1,-1,-1,
-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,
-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,
-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,
-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,
-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,
-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,
-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,
-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,
}

Definition at line 63 of file util.c.

Referenced by ruby_scan_digits().

◆ ruby_hexdigits

const char ruby_hexdigits[] = "0123456789abcdef0123456789ABCDEF"

Definition at line 30 of file util.c.

◆ tens

const double tens[]
static
Initial value:
= {
1e0, 1e1, 1e2, 1e3, 1e4, 1e5, 1e6, 1e7, 1e8, 1e9,
1e10, 1e11, 1e12, 1e13, 1e14, 1e15, 1e16, 1e17, 1e18, 1e19,
1e20, 1e21, 1e22
}

Definition at line 1869 of file util.c.

Referenced by ruby_dtoa(), and ruby_strtod().

◆ tinytens

const double tinytens[]
static
Initial value:
= { 1e-16, 1e-32, 1e-64, 1e-128,
9007199254740992.*9007199254740992.e-256
}

Definition at line 1881 of file util.c.

Referenced by ruby_strtod().

◆ ZEROSTR

const char ZEROSTR[] = "0"
static

Definition at line 3099 of file util.c.

Referenced by ruby_dtoa(), and ruby_hdtoa().