Ruby  2.0.0p247(2013-06-27revision41674)
Defines | Functions
ext/date/date_strftime.c File Reference
#include "ruby/ruby.h"
#include "date_tmx.h"
#include <stdlib.h>
#include <string.h>
#include <ctype.h>
#include <errno.h>

Go to the source code of this file.

Defines

#define range(low, item, hi)   (item)
#define add(x, y)   (rb_funcall((x), '+', 1, (y)))
#define sub(x, y)   (rb_funcall((x), '-', 1, (y)))
#define mul(x, y)   (rb_funcall((x), '*', 1, (y)))
#define quo(x, y)   (rb_funcall((x), rb_intern("quo"), 1, (y)))
#define div(x, y)   (rb_funcall((x), rb_intern("div"), 1, (y)))
#define mod(x, y)   (rb_funcall((x), '%', 1, (y)))
#define BIT_OF(n)   (1U<<(n))
#define FLAG_FOUND()
#define NEEDS(n)   do if (s >= endp || (n) >= endp - s - 1) goto err; while (0)
#define FILL_PADDING(i)
#define FMT(def_pad, def_prec, fmt, val)
#define STRFTIME(fmt)
#define FMTV(def_pad, def_prec, fmt, val)

Functions

static void upcase (char *s, size_t i)
static void downcase (char *s, size_t i)
static size_t date_strftime_with_tmx (char *s, size_t maxsize, const char *format, const struct tmx *tmx)
size_t date_strftime (char *s, size_t maxsize, const char *format, const struct tmx *tmx)

Define Documentation

#define add (   x,
 
)    (rb_funcall((x), '+', 1, (y)))
#define BIT_OF (   n)    (1U<<(n))
#define div (   x,
 
)    (rb_funcall((x), rb_intern("div"), 1, (y)))
#define FILL_PADDING (   i)
Value:
do {                                            \
            if (!(flags & BIT_OF(LEFT)) && precision > (i)) {           \
                NEEDS(precision);                                       \
                memset(s, padding ? padding : ' ', precision - (i));    \
                s += precision - (i);                                   \
            }                                                           \
            else {                                                      \
                NEEDS(i);                                               \
            }                                                           \
        } while (0);

Referenced by date_strftime_with_tmx(), and rb_strftime_with_timespec().

#define FLAG_FOUND ( )
Value:
do {                                            \
            if (precision > 0 || flags & (BIT_OF(LOCALE_E) | BIT_OF(LOCALE_O) | BIT_OF(COLONS))) \
                goto unknown;                                           \
        } while (0)

Referenced by date_strftime_with_tmx(), and rb_strftime_with_timespec().

#define FMT (   def_pad,
  def_prec,
  fmt,
  val 
)
Value:
do {                                                            \
            int l;                                                      \
            if (precision <= 0) precision = (def_prec);                 \
            if (flags & BIT_OF(LEFT)) precision = 1;                    \
            l = snprintf(s, endp - s,                                   \
                         ((padding == '0' || (!padding && (def_pad) == '0')) ? \
                          "%0*"fmt : "%*"fmt),                          \
                         precision, (val));                             \
            if (l < 0) goto err;                                        \
            s += l;                                                     \
        } while (0)

Referenced by date_strftime_with_tmx(), and rb_strftime_with_timespec().

#define FMTV (   def_pad,
  def_prec,
  fmt,
  val 
)
Value:
do {                                                            \
	    VALUE tmp = (val);                                         \
            if (FIXNUM_P(tmp)) {                                        \
                FMT((def_pad), (def_prec), "l"fmt, FIX2LONG(tmp));      \
            }                                                           \
            else {                                                      \
		VALUE args[2], result;                                        \
                size_t l;                                               \
                if (precision <= 0) precision = (def_prec);             \
                if (flags & BIT_OF(LEFT)) precision = 1;                \
                args[0] = INT2FIX(precision);                           \
                args[1] = (val);                                        \
                if (padding == '0' || (!padding && (def_pad) == '0'))   \
                    result = rb_str_format(2, args, rb_str_new2("%0*"fmt)); \
                else                                                    \
                    result = rb_str_format(2, args, rb_str_new2("%*"fmt)); \
                l = strlcpy(s, StringValueCStr(result), endp - s);      \
                if ((size_t)(endp - s) <= l)                            \
                    goto err;                                           \
                s += l;                                                 \
            }                                                           \
        } while (0)

Referenced by date_strftime_with_tmx(), and rb_strftime_with_timespec().

#define mod (   x,
 
)    (rb_funcall((x), '%', 1, (y)))
#define mul (   x,
 
)    (rb_funcall((x), '*', 1, (y)))

Definition at line 25 of file date_strftime.c.

Referenced by date_strftime_with_tmx(), enum_cycle_size(), and rb_ary_cycle_size().

#define NEEDS (   n)    do if (s >= endp || (n) >= endp - s - 1) goto err; while (0)
#define quo (   x,
 
)    (rb_funcall((x), rb_intern("quo"), 1, (y)))

Definition at line 26 of file date_strftime.c.

#define range (   low,
  item,
  hi 
)    (item)
#define STRFTIME (   fmt)
Value:
do {                                                            \
            i = date_strftime_with_tmx(s, endp - s, (fmt), tmx);        \
            if (!i) return 0;                                           \
            if (flags & BIT_OF(UPPER))                                  \
                upcase(s, i);                                           \
            if (!(flags & BIT_OF(LEFT)) && precision > i) {             \
                if (start + maxsize < s + precision) {                  \
                    errno = ERANGE;                                     \
                    return 0;                                           \
                }                                                       \
                memmove(s + precision - i, s, i);                       \
                memset(s, padding ? padding : ' ', precision - i);      \
                s += precision;                                         \
            }                                                           \
            else s += i;                                                \
        } while (0)

Referenced by date_strftime_with_tmx(), and rb_strftime_with_timespec().

#define sub (   x,
 
)    (rb_funcall((x), '-', 1, (y)))

Definition at line 24 of file date_strftime.c.

Referenced by rb_str_index_m(), and rb_str_rindex_m().


Function Documentation

size_t date_strftime ( char *  s,
size_t  maxsize,
const char *  format,
const struct tmx tmx 
)

Definition at line 623 of file date_strftime.c.

References date_strftime_with_tmx().

Referenced by date_strftime_alloc().

static size_t date_strftime_with_tmx ( char *  s,
size_t  maxsize,
const char *  format,
const struct tmx tmx 
) [static]
static void downcase ( char *  s,
size_t  i 
) [static]

Definition at line 40 of file date_strftime.c.

References ISUPPER, and TOLOWER.

Referenced by date_strftime_with_tmx().

static void upcase ( char *  s,
size_t  i 
) [static]

Definition at line 31 of file date_strftime.c.

References ISLOWER, and TOUPPER.

Referenced by date_strftime_with_tmx().