vlc_fixups.h 11.4 KB
Newer Older
1 2 3
/*****************************************************************************
 * fixups.h: portability fixups included from config.h
 *****************************************************************************
4
 * Copyright © 1998-2008 the VideoLAN project
5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
 *****************************************************************************/

/**
 * \file
 * This file is a collection of portability fixes
 */

26 27 28
#ifndef LIBVLC_FIXUPS_H
# define LIBVLC_FIXUPS_H 1

Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
29
#ifndef HAVE_STRDUP
30 31 32 33 34
# include <string.h>
# include <stdlib.h>
static inline char *strdup (const char *str)
{
    size_t len = strlen (str) + 1;
Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
35
    char *res = (char *)malloc (len);
36 37 38
    if (res) memcpy (res, str, len);
    return res;
}
39 40
#endif

41 42
#ifdef WIN32
# include <string.h>
43
# include <stdlib.h>
44 45 46 47 48 49 50 51 52 53 54
/**
 * vlc_fix_format_string:
 * @format: address of format string to fix (format string is not modified)
 *
 * Windows' printf doesn't support %z size modifiers.
 * Fix a *printf format string to make it safe for mingw/MSVCRT run times:
 *  %z* (not supported in MSVCRT) -> either %I64* or %I32.
 *
 * Returns: 1 if *format must be free()d; 0 otherwise
 */
static inline int vlc_fix_format_string (const char **format)
55
{
56 57 58
    int n = 0;
    const char *tmp = *format;
    while ((tmp = strstr (tmp, "%z")) != NULL)
59 60
    {
        n++;
61
        tmp += 2;
62
    }
63 64
    if (!n)
        return 0;
65

66 67 68 69 70 71
    char *dst = (char*)malloc (strlen (*format) + 2*n + 1);
    if (!dst)
    {
        *format = "vlc_fix_format_string: due to malloc failure, unable to fix unsafe string";
        return 0;
    }
72

73 74
    const char *src = *format;
    *format = dst;
75 76
    while ((tmp = strstr (src, "%z")) != NULL)
    {
77
        /* NB, don't use %l*, as this is buggy in mingw*/
78 79 80
        size_t d = tmp - src;
        memcpy (dst, src, d);
        dst += d;
81 82 83 84 85 86 87 88 89
        *dst++ = '%';
# ifdef WIN64
        *dst++ = 'I';
        *dst++ = '6';
        *dst++ = '4';
# else /* ie: WIN32 */
        /* on win32, since the default size is 32bit, dont specify
         * a modifer.  (I32 isn't on wince, l doesn't work on mingw) */
# endif
90 91 92
        src = tmp + 2;
    }
    strcpy (dst, src);
93
    return 1;
94 95 96 97 98 99 100
}

# include <stdio.h>
# include <stdarg.h>

static inline int vlc_vprintf (const char *format, va_list ap)
{
101 102 103
    int must_free = vlc_fix_format_string (&format);
    int ret = vprintf (format, ap);
    if (must_free) free ((char *)format);
104 105 106 107 108 109
    return ret;
}
# define vprintf vlc_vprintf

static inline int vlc_vfprintf (FILE *stream, const char *format, va_list ap)
{
110 111 112
    int must_free = vlc_fix_format_string (&format);
    int ret = vfprintf (stream, format, ap);
    if (must_free) free ((char *)format);
113 114 115 116 117 118
    return ret;
}
# define vfprintf vlc_vfprintf

static inline int vlc_vsprintf (char *str, const char *format, va_list ap)
{
119 120 121
    int must_free = vlc_fix_format_string (&format);
    int ret = vsprintf (str, format, ap);
    if (must_free) free ((char *)format);
122 123 124 125
    return ret;
}
# define vsprintf vlc_vsprintf

126
static inline int vasprintf (char **strp, const char *fmt, va_list ap);
127 128
static inline int vlc_vsnprintf (char *str, size_t size, const char *format, va_list ap)
{
129
    int must_free = vlc_fix_format_string (&format);
130 131 132 133
    /* traditionally, MSVCRT has provided vsnprintf as _vsnprintf;
     * to 'aid' portability/standards compliance, mingw provides a
     * static version of vsnprintf that is buggy.  Be sure to use
     * MSVCRT version, at least it behaves as expected */
134 135 136 137 138 139 140 141 142 143 144 145
    /* MSVCRT _vsnprintf does not:
     *  - null terminate string if insufficient storage
     *  - return the number of characters that would've been written
     */
    int ret = _vsnprintf (str, size-1, format, ap);
    str[size-1] = 0; /* ensure the null gets written */
    if (ret == -1)
    {
        /* work out the number of chars that should've been written */
        ret = vasprintf (&str, format, ap);
        if (ret >= 0 && str) free (str);
    }
146
    if (must_free) free ((char *)format);
147 148 149 150 151 152 153 154 155
    return ret;
}
# define vsnprintf vlc_vsnprintf

static inline int vlc_printf (const char *format, ...)
{
    va_list ap;
    int ret;
    va_start (ap, format);
156
    ret = vlc_vprintf (format, ap);
157 158 159 160 161 162 163 164 165 166
    va_end (ap);
    return ret;
}
# define printf(...) vlc_printf(__VA_ARGS__)

static inline int vlc_fprintf (FILE *stream, const char *format, ...)
{
    va_list ap;
    int ret;
    va_start (ap, format);
167
    ret = vlc_vfprintf (stream, format, ap);
168 169 170 171 172
    va_end (ap);
    return ret;
}
# define fprintf vlc_fprintf

173
#if 0
174 175 176 177 178
static inline int vlc_sprintf (char *str, const char *format, ...)
{
    va_list ap;
    int ret;
    va_start (ap, format);
179
    ret = vlc_vsprintf (str, format, ap);
180 181 182 183
    va_end (ap);
    return ret;
}
# define sprintf vlc_sprintf
184
#endif
185 186 187 188 189 190

static inline int vlc_snprintf (char *str, size_t size, const char *format, ...)
{
    va_list ap;
    int ret;
    va_start (ap, format);
191
    ret = vlc_vsnprintf (str, size, format, ap);
192 193 194
    va_end (ap);
    return ret;
}
195 196
/* win32: snprintf must always be vlc_snprintf or _snprintf,
 * see comment in vlc_vsnprintf */
197 198 199 200 201 202 203
# define snprintf vlc_snprintf

/* Make sure we don't use flawed vasprintf or asprintf either */
# undef HAVE_VASPRINTF
# undef HAVE_ASPRINTF
#endif

204
#ifndef HAVE_VASPRINTF
Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
205 206
# include <stdio.h>
# include <stdlib.h>
207 208 209
# include <stdarg.h>
static inline int vasprintf (char **strp, const char *fmt, va_list ap)
{
210
#ifndef WIN32
211
    int len = vsnprintf (NULL, 0, fmt, ap) + 1;
Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
212
    char *res = (char *)malloc (len);
213 214 215
    if (res == NULL)
        return -1;
    *strp = res;
Ken Self's avatar
Ken Self committed
216
    return vsnprintf (res, len, fmt, ap);
217
#else
218
    /* HACK: vsnprintf in the Win32 API behaves like
219 220 221 222
     * the one in glibc 2.0 and doesn't return the number of characters
     * it needed to copy the string.
     * cf http://msdn.microsoft.com/en-us/library/1kt27hek.aspx
     * and cf the man page of vsnprintf
223 224 225
     */
    int must_free = vlc_fix_format_string (&fmt);
    int n, size = 2 * strlen (fmt);
226 227 228
    char *res, *np;

    if ((res = (char *) malloc (size)) == NULL)
229 230
    {
        if (must_free) free ((char *)fmt);
231
        return -1;
232
    }
233 234 235

    while (1)
    {
236
        n = _vsnprintf (res, size, fmt, ap);
237 238 239 240 241

        /* If that worked, return the string. */
        if (n > -1 && n < size)
        {
            *strp = res;
242
            if (must_free) free ((char *)fmt);
243 244 245 246
            return n;
        }

        /* Else try again with more space. */
247
        size *= 2;  /* twice the old size */
248 249 250 251

        if ((np = (char *) realloc (res, size)) == NULL)
        {
            free(res);
252
            if (must_free) free ((char *)fmt);
253 254 255 256 257 258 259 260
            return -1;
        }
        else
        {
            res = np;
        }

    }
261
#endif /* WIN32 */
262
}
263 264 265
#endif

#ifndef HAVE_ASPRINTF
Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
266
# include <stdio.h>
267 268 269 270 271
# include <stdarg.h>
static inline int asprintf (char **strp, const char *fmt, ...)
{
    va_list ap;
    int ret;
Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
272
    va_start (ap, fmt);
273 274 275 276
    ret = vasprintf (strp, fmt, ap);
    va_end (ap);
    return ret;
}
277 278
#endif

279
#ifndef HAVE_STRNLEN
Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
280
# include <string.h>
281 282
static inline size_t strnlen (const char *str, size_t max)
{
Rafaël Carré's avatar
Rafaël Carré committed
283
    const char *end = (const char *) memchr (str, 0, max);
284 285 286 287
    return end ? (size_t)(end - str) : max;
}
#endif

288
#ifndef HAVE_STRNDUP
Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
289 290
# include <string.h>
# include <stdlib.h>
291 292
static inline char *strndup (const char *str, size_t max)
{
293
    size_t len = strnlen (str, max);
Rafaël Carré's avatar
Rafaël Carré committed
294
    char *res = (char *) malloc (len + 1);
295 296 297 298 299 300 301
    if (res)
    {
        memcpy (res, str, len);
        res[len] = '\0';
    }
    return res;
}
302 303 304 305 306 307 308
#endif

#ifndef HAVE_STRLCPY
# define strlcpy vlc_strlcpy
#endif

#ifndef HAVE_STRTOF
Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
309
# define strtof( a, b ) ((float)strtod (a, b))
310 311
#endif

Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
312 313
#ifndef HAVE_ATOF
# define atof( str ) (strtod ((str), (char **)NULL, 10))
314 315 316 317 318 319
#endif

#ifndef HAVE_STRTOLL
# define strtoll vlc_strtoll
#endif

320
#ifndef HAVE_STRSEP
Rémi Denis-Courmont's avatar
typo  
Rémi Denis-Courmont committed
321
static inline char *strsep( char **ppsz_string, const char *psz_delimiters )
Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
322 323 324 325 326 327 328 329 330 331 332 333 334 335 336 337
{
    char *psz_string = *ppsz_string;
    if( !psz_string )
        return NULL;

    char *p = strpbrk( psz_string, psz_delimiters );
    if( !p )
    {
        *ppsz_string = NULL;
        return psz_string;
    }
    *p++ = '\0';

    *ppsz_string = p;
    return psz_string;
}
338 339
#endif

Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
340 341 342 343
#ifndef HAVE_ATOLL
# define atoll( str ) (strtoll ((str), (char **)NULL, 10))
#endif

344
#ifndef HAVE_LLDIV
345 346 347 348 349 350 351 352 353 354
typedef struct {
    long long quot; /* Quotient. */
    long long rem;  /* Remainder. */
} lldiv_t;

static inline lldiv_t lldiv (long long numer, long long denom)
{
    lldiv_t d = { .quot = numer / denom, .rem = numer % denom };
    return d;
}
355 356 357 358 359 360 361 362
#endif

#ifndef HAVE_SCANDIR
# define scandir vlc_scandir
# define alphasort vlc_alphasort
#endif

#ifndef HAVE_GETENV
Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
363
static inline char *getenv (const char *name)
364 365 366 367
{
    (void)name;
    return NULL;
}
368 369 370 371
#endif

#ifndef HAVE_STRCASECMP
# ifndef HAVE_STRICMP
372 373 374 375 376 377
#  include <ctype.h>
static inline int strcasecmp (const char *s1, const char *s2)
{
    for (size_t i = 0;; i++)
    {
        int d = tolower (s1[i]) - tolower (s2[i]);
378
        if (d || !s1[i]) return d;
379 380 381
    }
    return 0;
}
382 383 384 385 386 387 388
# else
#  define strcasecmp stricmp
# endif
#endif

#ifndef HAVE_STRNCASECMP
# ifndef HAVE_STRNICMP
389 390 391 392 393 394
#  include <ctype.h>
static inline int strncasecmp (const char *s1, const char *s2, size_t n)
{
    for (size_t i = 0; i < n; i++)
    {
        int d = tolower (s1[i]) - tolower (s2[i]);
395
        if (d || !s1[i]) return d;
396 397 398
    }
    return 0;
}
399 400 401 402 403 404 405 406 407 408 409 410 411
# else
#  define strncasecmp strnicmp
# endif
#endif

#ifndef HAVE_STRCASESTR
# ifndef HAVE_STRISTR
#  define strcasestr vlc_strcasestr
# else
#  define strcasestr stristr
# endif
#endif

412 413 414 415
#ifndef HAVE_LOCALTIME_R
/* If localtime_r() is not provided, we assume localtime() uses
 * thread-specific storage. */
# include <time.h>
Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
416
static inline struct tm *localtime_r (const time_t *timep, struct tm *result)
417 418 419 420 421 422 423 424
{
    struct tm *s = localtime (timep);
    if (s == NULL)
        return NULL;

    *result = *s;
    return result;
}
Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
425 426 427 428 429 430 431 432 433
static inline struct tm *gmtime_r (const time_t *timep, struct tm *result)
{
    struct tm *s = gmtime (timep);
    if (s == NULL)
        return NULL;

    *result = *s;
    return result;
}
434 435
#endif

436 437 438 439 440 441 442
/* Alignment of critical static data structures */
#ifdef ATTRIBUTE_ALIGNED_MAX
#   define ATTR_ALIGN(align) __attribute__ ((__aligned__ ((ATTRIBUTE_ALIGNED_MAX < align) ? ATTRIBUTE_ALIGNED_MAX : align)))
#else
#   define ATTR_ALIGN(align)
#endif

443 444 445 446 447 448 449
#ifndef HAVE_USELOCALE
typedef void *locale_t;
# define newlocale( a, b, c ) ((locale_t)0)
# define uselocale( a ) ((locale_t)0)
# define freelocale( a ) (void)0
#endif

450
#ifdef WIN32
Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
451
# include <dirent.h>
452 453 454 455 456
# define opendir Use_utf8_opendir_or_vlc_wopendir_instead!
# define readdir Use_utf8_readdir_or_vlc_wreaddir_instead!
# define closedir vlc_wclosedir
#endif

457
/* libintl support */
458
#define _(str) vlc_gettext (str)
459 460 461 462 463 464 465 466

#if defined (ENABLE_NLS)
# include <libintl.h>
#endif

#define N_(str) gettext_noop (str)
#define gettext_noop(str) (str)

467 468 469 470 471 472 473 474
#ifdef UNDER_CE
static inline void rewind ( FILE *stream )
{
    fseek(stream, 0L, SEEK_SET);
    clearerr(stream);
}
#endif

475
#endif /* !LIBVLC_FIXUPS_H */