PeerStreamer

time_t mktimegm(struct tm *tm)

{

    time_t t;

    int y = tm->tm_year + 1900, m = tm->tm_mon + 1, d = tm->tm_mday;

    if (m < 3) {

        m += 12;

        y--;

    }

    t = 86400 *

        (d + (153 * m - 457) / 5 + 365 * y + y / 4 - y / 100 + y / 400 - 719469);

    t += 3600 * tm->tm_hour + 60 * tm->tm_min + tm->tm_sec;

    return t;

}

/* get a positive number between n_min and n_max, for a maximum length

   of len_max. Return -1 if error. */

static int date_get_num(const char **pp,

                        int n_min, int n_max, int len_max)

{

    int i, val, c;

    const char *p;

    p = *pp;

    val = 0;

    for(i = 0; i < len_max; i++) {

        c = *p;

        if (!isdigit(c))

            break;

        val = (val * 10) + c - '0';

        p++;

    }

    /* no number read ? */

    if (p == *pp)

        return -1;

    if (val < n_min || val > n_max)

        return -1;

    *pp = p;

    return val;

}

/* small strptime for ffmpeg */

const char *small_strptime(const char *p, const char *fmt,

                           struct tm *dt)

{

    int c, val;

    for(;;) {

        c = *fmt++;

        if (c == '\0') {

            return p;

        } else if (c == '%') {

            c = *fmt++;

            switch(c) {

            case 'H':

                val = date_get_num(&p, 0, 23, 2);

                if (val == -1)

                    return NULL;

                dt->tm_hour = val;

                break;

            case 'M':

                val = date_get_num(&p, 0, 59, 2);

                if (val == -1)

                    return NULL;

                dt->tm_min = val;

                break;

            case 'S':

                val = date_get_num(&p, 0, 59, 2);

                if (val == -1)

                    return NULL;

                dt->tm_sec = val;

                break;

            case 'Y':

                val = date_get_num(&p, 0, 9999, 4);

                if (val == -1)

                    return NULL;

                dt->tm_year = val - 1900;

                break;

            case 'm':

                val = date_get_num(&p, 1, 12, 2);

                if (val == -1)

                    return NULL;

                dt->tm_mon = val - 1;

                break;

            case 'd':

                val = date_get_num(&p, 1, 31, 2);

                if (val == -1)

                    return NULL;

                dt->tm_mday = val;

                break;

            case '%':

                goto match;

            default:

                return NULL;

            }

        } else {

        match:

            if (c != *p)

                return NULL;

            p++;

        }

    }

    return p;

}