File Coverage

src/xs/date.cc

Criterion	Covered	Total	%
statement	27	27	100.0
branch	66	102	64.7
condition			n/a
subroutine			n/a
pod			n/a
total	93	129	72.0

#include "date.h"

namespace xs { namespace date {

using panda::string;
using panda::string_view;

panda::string_view strict_hint_name = "Date::strict";

static inline Date _sv2date (const Sv& arg, const TimezoneSP& zone, int fmt) {
    if (!arg) return Date(0, zone);
    if (!arg.defined()) return Date("!"); // date with parsing error

    if (SvROK(arg)) {
        SV* v = SvRV(arg);
        if (SvOBJECT(v)) {
            Object o = v;
            if (o.stash().name() == "Date") return *xs::in(arg);
            return Date(xs::in(arg), zone, fmt);
        }
        else throw "invalid date argument";
    }

    SvGETMAGIC(arg);

    if (SvNIOK(arg) || arg.is_like_number()) {
        if (SvNOK(arg)) return Date((double)SvNV(arg), zone);
        return Date(xs::in(arg), zone);
    }

    return Date(xs::in(arg), zone, fmt);
}

Date sv2date (const Sv& arg, const TimezoneSP& zone, int fmt) {
    auto ret = _sv2date(arg, zone, fmt);
    if (ret.error() && is_strict_mode()) throw xs::out(ret.error());
    return ret;
}

DateRel sv2daterel (const Sv& arg) {
    if (!arg.defined()) return DateRel();

    if (arg.is_ref()) return *xs::in(arg);

    SvGETMAGIC(arg);

    if (SvNIOK(arg) || arg.is_like_number()) return DateRel(0, 0, 0, 0, 0, xs::in(arg));

    auto ret = DateRel(xs::in(arg));
    if (ret.error() && is_strict_mode()) throw xs::out(ret.error());
    return ret;
}

}}