* libc.c: Extra libc function for some systems.
*****************************************************************************
* Copyright (C) 2002 VideoLAN
- * $Id: libc.c,v 1.2 2002/11/12 10:44:04 gbazin Exp $
+ * $Id: libc.c,v 1.16 2004/02/09 16:12:25 sigmunau Exp $
*
* Authors: Jon Lech Johansen <jon-vl@nanocrew.net>
* Samuel Hocevar <sam@zoy.org>
* 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
/*****************************************************************************
* getenv: just in case, but it should never be called
*****************************************************************************/
-#ifndef HAVE_GETENV
-char *getenv( const char *name )
+#if !defined( HAVE_GETENV )
+char *vlc_getenv( const char *name )
{
return NULL;
}
#endif
/*****************************************************************************
- * strdup: returns a malloc'd copy of a string
+ * strdup: returns a malloc'd copy of a string
*****************************************************************************/
-#ifndef HAVE_STRDUP
-char *strdup( const char *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
+ * 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?
*****************************************************************************/
-#ifndef HAVE_STRNDUP
-char *strndup( const char *string, size_t n )
+#if !defined( HAVE_STRNDUP )
+char *vlc_strndup( const char *string, size_t n )
{
char *psz;
size_t len = strlen( string );
- len = __MIN( len, n );
+ len = __MIN( len, n );
psz = (char*)malloc( len + 1 );
if( psz != NULL )
psz[ len ] = 0;
}
- return( psz );
+ return psz;
}
#endif
* strcasecmp: compare two strings ignoring case
*****************************************************************************/
#if !defined( HAVE_STRCASECMP ) && !defined( HAVE_STRICMP )
-int strcasecmp( const char *s1, const char *s2 )
+int vlc_strcasecmp( const char *s1, const char *s2 )
{
int i_delta = 0;
{
i_delta += 'A' - 'a';
}
+
+ s1++; s2++;
}
return i_delta;
* strncasecmp: compare n chars from two strings ignoring case
*****************************************************************************/
#if !defined( HAVE_STRNCASECMP ) && !defined( HAVE_STRNICMP )
-int strncasecmp( const char *s1, const char *s2, size_t n )
+int vlc_strncasecmp( const char *s1, const char *s2, size_t n )
{
int i_delta = 0;
{
i_delta += 'A' - 'a';
}
+
+ s1++; s2++;
}
return i_delta;
}
#endif
+/*****************************************************************************
+ * vasprintf:
+ *****************************************************************************/
+#if !defined(HAVE_VASPRINTF) || defined(SYS_DARWIN) || 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)
+ {
+ *strp = p;
+ return strlen( p );
+ }
+ /* 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(SYS_DARWIN) || 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.
*****************************************************************************/
-#ifndef HAVE_ATOF
-double atof( const char *nptr )
-{
+#if !defined( HAVE_ATOF )
+double vlc_atof( const char *nptr )
+{
double f_result;
wchar_t *psz_tmp;
int i_len = strlen( nptr ) + 1;
-
+
psz_tmp = malloc( i_len * sizeof(wchar_t) );
MultiByteToWideChar( CP_ACP, 0, nptr, -1, psz_tmp, i_len );
f_result = wcstod( psz_tmp, NULL );
}
#endif
+/*****************************************************************************
+ * atoll: convert a string to a 64 bits int.
+ *****************************************************************************/
+#if !defined( HAVE_ATOLL )
+int64_t vlc_atoll( const char *str )
+{
+ int64_t i_value = 0;
+ int sign = 1;
+
+ if( *str == '-' )
+ {
+ sign = -1;
+ }
+
+ while( *str >= '0' && *str <= '9' )
+ {
+ i_value = i_value * 10 + ( *str++ - '0' );
+ }
+
+ return i_value * sign;
+}
+#endif
+
/*****************************************************************************
* lseek: reposition read/write file offset.
*****************************************************************************
* FIXME: this cast sucks!
*****************************************************************************/
#if !defined( HAVE_LSEEK )
-off_t lseek( int fildes, off_t offset, int whence )
+off_t vlc_lseek( int fildes, off_t offset, int whence )
{
- return SetFilePointer( (HANDLE)fildes, offset, NULL, whence );
+ return SetFilePointer( (HANDLE)fildes, (long)offset, NULL, whence );
}
#endif
+/*****************************************************************************
+ * dgettext: gettext for plugins.
+ *****************************************************************************/
+char *vlc_dgettext( const char *package, const char *msgid )
+{
+#if defined( ENABLE_NLS ) \
+ && ( defined(HAVE_GETTEXT) || defined(HAVE_INCLUDED_GETTEXT) )
+ return dgettext( package, msgid );
+#else
+ return (char *)msgid;
+#endif
+}
+
+/*****************************************************************************
+ * 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 )
+ {
+ if( ((unsigned char *)psz_string)[ i ] < 0x80UL ) i_count++;
+ i++;
+ }
+ 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, vlc_bool_t b_utf8 )
+{
+ int i_len;
+ char *psz_line, *psz_new_text;
+
+ psz_line = psz_new_text = strdup( psz_text );
+
+ if( b_utf8 )
+ i_len = count_utf8_string( psz_text );
+ else
+ i_len = strlen( psz_text );
+
+ while( i_len > i_line )
+ {
+ /* Look if there is a newline somewhere. */
+ char *psz_parser = psz_line;
+ int i_count = 0;
+ while( i_count <= i_line && *psz_parser != '\n' )
+ {
+ if( b_utf8 )
+ {
+ 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 != ' ' )
+ {
+ if( b_utf8 )
+ {
+ 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;
+ }
+
+ /* Wrapping has failed. Find the first space or newline */
+ while( i_count < i_len && *psz_parser != ' ' && *psz_parser != '\n' )
+ {
+ if( b_utf8 )
+ {
+ 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;
+ }
+
+ return psz_new_text;
+}