X-Git-Url: https://git.sesse.net/?a=blobdiff_plain;f=src%2Fextras%2Flibc.c;h=3389c57d07516824d043d0aa03b23c165d50b820;hb=0198b074039d7351a6862fdc86488789fd735d81;hp=ba3d9ab7da3e2f663c4c1fbdb3cd76cbec17d0f7;hpb=502360d95cf1ee2231ccafa57e3669439e6ac5ca;p=vlc diff --git a/src/extras/libc.c b/src/extras/libc.c index ba3d9ab7da..3389c57d07 100644 --- a/src/extras/libc.c +++ b/src/extras/libc.c @@ -1,34 +1,32 @@ /***************************************************************************** * libc.c: Extra libc function for some systems. ***************************************************************************** - * Copyright (C) 2002-2006 the VideoLAN team - * $Id$ + * Copyright (C) 2002-2006 VLC authors and VideoLAN * - * Authors: Jon Lech Johansen - * Samuel Hocevar - * Gildas Bazin - * Derk-Jan Hartman - * Christophe Massiot - * Rémi Denis-Courmont + * Authors: Gildas Bazin * - * 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 + * This program is free software; you can redistribute it and/or modify it + * under the terms of the GNU Lesser General Public License as published by + * the Free Software Foundation; either version 2.1 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. + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU Lesser 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. + * You should have received a copy of the GNU Lesser 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. *****************************************************************************/ -#include +#ifdef HAVE_CONFIG_H +# include "config.h" +#endif -#include +#include +#include +#include #undef iconv_t #undef iconv_open @@ -39,704 +37,371 @@ # include #endif -#ifdef HAVE_DIRENT_H -# include -#endif - -#ifdef HAVE_SIGNAL_H -# include -#endif +#if defined(__OS2__) && defined(__INNOTEK_LIBC__) +# include -#ifdef HAVE_FORK -# include -# include -# include -# include -# include -# include -# include -#endif - -#if defined(WIN32) || defined(UNDER_CE) -# undef _wopendir -# undef _wreaddir -# undef _wclosedir -# undef rewinddir -# undef seekdir -# undef telldir -# define WIN32_LEAN_AND_MEAN -# include -#endif - -#ifdef UNDER_CE -# define strcoll strcmp -#endif - -/***************************************************************************** - * getenv: just in case, but it should never be called - *****************************************************************************/ -#if !defined( HAVE_GETENV ) -char *vlc_getenv( const char *name ) +typedef struct os2_iconv_t { - return NULL; -} + UconvObject from; +} os2_iconv_t; #endif /***************************************************************************** - * strdup: returns a malloc'd copy of a string - *****************************************************************************/ -#if !defined( HAVE_STRDUP ) -char *vlc_strdup( const char *string ) -{ - return strndup( string, strlen( string ) ); -} -#endif - -/***************************************************************************** - * strndup: returns a malloc'd copy of at most n bytes of string - * Does anyone know whether or not it will be present in Jaguar? - *****************************************************************************/ -#if !defined( HAVE_STRNDUP ) -char *vlc_strndup( const char *string, size_t n ) -{ - char *psz; - size_t len = strlen( string ); - - len = __MIN( len, n ); - psz = (char*)malloc( len + 1 ); - if( psz != NULL ) - { - memcpy( (void*)psz, (const void*)string, len ); - psz[ len ] = 0; - } - - return psz; -} -#endif - -/***************************************************************************** - * strnlen: - *****************************************************************************/ -#if !defined( HAVE_STRNLEN ) -size_t vlc_strnlen( const char *psz, size_t n ) -{ - const char *psz_end = memchr( psz, 0, n ); - return psz_end ? (size_t)( psz_end - psz ) : n; -} -#endif - -/***************************************************************************** - * strcasecmp: compare two strings ignoring case - *****************************************************************************/ -#if !defined( HAVE_STRCASECMP ) && !defined( HAVE_STRICMP ) -int vlc_strcasecmp( const char *s1, const char *s2 ) -{ - int c1, c2; - if( !s1 || !s2 ) return -1; - - while( *s1 && *s2 ) - { - c1 = tolower(*s1); - c2 = tolower(*s2); - - if( c1 != c2 ) return (c1 < c2 ? -1 : 1); - s1++; s2++; - } - - if( !*s1 && !*s2 ) return 0; - else return (*s1 ? 1 : -1); -} -#endif - -/***************************************************************************** - * strncasecmp: compare n chars from two strings ignoring case - *****************************************************************************/ -#if !defined( HAVE_STRNCASECMP ) && !defined( HAVE_STRNICMP ) -int vlc_strncasecmp( const char *s1, const char *s2, size_t n ) -{ - int c1, c2; - if( !s1 || !s2 ) return -1; - - while( n > 0 && *s1 && *s2 ) - { - c1 = tolower(*s1); - c2 = tolower(*s2); - - if( c1 != c2 ) return (c1 < c2 ? -1 : 1); - s1++; s2++; n--; - } - - if( !n || (!*s1 && !*s2) ) return 0; - else return (*s1 ? 1 : -1); -} -#endif - -/****************************************************************************** - * strcasestr: find a substring (little) in another substring (big) - * Case sensitive. Return NULL if not found, return big if little == null + * Local conversion routine from ISO_6937 to UTF-8 charset. Support for this + * is still missing in libiconv, hence multiple operating systems lack it. + * The conversion table adds Euro sign (0xA4) as per ETSI EN 300 468 Annex A *****************************************************************************/ -#if !defined( HAVE_STRCASESTR ) && !defined( HAVE_STRISTR ) -char * vlc_strcasestr( const char *psz_big, const char *psz_little ) -{ - char *p_pos = (char *)psz_big; - - if( !psz_big || !psz_little || !*psz_little ) return p_pos; - - while( *p_pos ) - { - if( toupper( *p_pos ) == toupper( *psz_little ) ) +#ifndef __linux__ +static const uint16_t to_ucs4[128] = +{ + /* 0x80 */ 0x0080, 0x0081, 0x0082, 0x0083, 0x0084, 0x0085, 0x0086, 0x0087, + /* 0x88 */ 0x0088, 0x0089, 0x008a, 0x008b, 0x008c, 0x008d, 0x008e, 0x008f, + /* 0x90 */ 0x0090, 0x0091, 0x0092, 0x0093, 0x0094, 0x0095, 0x0096, 0x0097, + /* 0x98 */ 0x0098, 0x0099, 0x009a, 0x009b, 0x009c, 0x009d, 0x009e, 0x009f, + /* 0xa0 */ 0x00a0, 0x00a1, 0x00a2, 0x00a3, 0x20ac, 0x00a5, 0x0000, 0x00a7, + /* 0xa8 */ 0x00a4, 0x2018, 0x201c, 0x00ab, 0x2190, 0x2191, 0x2192, 0x2193, + /* 0xb0 */ 0x00b0, 0x00b1, 0x00b2, 0x00b3, 0x00d7, 0x00b5, 0x00b6, 0x00b7, + /* 0xb8 */ 0x00f7, 0x2019, 0x201d, 0x00bb, 0x00bc, 0x00bd, 0x00be, 0x00bf, + /* 0xc0 */ 0x0000, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, + /* 0xc8 */ 0xffff, 0x0000, 0xffff, 0xffff, 0x0000, 0xffff, 0xffff, 0xffff, + /* 0xd0 */ 0x2014, 0x00b9, 0x00ae, 0x00a9, 0x2122, 0x266a, 0x00ac, 0x00a6, + /* 0xd8 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x215b, 0x215c, 0x215d, 0x215e, + /* 0xe0 */ 0x2126, 0x00c6, 0x00d0, 0x00aa, 0x0126, 0x0000, 0x0132, 0x013f, + /* 0xe8 */ 0x0141, 0x00d8, 0x0152, 0x00ba, 0x00de, 0x0166, 0x014a, 0x0149, + /* 0xf0 */ 0x0138, 0x00e6, 0x0111, 0x00f0, 0x0127, 0x0131, 0x0133, 0x0140, + /* 0xf8 */ 0x0142, 0x00f8, 0x0153, 0x00df, 0x00fe, 0x0167, 0x014b, 0x00ad +}; + +/* The outer array range runs from 0xc1 to 0xcf, the inner range from 0x40 + to 0x7f. */ +static const uint16_t to_ucs4_comb[15][64] = +{ + /* 0xc1 */ + { + /* 0x40 */ 0x0000, 0x00c0, 0x0000, 0x0000, 0x0000, 0x00c8, 0x0000, 0x0000, + /* 0x48 */ 0x0000, 0x00cc, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x00d2, + /* 0x50 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x00d9, 0x0000, 0x0000, + /* 0x58 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, + /* 0x60 */ 0x0000, 0x00e0, 0x0000, 0x0000, 0x0000, 0x00e8, 0x0000, 0x0000, + /* 0x68 */ 0x0000, 0x00ec, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x00f2, + /* 0x70 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x00f9, 0x0000, 0x0000, + /* 0x78 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000 + }, + /* 0xc2 */ + { + /* 0x40 */ 0x0000, 0x00c1, 0x0000, 0x0106, 0x0000, 0x00c9, 0x0000, 0x0000, + /* 0x48 */ 0x0000, 0x00cd, 0x0000, 0x0000, 0x0139, 0x0000, 0x0143, 0x00d3, + /* 0x50 */ 0x0000, 0x0000, 0x0154, 0x015a, 0x0000, 0x00da, 0x0000, 0x0000, + /* 0x58 */ 0x0000, 0x00dd, 0x0179, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, + /* 0x60 */ 0x0000, 0x00e1, 0x0000, 0x0107, 0x0000, 0x00e9, 0x0000, 0x0000, + /* 0x68 */ 0x0000, 0x00ed, 0x0000, 0x0000, 0x013a, 0x0000, 0x0144, 0x00f3, + /* 0x70 */ 0x0000, 0x0000, 0x0155, 0x015b, 0x0000, 0x00fa, 0x0000, 0x0000, + /* 0x78 */ 0x0000, 0x00fd, 0x017a, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000 + }, + /* 0xc3 */ + { + /* 0x40 */ 0x0000, 0x00c2, 0x0000, 0x0108, 0x0000, 0x00ca, 0x0000, 0x011c, + /* 0x48 */ 0x0124, 0x00ce, 0x0134, 0x0000, 0x0000, 0x0000, 0x0000, 0x00d4, + /* 0x50 */ 0x0000, 0x0000, 0x0000, 0x015c, 0x0000, 0x00db, 0x0000, 0x0174, + /* 0x58 */ 0x0000, 0x0176, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, + /* 0x60 */ 0x0000, 0x00e2, 0x0000, 0x0109, 0x0000, 0x00ea, 0x0000, 0x011d, + /* 0x68 */ 0x0125, 0x00ee, 0x0135, 0x0000, 0x0000, 0x0000, 0x0000, 0x00f4, + /* 0x70 */ 0x0000, 0x0000, 0x0000, 0x015d, 0x0000, 0x00fb, 0x0000, 0x0175, + /* 0x78 */ 0x0000, 0x0177, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000 + }, + /* 0xc4 */ + { + /* 0x40 */ 0x0000, 0x00c3, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, + /* 0x48 */ 0x0000, 0x0128, 0x0000, 0x0000, 0x0000, 0x0000, 0x00d1, 0x00d5, + /* 0x50 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0168, 0x0000, 0x0000, + /* 0x58 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, + /* 0x60 */ 0x0000, 0x00e3, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, + /* 0x68 */ 0x0000, 0x0129, 0x0000, 0x0000, 0x0000, 0x0000, 0x00f1, 0x00f5, + /* 0x70 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0169, 0x0000, 0x0000, + /* 0x78 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000 + }, + /* 0xc5 */ + { + /* 0x40 */ 0x0000, 0x0100, 0x0000, 0x0000, 0x0000, 0x0112, 0x0000, 0x0000, + /* 0x48 */ 0x0000, 0x012a, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x014c, + /* 0x50 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x016a, 0x0000, 0x0000, + /* 0x58 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, + /* 0x60 */ 0x0000, 0x0101, 0x0000, 0x0000, 0x0000, 0x0113, 0x0000, 0x0000, + /* 0x68 */ 0x0000, 0x012b, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x014d, + /* 0x70 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x016b, 0x0000, 0x0000, + /* 0x78 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000 + }, + /* 0xc6 */ + { + /* 0x40 */ 0x0000, 0x0102, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x011e, + /* 0x48 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, + /* 0x50 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x016c, 0x0000, 0x0000, + /* 0x58 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, + /* 0x60 */ 0x0000, 0x0103, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x011f, + /* 0x68 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, + /* 0x70 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x016d, 0x0000, 0x0000, + /* 0x78 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000 + }, + /* 0xc7 */ + { + /* 0x40 */ 0x0000, 0x0000, 0x0000, 0x010a, 0x0000, 0x0116, 0x0000, 0x0120, + /* 0x48 */ 0x0000, 0x0130, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, + /* 0x50 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, + /* 0x58 */ 0x0000, 0x0000, 0x017b, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, + /* 0x60 */ 0x0000, 0x0000, 0x0000, 0x010b, 0x0000, 0x0117, 0x0000, 0x0121, + /* 0x68 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, + /* 0x70 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, + /* 0x78 */ 0x0000, 0x0000, 0x017c, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000 + }, + /* 0xc8 */ + { + /* 0x40 */ 0x0000, 0x00c4, 0x0000, 0x0000, 0x0000, 0x00cb, 0x0000, 0x0000, + /* 0x48 */ 0x0000, 0x00cf, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x00d6, + /* 0x50 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x00dc, 0x0000, 0x0000, + /* 0x58 */ 0x0000, 0x0178, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, + /* 0x60 */ 0x0000, 0x00e4, 0x0000, 0x0000, 0x0000, 0x00eb, 0x0000, 0x0000, + /* 0x68 */ 0x0000, 0x00ef, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x00f6, + /* 0x70 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x00fc, 0x0000, 0x0000, + /* 0x78 */ 0x0000, 0x00ff, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000 + }, + /* 0xc9 */ + { + 0x0000, + }, + /* 0xca */ + { + /* 0x40 */ 0x0000, 0x00c5, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, + /* 0x48 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, + /* 0x50 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x016e, 0x0000, 0x0000, + /* 0x58 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, + /* 0x60 */ 0x0000, 0x00e5, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, + /* 0x68 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, + /* 0x70 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x016f, 0x0000, 0x0000, + /* 0x78 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000 + }, + /* 0xcb */ + { + /* 0x40 */ 0x0000, 0x0000, 0x0000, 0x00c7, 0x0000, 0x0000, 0x0000, 0x0122, + /* 0x48 */ 0x0000, 0x0000, 0x0000, 0x0136, 0x013b, 0x0000, 0x0145, 0x0000, + /* 0x50 */ 0x0000, 0x0000, 0x0156, 0x015e, 0x0162, 0x0000, 0x0000, 0x0000, + /* 0x58 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, + /* 0x60 */ 0x0000, 0x0000, 0x0000, 0x00e7, 0x0000, 0x0000, 0x0000, 0x0123, + /* 0x68 */ 0x0000, 0x0000, 0x0000, 0x0137, 0x013c, 0x0000, 0x0146, 0x0000, + /* 0x70 */ 0x0000, 0x0000, 0x0157, 0x015f, 0x0163, 0x0000, 0x0000, 0x0000, + /* 0x78 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000 + }, + /* 0xcc */ + { + 0x0000, + }, + /* 0xcd */ + { + /* 0x40 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, + /* 0x48 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0150, + /* 0x50 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0170, 0x0000, 0x0000, + /* 0x58 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, + /* 0x60 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, + /* 0x68 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0151, + /* 0x70 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0171, 0x0000, 0x0000, + /* 0x78 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000 + }, + /* 0xce */ + { + /* 0x40 */ 0x0000, 0x0104, 0x0000, 0x0000, 0x0000, 0x0118, 0x0000, 0x0000, + /* 0x48 */ 0x0000, 0x012e, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, + /* 0x50 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0172, 0x0000, 0x0000, + /* 0x58 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, + /* 0x60 */ 0x0000, 0x0105, 0x0000, 0x0000, 0x0000, 0x0119, 0x0000, 0x0000, + /* 0x68 */ 0x0000, 0x012f, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, + /* 0x70 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0173, 0x0000, 0x0000, + /* 0x78 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000 + }, + /* 0xcf */ + { + /* 0x40 */ 0x0000, 0x0000, 0x0000, 0x010c, 0x010e, 0x011a, 0x0000, 0x0000, + /* 0x48 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x013d, 0x0000, 0x0147, 0x0000, + /* 0x50 */ 0x0000, 0x0000, 0x0158, 0x0160, 0x0164, 0x0000, 0x0000, 0x0000, + /* 0x58 */ 0x0000, 0x0000, 0x017d, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, + /* 0x60 */ 0x0000, 0x0000, 0x0000, 0x010d, 0x010f, 0x011b, 0x0000, 0x0000, + /* 0x68 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x013e, 0x0000, 0x0148, 0x0000, + /* 0x70 */ 0x0000, 0x0000, 0x0159, 0x0161, 0x0165, 0x0000, 0x0000, 0x0000, + /* 0x78 */ 0x0000, 0x0000, 0x017e, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000 + } +}; + +static size_t ISO6937toUTF8( const unsigned char **inbuf, size_t *inbytesleft, + unsigned char **outbuf, size_t *outbytesleft ) + + +{ + if( !inbuf || !(*inbuf) ) + return (size_t)(0); /* Reset state requested */ + + const unsigned char *iptr = *inbuf; + const unsigned char *iend = iptr + *inbytesleft; + unsigned char *optr = *outbuf; + unsigned char *oend = optr + *outbytesleft; + uint16_t ch; + int err = 0; + + while ( iptr < iend ) + { + if( *iptr < 0x80 ) { - char * psz_cur1 = p_pos + 1; - char * psz_cur2 = (char *)psz_little + 1; - while( *psz_cur1 && *psz_cur2 && - toupper( *psz_cur1 ) == toupper( *psz_cur2 ) ) + if( optr >= oend ) { - psz_cur1++; - psz_cur2++; + err = E2BIG; + break; /* No space in outbuf */ } - if( !*psz_cur2 ) return p_pos; + *optr++ = *iptr++; + continue; } - p_pos++; - } - return NULL; -} -#endif - -/***************************************************************************** - * vasprintf: - *****************************************************************************/ -#if !defined(HAVE_VASPRINTF) || defined(__APPLE__) || defined(SYS_BEOS) -int vlc_vasprintf(char **strp, const char *fmt, va_list ap) -{ - /* Guess we need no more than 100 bytes. */ - int i_size = 100; - char *p = malloc( i_size ); - int n; - - if( p == NULL ) - { - *strp = NULL; - return -1; - } - for( ;; ) - { - /* Try to print in the allocated space. */ - n = vsnprintf( p, i_size, fmt, ap ); - /* If that worked, return the string. */ - if (n > -1 && n < i_size) + if ( optr + 2 >= oend ) { - *strp = p; - return strlen( p ); + err = E2BIG; + break; /* No space in outbuf for multibyte char */ } - /* Else try again with more space. */ - if (n > -1) /* glibc 2.1 */ - { - i_size = n+1; /* precisely what is needed */ - } - else /* glibc 2.0 */ - { - i_size *= 2; /* twice the old size */ - } - if( (p = realloc( p, i_size ) ) == NULL) - { - *strp = NULL; - return -1; - } - } -} -#endif - -/***************************************************************************** - * asprintf: - *****************************************************************************/ -#if !defined(HAVE_ASPRINTF) || defined(__APPLE__) || defined(SYS_BEOS) -int vlc_asprintf( char **strp, const char *fmt, ... ) -{ - va_list args; - int i_ret; - - va_start( args, fmt ); - i_ret = vasprintf( strp, fmt, args ); - va_end( args ); - - return i_ret; -} -#endif - -/***************************************************************************** - * atof: convert a string to a double. - *****************************************************************************/ -#if !defined( HAVE_ATOF ) -double vlc_atof( const char *nptr ) -{ - double f_result; - wchar_t *psz_tmp = NULL; - int i_len = strlen( nptr ) + 1; - psz_tmp = malloc( i_len * sizeof(wchar_t) ); - if( !psz_tmp ) - return NULL; - MultiByteToWideChar( CP_ACP, 0, nptr, -1, psz_tmp, i_len ); - f_result = wcstod( psz_tmp, NULL ); - free( psz_tmp ); + ch = to_ucs4[*iptr - 0x80]; - return f_result; -} -#endif - -/***************************************************************************** - * strtoll: convert a string to a 64 bits int. - *****************************************************************************/ -#if !defined( HAVE_STRTOLL ) -int64_t vlc_strtoll( const char *nptr, char **endptr, int base ) -{ - int64_t i_value = 0; - int sign = 1, newbase = base ? base : 10; - - while( isspace(*nptr) ) nptr++; - - if( *nptr == '-' ) - { - sign = -1; - nptr++; - } - - /* Try to detect base */ - if( *nptr == '0' ) - { - newbase = 8; - nptr++; - - if( *nptr == 'x' ) + if( ch == 0xffff ) { - newbase = 16; - nptr++; - } - } - - if( base && newbase != base ) - { - if( endptr ) *endptr = (char *)nptr; - return i_value; - } - - switch( newbase ) - { - case 10: - while( *nptr >= '0' && *nptr <= '9' ) + /* Composed character */ + if ( iptr + 1 >= iend ) { - i_value *= 10; - i_value += ( *nptr++ - '0' ); + err = EINVAL; + break; /* No next character */ } - if( endptr ) *endptr = (char *)nptr; - break; - - case 16: - while( (*nptr >= '0' && *nptr <= '9') || - (*nptr >= 'a' && *nptr <= 'f') || - (*nptr >= 'A' && *nptr <= 'F') ) + if ( iptr[1] < 0x40 || iptr[1] >= 0x80 || + !(ch = to_ucs4_comb[iptr[0] - 0xc1][iptr[1] - 0x40]) ) { - int i_valc = 0; - if(*nptr >= '0' && *nptr <= '9') i_valc = *nptr - '0'; - else if(*nptr >= 'a' && *nptr <= 'f') i_valc = *nptr - 'a' +10; - else if(*nptr >= 'A' && *nptr <= 'F') i_valc = *nptr - 'A' +10; - i_value *= 16; - i_value += i_valc; - nptr++; + err = EILSEQ; + break; /* Illegal combination */ } - if( endptr ) *endptr = (char *)nptr; - break; - - default: - i_value = strtol( nptr, endptr, newbase ); - break; - } - - return i_value * sign; -} -#endif + iptr += 2; -/***************************************************************************** - * atoll: convert a string to a 64 bits int. - *****************************************************************************/ -#if !defined( HAVE_ATOLL ) -int64_t vlc_atoll( const char *nptr ) -{ - return strtoll( nptr, (char **)NULL, 10 ); -} -#endif - -/***************************************************************************** - * lldiv: returns quotient and remainder - *****************************************************************************/ -#if defined(SYS_BEOS) \ - || (defined (__FreeBSD__) && (__FreeBSD__ < 5)) -lldiv_t vlc_lldiv( long long numer, long long denom ) -{ - lldiv_t d; - d.quot = numer / denom; - d.rem = numer % denom; - return d; -} -#endif - - -/** - * Copy a string to a sized buffer. The result is always nul-terminated - * (contrary to strncpy()). - * - * @param dest destination buffer - * @param src string to be copied - * @param len maximum number of characters to be copied plus one for the - * terminating nul. - * - * @return strlen(src) - */ -#ifndef HAVE_STRLCPY -extern size_t vlc_strlcpy (char *tgt, const char *src, size_t bufsize) -{ - size_t length; - - for (length = 1; (length < bufsize) && *src; length++) - *tgt++ = *src++; - - if (bufsize) - *tgt = '\0'; - - while (*src++) - length++; - - return length - 1; -} -#endif - -/***************************************************************************** - * vlc_*dir_wrapper: wrapper under Windows to return the list of drive letters - * when called with an empty argument or just '\' - *****************************************************************************/ -#if defined(WIN32) && !defined(UNDER_CE) -# include - -typedef struct vlc_DIR -{ - _WDIR *p_real_dir; - int i_drives; - struct _wdirent dd_dir; - vlc_bool_t b_insert_back; -} vlc_DIR; - -void *vlc_wopendir( const wchar_t *wpath ) -{ - vlc_DIR *p_dir = NULL; - _WDIR *p_real_dir = NULL; - - if ( wpath == NULL || wpath[0] == '\0' - || (wcscmp (wpath, L"\\") == 0) ) - { - /* Special mode to list drive letters */ - p_dir = malloc( sizeof(vlc_DIR) ); - if( !p_dir ) - return NULL; - p_dir->p_real_dir = NULL; - p_dir->i_drives = GetLogicalDrives(); - return (void *)p_dir; - } - - p_real_dir = _wopendir( wpath ); - if ( p_real_dir == NULL ) - return NULL; - - p_dir = malloc( sizeof(vlc_DIR) ); - if( !p_dir ) - { - _wclosedir( p_real_dir ); - return NULL; - } - p_dir->p_real_dir = p_real_dir; - - assert (wpath[0]); // wpath[1] is defined - p_dir->b_insert_back = !wcscmp (wpath + 1, L":\\"); - return (void *)p_dir; -} - -struct _wdirent *vlc_wreaddir( void *_p_dir ) -{ - vlc_DIR *p_dir = (vlc_DIR *)_p_dir; - unsigned int i; - DWORD i_drives; - - if ( p_dir->p_real_dir != NULL ) - { - if ( p_dir->b_insert_back ) - { - /* Adds "..", gruik! */ - p_dir->dd_dir.d_ino = 0; - p_dir->dd_dir.d_reclen = 0; - p_dir->dd_dir.d_namlen = 2; - wcscpy( p_dir->dd_dir.d_name, L".." ); - p_dir->b_insert_back = VLC_FALSE; - return &p_dir->dd_dir; } - - return _wreaddir( p_dir->p_real_dir ); - } - - /* Drive letters mode */ - i_drives = p_dir->i_drives; - if ( !i_drives ) - return NULL; /* end */ - - for ( i = 0; i < sizeof(DWORD)*8; i++, i_drives >>= 1 ) - if ( i_drives & 1 ) break; - - if ( i >= 26 ) - return NULL; /* this should not happen */ - - swprintf( p_dir->dd_dir.d_name, L"%c:\\", 'A' + i ); - p_dir->dd_dir.d_namlen = wcslen(p_dir->dd_dir.d_name); - p_dir->i_drives &= ~(1UL << i); - return &p_dir->dd_dir; -} - -int vlc_wclosedir( void *_p_dir ) -{ - vlc_DIR *p_dir = (vlc_DIR *)_p_dir; - int i_ret = 0; - - if ( p_dir->p_real_dir != NULL ) - i_ret = _wclosedir( p_dir->p_real_dir ); - - free( p_dir ); - return i_ret; -} - -void vlc_rewinddir( void *_p_dir ) -{ - vlc_DIR *p_dir = (vlc_DIR *)_p_dir; - - if ( p_dir->p_real_dir != NULL ) - _wrewinddir( p_dir->p_real_dir ); -} - -void vlc_seekdir( void *_p_dir, long loc) -{ - vlc_DIR *p_dir = (vlc_DIR *)_p_dir; - - if ( p_dir->p_real_dir != NULL ) - _wseekdir( p_dir->p_real_dir, loc ); -} - -long vlc_telldir( void *_p_dir ) -{ - vlc_DIR *p_dir = (vlc_DIR *)_p_dir; - - if ( p_dir->p_real_dir != NULL ) - return _wtelldir( p_dir->p_real_dir ); - return 0; -} -#endif - -/***************************************************************************** - * scandir: scan a directory alpha-sorted - *****************************************************************************/ -#if !defined( HAVE_SCANDIR ) -/* FIXME: I suspect this is dead code -> utf8_scandir */ -#ifdef WIN32 -# undef opendir -# undef readdir -# undef closedir -#endif -int vlc_alphasort( const struct dirent **a, const struct dirent **b ) -{ - return strcoll( (*a)->d_name, (*b)->d_name ); -} - -int vlc_scandir( const char *name, struct dirent ***namelist, - int (*filter) ( const struct dirent * ), - int (*compar) ( const struct dirent **, - const struct dirent ** ) ) -{ - DIR * p_dir; - struct dirent * p_content; - struct dirent ** pp_list; - int ret, size; - - if( !namelist || !( p_dir = opendir( name ) ) ) return -1; - - ret = 0; - pp_list = NULL; - while( ( p_content = readdir( p_dir ) ) ) - { - if( filter && !filter( p_content ) ) + else { - continue; + if ( !ch ) + { + err = EILSEQ; + break; + } + iptr++; } - pp_list = realloc( pp_list, ( ret + 1 ) * sizeof( struct dirent * ) ); - size = sizeof( struct dirent ) + strlen( p_content->d_name ) + 1; - pp_list[ret] = malloc( size ); - if( pp_list[ret] ) + + if ( ch < 0x800 ) { - memcpy( pp_list[ret], p_content, size ); - ret++; + optr[1] = 0x80 | (ch & 0x3f); + optr[0] = 0xc0 | (ch >> 6); + optr +=2; } else { - /* Continuing is useless when no more memory can be allocted, - * so better return what we have found. - */ - ret = -1; - break; + optr[2] = 0x80 | (ch & 0x3f); + ch >>= 6; + optr[1] = 0x80 | (ch & 0x3f); + optr[0] = 0xe0 | (ch >> 6); + optr += 3; } - } - closedir( p_dir ); + } + *inbuf = iptr; + *outbuf = optr; + *inbytesleft = iend - iptr; + *outbytesleft = oend - optr; - if( compar ) + if( err ) { - qsort( pp_list, ret, sizeof( struct dirent * ), - (int (*)(const void *, const void *)) compar ); + errno = err; + return (size_t)(-1); } - *namelist = pp_list; - return ret; + return (size_t)(0); + } #endif -#ifdef WIN32 /***************************************************************************** - * dgettext: gettext for plugins. + * iconv wrapper *****************************************************************************/ -char *vlc_dgettext( const char *package, const char *msgid ) +vlc_iconv_t vlc_iconv_open( const char *tocode, const char *fromcode ) { -#if defined( ENABLE_NLS ) \ - && ( defined(HAVE_GETTEXT) || defined(HAVE_INCLUDED_GETTEXT) ) - return dgettext( package, msgid ); -#else - return (char *)msgid; -#endif -} +#ifndef __linux__ + if( !strcasecmp(tocode, "UTF-8") && !strcasecmp(fromcode, "ISO_6937") ) + return (vlc_iconv_t)(-2); #endif +#if defined(HAVE_ICONV) +# if defined(__OS2__) && defined(__INNOTEK_LIBC__) + char tocode_ucs2[] = "UCS-2LE"; + char fromcode_ucs2[] = "UCS-2LE"; + os2_iconv_t *p_os2_iconv; -/***************************************************************************** - * count_utf8_string: returns the number of characters in the string. - *****************************************************************************/ -static int count_utf8_string( const char *psz_string ) -{ - int i = 0, i_count = 0; - while( psz_string[ i ] != 0 ) + /* Workaround for UTF-16 because OS/2 supports UCS-2 only not UTF-16 */ + if( !strncmp( tocode, "UTF-16", 6 )) { - if( ((unsigned char *)psz_string)[ i ] < 0x80UL ) i_count++; - i++; + strncpy( tocode_ucs2 + 5, tocode + 6, 2 ); + tocode = tocode_ucs2; } - return i_count; -} - -/***************************************************************************** - * wraptext: inserts \n at convenient places to wrap the text. - * Returns the modified string in a new buffer. - *****************************************************************************/ -char *vlc_wraptext( const char *psz_text, int i_line ) -{ - int i_len; - char *psz_line, *psz_new_text; - psz_line = psz_new_text = strdup( psz_text ); + if( !strncmp( fromcode, "UTF-16", 6 )) + { + strncpy( fromcode_ucs2 + 5, fromcode + 6, 2 ); + fromcode = fromcode_ucs2; + } - i_len = count_utf8_string( psz_text ); + p_os2_iconv = ( os2_iconv_t * )iconv_open( tocode, fromcode ); - while( i_len > i_line ) + if( p_os2_iconv != ( iconv_t )(-1)) { - /* Look if there is a newline somewhere. */ - char *psz_parser = psz_line; - int i_count = 0; - while( i_count <= i_line && *psz_parser != '\n' ) - { - while( *((unsigned char *)psz_parser) >= 0x80UL ) psz_parser++; - psz_parser++; - i_count++; - } - if( *psz_parser == '\n' ) - { - i_len -= (i_count + 1); - psz_line = psz_parser + 1; - continue; - } - - /* Find the furthest space. */ - while( psz_parser > psz_line && *psz_parser != ' ' ) - { - while( *((unsigned char *)psz_parser) >= 0x80UL ) psz_parser--; - psz_parser--; - i_count--; - } - if( *psz_parser == ' ' ) - { - *psz_parser = '\n'; - i_len -= (i_count + 1); - psz_line = psz_parser + 1; - continue; - } + /* Mimic a behavior of GNU libiconv */ + uconv_attribute_t attr; - /* Wrapping has failed. Find the first space or newline */ - while( i_count < i_len && *psz_parser != ' ' && *psz_parser != '\n' ) - { - while( *((unsigned char *)psz_parser) >= 0x80UL ) psz_parser++; - psz_parser++; - i_count++; - } - if( i_count < i_len ) *psz_parser = '\n'; - i_len -= (i_count + 1); - psz_line = psz_parser + 1; + UniQueryUconvObject( p_os2_iconv->from, &attr, + sizeof( uconv_attribute_t ), + NULL, NULL, NULL ); + attr.converttype |= CVTTYPE_PATH; + UniSetUconvObject( p_os2_iconv->from, &attr ); } - return psz_new_text; -} - -/***************************************************************************** - * iconv wrapper - *****************************************************************************/ -vlc_iconv_t vlc_iconv_open( const char *tocode, const char *fromcode ) -{ -#if defined(HAVE_ICONV) + return ( vlc_iconv_t )p_os2_iconv; +# else return iconv_open( tocode, fromcode ); +# endif #else - return NULL; + return (vlc_iconv_t)(-1); #endif } size_t vlc_iconv( vlc_iconv_t cd, const char **inbuf, size_t *inbytesleft, char **outbuf, size_t *outbytesleft ) { +#ifndef __linux__ + if ( cd == (vlc_iconv_t)(-2) ) + return ISO6937toUTF8( (const unsigned char **)inbuf, inbytesleft, + (unsigned char **)outbuf, outbytesleft ); +#endif #if defined(HAVE_ICONV) return iconv( cd, (ICONV_CONST char **)inbuf, inbytesleft, outbuf, outbytesleft ); #else - int i_bytes; - - if (inbytesleft == NULL || outbytesleft == NULL) - { - return 0; - } - - i_bytes = __MIN(*inbytesleft, *outbytesleft); - if( !inbuf || !outbuf || !i_bytes ) return (size_t)(-1); - memcpy( *outbuf, *inbuf, i_bytes ); - inbuf += i_bytes; - outbuf += i_bytes; - inbytesleft -= i_bytes; - outbytesleft -= i_bytes; - return i_bytes; + abort (); #endif } int vlc_iconv_close( vlc_iconv_t cd ) { +#ifndef __linux__ + if ( cd == (vlc_iconv_t)(-2) ) + return 0; +#endif #if defined(HAVE_ICONV) return iconv_close( cd ); #else - return 0; + abort (); #endif } @@ -744,10 +409,10 @@ int vlc_iconv_close( vlc_iconv_t cd ) * reduce a fraction * (adapted from libavcodec, author Michael Niedermayer ) *****************************************************************************/ -vlc_bool_t vlc_ureduce( unsigned *pi_dst_nom, unsigned *pi_dst_den, +bool vlc_ureduce( unsigned *pi_dst_nom, unsigned *pi_dst_den, uint64_t i_nom, uint64_t i_den, uint64_t i_max ) { - vlc_bool_t b_exact = 1; + bool b_exact = 1; uint64_t i_gcd; if( i_den == 0 ) @@ -761,7 +426,7 @@ vlc_bool_t vlc_ureduce( unsigned *pi_dst_nom, unsigned *pi_dst_den, i_nom /= i_gcd; i_den /= i_gcd; - if( i_max == 0 ) i_max = I64C(0xFFFFFFFF); + if( i_max == 0 ) i_max = INT64_C(0xFFFFFFFF); if( i_nom > i_max || i_den > i_max ) { @@ -792,445 +457,3 @@ vlc_bool_t vlc_ureduce( unsigned *pi_dst_nom, unsigned *pi_dst_den, return b_exact; } - -/************************************************************************* - * vlc_parse_cmdline: Command line parsing into elements. - * - * The command line is composed of space/tab separated arguments. - * Quotes can be used as argument delimiters and a backslash can be used to - * escape a quote. - *************************************************************************/ -static void find_end_quote( char **s, char **ppsz_parser, int i_quote ) -{ - int i_bcount = 0; - - while( **s ) - { - if( **s == '\\' ) - { - **ppsz_parser = **s; - (*ppsz_parser)++; (*s)++; - i_bcount++; - } - else if( **s == '"' || **s == '\'' ) - { - /* Preceeded by a number of '\' which we erase. */ - *ppsz_parser -= i_bcount / 2; - if( i_bcount & 1 ) - { - /* '\\' followed by a '"' or '\'' */ - *ppsz_parser -= 1; - **ppsz_parser = **s; - (*ppsz_parser)++; (*s)++; - i_bcount = 0; - continue; - } - - if( **s == i_quote ) - { - /* End */ - return; - } - else - { - /* Different quoting */ - int i_quote = **s; - **ppsz_parser = **s; - (*ppsz_parser)++; (*s)++; - find_end_quote( s, ppsz_parser, i_quote ); - **ppsz_parser = **s; - (*ppsz_parser)++; (*s)++; - } - - i_bcount = 0; - } - else - { - /* A regular character */ - **ppsz_parser = **s; - (*ppsz_parser)++; (*s)++; - i_bcount = 0; - } - } -} - -char **vlc_parse_cmdline( const char *psz_cmdline, int *i_args ) -{ - int argc = 0; - char **argv = 0; - char *s, *psz_parser, *psz_arg, *psz_orig; - int i_bcount = 0; - - if( !psz_cmdline ) return 0; - psz_orig = strdup( psz_cmdline ); - psz_arg = psz_parser = s = psz_orig; - - while( *s ) - { - if( *s == '\t' || *s == ' ' ) - { - /* We have a complete argument */ - *psz_parser = 0; - TAB_APPEND( argc, argv, strdup(psz_arg) ); - - /* Skip trailing spaces/tabs */ - do{ s++; } while( *s == '\t' || *s == ' ' ); - - /* New argument */ - psz_arg = psz_parser = s; - i_bcount = 0; - } - else if( *s == '\\' ) - { - *psz_parser++ = *s++; - i_bcount++; - } - else if( *s == '"' || *s == '\'' ) - { - if( ( i_bcount & 1 ) == 0 ) - { - /* Preceeded by an even number of '\', this is half that - * number of '\', plus a quote which we erase. */ - int i_quote = *s; - psz_parser -= i_bcount / 2; - s++; - find_end_quote( &s, &psz_parser, i_quote ); - s++; - } - else - { - /* Preceeded by an odd number of '\', this is half that - * number of '\' followed by a '"' */ - psz_parser = psz_parser - i_bcount/2 - 1; - *psz_parser++ = '"'; - s++; - } - i_bcount = 0; - } - else - { - /* A regular character */ - *psz_parser++ = *s++; - i_bcount = 0; - } - } - - /* Take care of the last arg */ - if( *psz_arg ) - { - *psz_parser = '\0'; - TAB_APPEND( argc, argv, strdup(psz_arg) ); - } - - if( i_args ) *i_args = argc; - free( psz_orig ); - return argv; -} - -/************************************************************************* - * vlc_execve: Execute an external program with a given environment, - * wait until it finishes and return its standard output - *************************************************************************/ -int __vlc_execve( vlc_object_t *p_object, int i_argc, char *const *ppsz_argv, - char *const *ppsz_env, const char *psz_cwd, - const char *p_in, size_t i_in, - char **pp_data, size_t *pi_data ) -{ - (void)i_argc; // <-- hmph -#ifdef HAVE_FORK -# define BUFSIZE 1024 - int fds[2], i_status; - - if (socketpair (AF_LOCAL, SOCK_STREAM, 0, fds)) - return -1; - - pid_t pid = -1; - if ((fds[0] > 2) && (fds[1] > 2)) - pid = fork (); - - switch (pid) - { - case -1: - msg_Err (p_object, "unable to fork (%m)"); - close (fds[0]); - close (fds[1]); - return -1; - - case 0: - { - sigset_t set; - sigemptyset (&set); - pthread_sigmask (SIG_SETMASK, &set, NULL); - - /* NOTE: - * Like it or not, close can fail (and not only with EBADF) - */ - if ((close (0) == 0) && (close (1) == 0) && (close (2) == 0) - && (dup (fds[1]) == 0) && (dup (fds[1]) == 1) - && (open ("/dev/null", O_RDONLY) == 2) - && ((psz_cwd == NULL) || (chdir (psz_cwd) == 0))) - execve (ppsz_argv[0], ppsz_argv, ppsz_env); - - exit (EXIT_FAILURE); - } - } - - close (fds[1]); - - *pi_data = 0; - if (*pp_data) - free (*pp_data); - *pp_data = NULL; - - if (i_in == 0) - shutdown (fds[0], SHUT_WR); - - while (!p_object->b_die) - { - struct pollfd ufd[1]; - memset (ufd, 0, sizeof (ufd)); - ufd[0].fd = fds[0]; - ufd[0].events = POLLIN; - - if (i_in > 0) - ufd[0].events |= POLLOUT; - - if (poll (ufd, 1, 10) <= 0) - continue; - - if (ufd[0].revents & ~POLLOUT) - { - char *ptr = realloc (*pp_data, *pi_data + BUFSIZE + 1); - if (ptr == NULL) - break; /* safely abort */ - - *pp_data = ptr; - - ssize_t val = read (fds[0], ptr + *pi_data, BUFSIZE); - switch (val) - { - case -1: - case 0: - shutdown (fds[0], SHUT_RD); - break; - - default: - *pi_data += val; - } - } - - if (ufd[0].revents & POLLOUT) - { - ssize_t val = write (fds[0], p_in, i_in); - switch (val) - { - case -1: - case 0: - i_in = 0; - shutdown (fds[0], SHUT_WR); - break; - - default: - i_in -= val; - p_in += val; - } - } - } - - close (fds[0]); - - while (waitpid (pid, &i_status, 0) == -1); - - if (WIFEXITED (i_status)) - { - i_status = WEXITSTATUS (i_status); - if (i_status) - msg_Warn (p_object, "child %s (PID %d) exited with error code %d", - ppsz_argv[0], (int)pid, i_status); - } - else - if (WIFSIGNALED (i_status)) // <-- this should be redumdant a check - { - i_status = WTERMSIG (i_status); - msg_Warn (p_object, "child %s (PID %d) exited on signal %d (%s)", - ppsz_argv[0], (int)pid, i_status, strsignal (i_status)); - } - -#elif defined( WIN32 ) && !defined( UNDER_CE ) - SECURITY_ATTRIBUTES saAttr; - PROCESS_INFORMATION piProcInfo; - STARTUPINFO siStartInfo; - BOOL bFuncRetn = FALSE; - HANDLE hChildStdinRd, hChildStdinWr, hChildStdoutRd, hChildStdoutWr; - DWORD i_status; - char *psz_cmd = NULL, *p_env = NULL, *p = NULL; - char **ppsz_parser; - int i_size; - - /* Set the bInheritHandle flag so pipe handles are inherited. */ - saAttr.nLength = sizeof(SECURITY_ATTRIBUTES); - saAttr.bInheritHandle = TRUE; - saAttr.lpSecurityDescriptor = NULL; - - /* Create a pipe for the child process's STDOUT. */ - if ( !CreatePipe( &hChildStdoutRd, &hChildStdoutWr, &saAttr, 0 ) ) - { - msg_Err( p_object, "stdout pipe creation failed" ); - return -1; - } - - /* Ensure the read handle to the pipe for STDOUT is not inherited. */ - SetHandleInformation( hChildStdoutRd, HANDLE_FLAG_INHERIT, 0 ); - - /* Create a pipe for the child process's STDIN. */ - if ( !CreatePipe( &hChildStdinRd, &hChildStdinWr, &saAttr, 0 ) ) - { - msg_Err( p_object, "stdin pipe creation failed" ); - return -1; - } - - /* Ensure the write handle to the pipe for STDIN is not inherited. */ - SetHandleInformation( hChildStdinWr, HANDLE_FLAG_INHERIT, 0 ); - - /* Set up members of the PROCESS_INFORMATION structure. */ - ZeroMemory( &piProcInfo, sizeof(PROCESS_INFORMATION) ); - - /* Set up members of the STARTUPINFO structure. */ - ZeroMemory( &siStartInfo, sizeof(STARTUPINFO) ); - siStartInfo.cb = sizeof(STARTUPINFO); - siStartInfo.hStdError = hChildStdoutWr; - siStartInfo.hStdOutput = hChildStdoutWr; - siStartInfo.hStdInput = hChildStdinRd; - siStartInfo.wShowWindow = SW_HIDE; - siStartInfo.dwFlags |= STARTF_USESTDHANDLES | STARTF_USESHOWWINDOW; - - /* Set up the command line. */ - psz_cmd = malloc(32768); - if( !psz_cmd ) - return -1; - psz_cmd[0] = '\0'; - i_size = 32768; - ppsz_parser = &ppsz_argv[0]; - while ( ppsz_parser[0] != NULL && i_size > 0 ) - { - /* Protect the last argument with quotes ; the other arguments - * are supposed to be already protected because they have been - * passed as a command-line option. */ - if ( ppsz_parser[1] == NULL ) - { - strncat( psz_cmd, "\"", i_size ); - i_size--; - } - strncat( psz_cmd, *ppsz_parser, i_size ); - i_size -= strlen( *ppsz_parser ); - if ( ppsz_parser[1] == NULL ) - { - strncat( psz_cmd, "\"", i_size ); - i_size--; - } - strncat( psz_cmd, " ", i_size ); - i_size--; - ppsz_parser++; - } - - /* Set up the environment. */ - p = p_env = malloc(32768); - if( !p ) - { - free( psz_cmd ); - return -1; - } - - i_size = 32768; - ppsz_parser = &ppsz_env[0]; - while ( *ppsz_parser != NULL && i_size > 0 ) - { - memcpy( p, *ppsz_parser, - __MIN((int)(strlen(*ppsz_parser) + 1), i_size) ); - p += strlen(*ppsz_parser) + 1; - i_size -= strlen(*ppsz_parser) + 1; - ppsz_parser++; - } - *p = '\0'; - - /* Create the child process. */ - bFuncRetn = CreateProcess( NULL, - psz_cmd, // command line - NULL, // process security attributes - NULL, // primary thread security attributes - TRUE, // handles are inherited - 0, // creation flags - p_env, - psz_cwd, - &siStartInfo, // STARTUPINFO pointer - &piProcInfo ); // receives PROCESS_INFORMATION - - free( psz_cmd ); - free( p_env ); - - if ( bFuncRetn == 0 ) - { - msg_Err( p_object, "child creation failed" ); - return -1; - } - - /* Read from a file and write its contents to a pipe. */ - while ( i_in > 0 && !p_object->b_die ) - { - DWORD i_written; - if ( !WriteFile( hChildStdinWr, p_in, i_in, &i_written, NULL ) ) - break; - i_in -= i_written; - p_in += i_written; - } - - /* Close the pipe handle so the child process stops reading. */ - CloseHandle(hChildStdinWr); - - /* Close the write end of the pipe before reading from the - * read end of the pipe. */ - CloseHandle(hChildStdoutWr); - - /* Read output from the child process. */ - *pi_data = 0; - if( *pp_data ) - free( pp_data ); - *pp_data = NULL; - *pp_data = malloc( 1025 ); /* +1 for \0 */ - - while ( !p_object->b_die ) - { - DWORD i_read; - if ( !ReadFile( hChildStdoutRd, &(*pp_data)[*pi_data], 1024, &i_read, - NULL ) - || i_read == 0 ) - break; - *pi_data += i_read; - *pp_data = realloc( *pp_data, *pi_data + 1025 ); - } - - while ( !p_object->b_die - && !GetExitCodeProcess( piProcInfo.hProcess, &i_status ) - && i_status != STILL_ACTIVE ) - msleep( 10000 ); - - CloseHandle(piProcInfo.hProcess); - CloseHandle(piProcInfo.hThread); - - if ( i_status ) - msg_Warn( p_object, - "child %s returned with error code %ld", - ppsz_argv[0], i_status ); - -#else - msg_Err( p_object, "vlc_execve called but no implementation is available" ); - return -1; - -#endif - - if (*pp_data == NULL) - return -1; - - (*pp_data)[*pi_data] = '\0'; - return 0; -}