libavformat/cutils.c

   1 /*
   2  * Various simple utilities for ffmpeg system
   3  * Copyright (c) 2000, 2001, 2002 Fabrice Bellard
   4  *
   5  * This file is part of FFmpeg.
   6  *
   7  * FFmpeg is free software; you can redistribute it and/or
   8  * modify it under the terms of the GNU Lesser General Public
   9  * License as published by the Free Software Foundation; either
  10  * version 2.1 of the License, or (at your option) any later version.
  11  *
  12  * FFmpeg is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15  * Lesser General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU Lesser General Public
  18  * License along with FFmpeg; if not, write to the Free Software
  19  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
  20  */
  21 #include "avformat.h"
  22 #include "internal.h"
  23
  24 /* add one element to a dynamic array */
  25 void ff_dynarray_add(intptr_t **tab_ptr, int *nb_ptr, intptr_t elem)
  26 {
  27     /* see similar ffmpeg.c:grow_array() */
  28     int nb, nb_alloc;
  29     intptr_t *tab;
  30
  31     nb = *nb_ptr;
  32     tab = *tab_ptr;
  33     if ((nb & (nb - 1)) == 0) {
  34         if (nb == 0)
  35             nb_alloc = 1;
  36         else
  37             nb_alloc = nb * 2;
  38         tab = av_realloc(tab, nb_alloc * sizeof(intptr_t));
  39         *tab_ptr = tab;
  40     }
  41     tab[nb++] = elem;
  42     *nb_ptr = nb;
  43 }
  44
  45 time_t mktimegm(struct tm *tm)
  46 {
  47     time_t t;
  48
  49     int y = tm->tm_year + 1900, m = tm->tm_mon + 1, d = tm->tm_mday;
  50
  51     if (m < 3) {
  52         m += 12;
  53         y--;
  54     }
  55
  56     t = 86400 *
  57         (d + (153 * m - 457) / 5 + 365 * y + y / 4 - y / 100 + y / 400 - 719469);
  58
  59     t += 3600 * tm->tm_hour + 60 * tm->tm_min + tm->tm_sec;
  60
  61     return t;
  62 }
  63
  64 #define ISLEAP(y) (((y) % 4 == 0) && (((y) % 100) != 0 || ((y) % 400) == 0))
  65 #define LEAPS_COUNT(y) ((y)/4 - (y)/100 + (y)/400)
  66
  67 /* This is our own gmtime_r. It differs from its POSIX counterpart in a
  68    couple of places, though. */
  69 struct tm *brktimegm(time_t secs, struct tm *tm)
  70 {
  71     int days, y, ny, m;
  72     int md[] = { 31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31 };
  73
  74     days = secs / 86400;
  75     secs %= 86400;
  76     tm->tm_hour = secs / 3600;
  77     tm->tm_min = (secs % 3600) / 60;
  78     tm->tm_sec =  secs % 60;
  79
  80     /* oh well, may be someone some day will invent a formula for this stuff */
  81     y = 1970; /* start "guessing" */
  82     while (days > 365) {
  83         ny = (y + days/366);
  84         days -= (ny - y) * 365 + LEAPS_COUNT(ny - 1) - LEAPS_COUNT(y - 1);
  85         y = ny;
  86     }
  87     if (days==365 && !ISLEAP(y)) { days=0; y++; }
  88     md[1] = ISLEAP(y)?29:28;
  89     for (m=0; days >= md[m]; m++)
  90          days -= md[m];
  91
  92     tm->tm_year = y;  /* unlike gmtime_r we store complete year here */
  93     tm->tm_mon = m+1; /* unlike gmtime_r tm_mon is from 1 to 12 */
  94     tm->tm_mday = days+1;
  95
  96     return tm;
  97 }
  98
  99 /* get a positive number between n_min and n_max, for a maximum length
 100    of len_max. Return -1 if error. */
 101 static int date_get_num(const char **pp,
 102                         int n_min, int n_max, int len_max)
 103 {
 104     int i, val, c;
 105     const char *p;
 106
 107     p = *pp;
 108     val = 0;
 109     for(i = 0; i < len_max; i++) {
 110         c = *p;
 111         if (!isdigit(c))
 112             break;
 113         val = (val * 10) + c - '0';
 114         p++;
 115     }
 116     /* no number read ? */
 117     if (p == *pp)
 118         return -1;
 119     if (val < n_min || val > n_max)
 120         return -1;
 121     *pp = p;
 122     return val;
 123 }
 124
 125 /* small strptime for ffmpeg */
 126 const char *small_strptime(const char *p, const char *fmt,
 127                            struct tm *dt)
 128 {
 129     int c, val;
 130
 131     for(;;) {
 132         c = *fmt++;
 133         if (c == '\0') {
 134             return p;
 135         } else if (c == '%') {
 136             c = *fmt++;
 137             switch(c) {
 138             case 'H':
 139                 val = date_get_num(&p, 0, 23, 2);
 140                 if (val == -1)
 141                     return NULL;
 142                 dt->tm_hour = val;
 143                 break;
 144             case 'M':
 145                 val = date_get_num(&p, 0, 59, 2);
 146                 if (val == -1)
 147                     return NULL;
 148                 dt->tm_min = val;
 149                 break;
 150             case 'S':
 151                 val = date_get_num(&p, 0, 59, 2);
 152                 if (val == -1)
 153                     return NULL;
 154                 dt->tm_sec = val;
 155                 break;
 156             case 'Y':
 157                 val = date_get_num(&p, 0, 9999, 4);
 158                 if (val == -1)
 159                     return NULL;
 160                 dt->tm_year = val - 1900;
 161                 break;
 162             case 'm':
 163                 val = date_get_num(&p, 1, 12, 2);
 164                 if (val == -1)
 165                     return NULL;
 166                 dt->tm_mon = val - 1;
 167                 break;
 168             case 'd':
 169                 val = date_get_num(&p, 1, 31, 2);
 170                 if (val == -1)
 171                     return NULL;
 172                 dt->tm_mday = val;
 173                 break;
 174             case '%':
 175                 goto match;
 176             default:
 177                 return NULL;
 178             }
 179         } else {
 180         match:
 181             if (c != *p)
 182                 return NULL;
 183             p++;
 184         }
 185     }
 186     return p;
 187 }
 188