# include <vlc_network.h> /* 'net_strerror' and 'WSAGetLastError' */
#endif
-#ifdef HAVE_UNISTD_H
-# include <unistd.h> /* close(), write() */
-#endif
-
#include <assert.h>
#include <vlc_charset.h>
#include "../libvlc.h"
-/*****************************************************************************
- * Local macros
- *****************************************************************************/
-#if defined(HAVE_VA_COPY)
-# define vlc_va_copy(dest,src) va_copy(dest,src)
-#elif defined(HAVE___VA_COPY)
-# define vlc_va_copy(dest,src) __va_copy(dest,src)
-#else
-# define vlc_va_copy(dest,src) (dest)=(src)
-#endif
-
-static inline msg_bank_t *libvlc_bank (libvlc_int_t *inst)
-{
- return (libvlc_priv (inst))->msg_bank;
-}
-
-/*****************************************************************************
- * Local prototypes
- *****************************************************************************/
-static void PrintMsg ( vlc_object_t *, msg_item_t * );
-
-static vlc_mutex_t msg_stack_lock = VLC_STATIC_MUTEX;
-
/**
* Store all data required by messages interfaces.
*/
-struct msg_bank_t
-{
- /** Message queue lock */
- vlc_rwlock_t lock;
-
- /* Subscribers */
- int i_sub;
- msg_subscription_t **pp_sub;
-
- locale_t locale; /**< C locale for error messages */
- vlc_dictionary_t enabled_objects; ///< Enabled objects
- bool all_objects_enabled; ///< Should we print all objects?
-};
-
-/**
- * Initialize messages queues
- * This function initializes all message queues
- */
-msg_bank_t *msg_Create (void)
-{
- msg_bank_t *bank = malloc (sizeof (*bank));
-
- vlc_rwlock_init (&bank->lock);
- vlc_dictionary_init (&bank->enabled_objects, 0);
- bank->all_objects_enabled = true;
-
- bank->i_sub = 0;
- bank->pp_sub = NULL;
-
- /* C locale to get error messages in English in the logs */
- bank->locale = newlocale (LC_MESSAGES_MASK, "C", (locale_t)0);
- return bank;
-}
-
-/**
- * Object Printing selection
- */
-static void const * kObjectPrintingEnabled = &kObjectPrintingEnabled;
-static void const * kObjectPrintingDisabled = &kObjectPrintingDisabled;
-
-
-#undef msg_EnableObjectPrinting
-void msg_EnableObjectPrinting (vlc_object_t *obj, const char * psz_object)
-{
- msg_bank_t *bank = libvlc_bank (obj->p_libvlc);
-
- vlc_rwlock_wrlock (&bank->lock);
- if( !strcmp(psz_object, "all") )
- bank->all_objects_enabled = true;
- else
- vlc_dictionary_insert (&bank->enabled_objects, psz_object,
- (void *)kObjectPrintingEnabled);
- vlc_rwlock_unlock (&bank->lock);
-}
-
-#undef msg_DisableObjectPrinting
-void msg_DisableObjectPrinting (vlc_object_t *obj, const char * psz_object)
-{
- msg_bank_t *bank = libvlc_bank (obj->p_libvlc);
-
- vlc_rwlock_wrlock (&bank->lock);
- if( !strcmp(psz_object, "all") )
- bank->all_objects_enabled = false;
- else
- vlc_dictionary_insert (&bank->enabled_objects, psz_object,
- (void *)kObjectPrintingDisabled);
- vlc_rwlock_unlock (&bank->lock);
-}
-
-/**
- * Destroy the message queues
- *
- * This functions prints all messages remaining in the queues,
- * then frees all the allocated resources
- * No other messages interface functions should be called after this one.
- */
-void msg_Destroy (msg_bank_t *bank)
-{
- if (unlikely(bank->i_sub != 0))
- fputs ("stale interface subscribers (LibVLC might crash)\n", stderr);
-
- if (bank->locale != (locale_t)0)
- freelocale (bank->locale);
-
- vlc_dictionary_clear (&bank->enabled_objects, NULL, NULL);
-
- vlc_rwlock_destroy (&bank->lock);
- free (bank);
-}
+vlc_rwlock_t msg_lock = VLC_STATIC_RWLOCK;
+msg_subscription_t *msg_head;
struct msg_subscription_t
{
- libvlc_int_t *instance;
+ msg_subscription_t *prev, *next;
msg_callback_t func;
- msg_cb_data_t *opaque;
- int verbosity;
+ void *opaque;
};
/**
* Whenever a message is emitted, a callback will be called.
* Callback invocation are serialized within a subscription.
*
- * @param instance LibVLC instance to get messages from
* @param cb callback function
* @param opaque data for the callback function
* @return a subscription pointer, or NULL in case of failure
*/
-msg_subscription_t *msg_Subscribe (libvlc_int_t *instance, msg_callback_t cb,
- msg_cb_data_t *opaque)
+msg_subscription_t *vlc_Subscribe (msg_callback_t cb, void *opaque)
{
msg_subscription_t *sub = malloc (sizeof (*sub));
if (sub == NULL)
return NULL;
- sub->instance = instance;
+ sub->prev = NULL;
sub->func = cb;
sub->opaque = opaque;
- sub->verbosity = 2; /* by default, give all the messages */
- msg_bank_t *bank = libvlc_bank (instance);
- vlc_rwlock_wrlock (&bank->lock);
- TAB_APPEND (bank->i_sub, bank->pp_sub, sub);
- vlc_rwlock_unlock (&bank->lock);
+ vlc_rwlock_wrlock (&msg_lock);
+ sub->next = msg_head;
+ msg_head = sub;
+ vlc_rwlock_unlock (&msg_lock);
return sub;
}
* Unsubscribe from the message queue.
* This function waits for the message callback to return if needed.
*/
-void msg_Unsubscribe (msg_subscription_t *sub)
+void vlc_Unsubscribe (msg_subscription_t *sub)
{
- msg_bank_t *bank = libvlc_bank (sub->instance);
-
- vlc_rwlock_wrlock (&bank->lock);
- TAB_REMOVE (bank->i_sub, bank->pp_sub, sub);
- vlc_rwlock_unlock (&bank->lock);
+ vlc_rwlock_wrlock (&msg_lock);
+ if (sub->next != NULL)
+ sub->next->prev = sub->prev;
+ if (sub->prev != NULL)
+ sub->prev->next = sub->next;
+ else
+ {
+ assert (msg_head == sub);
+ msg_head = sub->next;
+ }
+ vlc_rwlock_unlock (&msg_lock);
free (sub);
}
-void msg_SubscriptionSetVerbosity( msg_subscription_t *sub, const int i_verbosity )
-{
- if( i_verbosity < 0 || i_verbosity > 2 ) return;
-
- msg_bank_t *bank = libvlc_bank ( sub->instance );
-
- vlc_rwlock_wrlock (&bank->lock);
-
- sub->verbosity = i_verbosity;
-
- vlc_rwlock_unlock (&bank->lock);
-}
-/*****************************************************************************
- * msg_*: print a message
- *****************************************************************************
- * These functions queue a message for later printing.
- *****************************************************************************/
-void msg_Generic( vlc_object_t *p_this, int i_type, const char *psz_module,
- const char *psz_format, ... )
-{
- va_list args;
-
- va_start( args, psz_format );
- msg_GenericVa (p_this, i_type, psz_module, psz_format, args);
- va_end( args );
-}
-
/**
- * Destroys a message.
+ * Emit a log message.
+ * \param obj VLC object emitting the message or NULL
+ * \param type VLC_MSG_* message type (info, error, warning or debug)
+ * \param module name of module from which the message come
+ * (normally MODULE_STRING)
+ * \param format printf-like message format
*/
-static void msg_Free (gc_object_t *gc)
+void vlc_Log (vlc_object_t *obj, int type, const char *module,
+ const char *format, ... )
{
- msg_item_t *msg = vlc_priv (gc, msg_item_t);
+ va_list args;
- free (msg->psz_module);
- free (msg->psz_msg);
- free (msg->psz_header);
- free (msg);
+ va_start (args, format);
+ vlc_vaLog (obj, type, module, format, args);
+ va_end (args);
}
-#undef msg_GenericVa
+static void PrintColorMsg (void *, int, const msg_item_t *,
+ const char *, va_list);
+static void PrintMsg (void *, int, const msg_item_t *, const char *, va_list);
+
/**
- * Add a message to a queue
- *
- * This function provides basic functionnalities to other msg_* functions.
- * It adds a message to a queue (after having printed all stored messages if it
- * is full). If the message can't be converted to string in memory, it issues
- * a warning.
+ * Emit a log message. This function is the variable argument list equivalent
+ * to vlc_Log().
*/
-void msg_GenericVa (vlc_object_t *p_this, int i_type,
- const char *psz_module,
- const char *psz_format, va_list _args)
+void vlc_vaLog (vlc_object_t *obj, int type, const char *module,
+ const char *format, va_list args)
{
- size_t i_header_size; /* Size of the additionnal header */
- vlc_object_t *p_obj;
- char * psz_str = NULL; /* formatted message string */
- char * psz_header = NULL;
- va_list args;
-
- assert (p_this);
-
- if( p_this->i_flags & OBJECT_FLAGS_QUIET ||
- (p_this->i_flags & OBJECT_FLAGS_NODBG && i_type == VLC_MSG_DBG) )
+ if (obj != NULL && obj->i_flags & OBJECT_FLAGS_QUIET)
return;
- msg_bank_t *bank = libvlc_bank (p_this->p_libvlc);
- locale_t locale = uselocale (bank->locale);
+ /* C locale to get error messages in English in the logs */
+ locale_t c = newlocale (LC_MESSAGES_MASK, "C", (locale_t)0);
+ locale_t locale = uselocale (c);
#ifndef __GLIBC__
/* Expand %m to strerror(errno) - only once */
- char buf[strlen( psz_format ) + 2001], *ptr;
- strcpy( buf, psz_format );
+ char buf[strlen(format) + 2001], *ptr;
+ strcpy (buf, format);
ptr = (char*)buf;
- psz_format = (const char*) buf;
+ format = (const char*) buf;
for( ;; )
{
}
#endif
- /* Convert message to string */
- vlc_va_copy( args, _args );
- if( vasprintf( &psz_str, psz_format, args ) == -1 )
- psz_str = NULL;
- va_end( args );
+ /* Fill message information fields */
+ msg_item_t msg;
- if( psz_str == NULL )
- {
- int canc = vlc_savecancel (); /* Do not print half of a message... */
-#ifdef __GLIBC__
- fprintf( stderr, "main warning: can't store message (%m): " );
-#else
- char psz_err[1001];
-#ifndef WIN32
- /* we're not using GLIBC, so we are sure that the error description
- * will be stored in the buffer we provide to strerror_r() */
- strerror_r( errno, psz_err, 1001 );
-#else
- strncpy( psz_err, strerror( errno ), 1001 );
-#endif
- psz_err[1000] = '\0';
- fprintf( stderr, "main warning: can't store message (%s): ", psz_err );
-#endif
- vlc_va_copy( args, _args );
- /* We should use utf8_vfprintf - but it calls malloc()... */
- vfprintf( stderr, psz_format, args );
- va_end( args );
- fputs( "\n", stderr );
- vlc_restorecancel (canc);
- uselocale (locale);
- return;
- }
- uselocale (locale);
+ msg.i_object_id = (uintptr_t)obj;
+ msg.psz_object_type = (obj != NULL) ? obj->psz_object_type : "generic";
+ msg.psz_module = module;
+ msg.psz_header = NULL;
- msg_item_t * p_item = malloc (sizeof (*p_item));
- if (p_item == NULL)
- return; /* Uho! */
+ for (vlc_object_t *o = obj; o != NULL; o = o->p_parent)
+ if (o->psz_header != NULL)
+ {
+ msg.psz_header = o->psz_header;
+ break;
+ }
- vlc_gc_init (p_item, msg_Free);
- p_item->psz_module = p_item->psz_msg = p_item->psz_header = NULL;
+ /* Pass message to subscribers */
+ libvlc_priv_t *priv = libvlc_priv (obj->p_libvlc);
+ va_list ap;
+ va_copy (ap, args);
+ if (priv->b_color)
+ PrintColorMsg (&priv->i_verbose, type, &msg, format, ap);
+ else
+ PrintMsg (&priv->i_verbose, type, &msg, format, ap);
+ va_end (ap);
- i_header_size = 0;
- p_obj = p_this;
- while( p_obj != NULL )
+ vlc_rwlock_rdlock (&msg_lock);
+ for (msg_subscription_t *sub = msg_head; sub != NULL; sub = sub->next)
{
- char *psz_old = NULL;
- if( p_obj->psz_header )
- {
- i_header_size += strlen( p_obj->psz_header ) + 4;
- if( psz_header )
- {
- psz_old = strdup( psz_header );
- psz_header = xrealloc( psz_header, i_header_size );
- snprintf( psz_header, i_header_size , "[%s] %s",
- p_obj->psz_header, psz_old );
- }
- else
- {
- psz_header = xmalloc( i_header_size );
- snprintf( psz_header, i_header_size, "[%s]",
- p_obj->psz_header );
- }
- }
- free( psz_old );
- p_obj = p_obj->p_parent;
+ va_copy (ap, args);
+ sub->func (sub->opaque, type, &msg, format, ap);
+ va_end (ap);
}
+ vlc_rwlock_unlock (&msg_lock);
- /* Fill message information fields */
- p_item->i_type = i_type;
- p_item->i_object_id = (uintptr_t)p_this;
- p_item->psz_object_type = p_this->psz_object_type;
- p_item->psz_module = strdup( psz_module );
- p_item->psz_msg = psz_str;
- p_item->psz_header = psz_header;
+ uselocale (locale);
+ freelocale (c);
+}
- PrintMsg( p_this, p_item );
+static const char msg_type[4][9] = { "", " error", " warning", " debug" };
+#define COL(x,y) "\033[" #x ";" #y "m"
+#define RED COL(31,1)
+#define GREEN COL(32,1)
+#define YELLOW COL(0,33)
+#define WHITE COL(0,1)
+#define GRAY "\033[0m"
+static const char msg_color[4][8] = { WHITE, RED, YELLOW, GRAY };
+
+static void PrintColorMsg (void *d, int type, const msg_item_t *p_item,
+ const char *format, va_list ap)
+{
+ const int *pverbose = d;
+ FILE *stream = stderr;
- vlc_rwlock_rdlock (&bank->lock);
- for (int i = 0; i < bank->i_sub; i++)
- {
- msg_subscription_t *sub = bank->pp_sub[i];
- libvlc_priv_t *priv = libvlc_priv( sub->instance );
- msg_bank_t *bank = priv->msg_bank;
- void *val = vlc_dictionary_value_for_key( &bank->enabled_objects,
- p_item->psz_module );
- if( val == kObjectPrintingDisabled ) continue;
- if( val != kObjectPrintingEnabled ) /*if not allowed */
- {
- val = vlc_dictionary_value_for_key( &bank->enabled_objects,
- p_item->psz_object_type );
- if( val == kObjectPrintingDisabled ) continue;
- if( val == kObjectPrintingEnabled ); /* Allowed */
- else if( !bank->all_objects_enabled ) continue;
- }
- switch( p_item->i_type )
- {
- case VLC_MSG_INFO:
- case VLC_MSG_ERR:
- if( sub->verbosity < 0 ) continue;
- break;
- case VLC_MSG_WARN:
- if( sub->verbosity < 1 ) continue;
- break;
- case VLC_MSG_DBG:
- if( sub->verbosity < 2 ) continue;
- break;
- }
+ if (*pverbose < 0 || *pverbose < (type - VLC_MSG_ERR))
+ return;
- sub->func (sub->opaque, p_item, 0);
- }
- vlc_rwlock_unlock (&bank->lock);
- msg_Release (p_item);
+ int canc = vlc_savecancel ();
+
+ flockfile (stream);
+ fprintf (stream, "["GREEN"%p"GRAY"] ", (void *)p_item->i_object_id);
+ if (p_item->psz_header != NULL)
+ utf8_fprintf (stream, "[%s] ", p_item->psz_header);
+ utf8_fprintf (stream, "%s %s%s: %s", p_item->psz_module,
+ p_item->psz_object_type, msg_type[type], msg_color[type]);
+ utf8_vfprintf (stream, format, ap);
+ fputs (GRAY"\n", stream);
+#if defined (WIN32) || defined (__OS2__)
+ fflush (stream);
+#endif
+ funlockfile (stream);
+ vlc_restorecancel (canc);
}
-/*****************************************************************************
- * PrintMsg: output a standard message item to stderr
- *****************************************************************************
- * Print a message to stderr, with colour formatting if needed.
- *****************************************************************************/
-static void PrintMsg ( vlc_object_t * p_this, msg_item_t * p_item )
+static void PrintMsg (void *d, int type, const msg_item_t *p_item,
+ const char *format, va_list ap)
{
-# define COL(x,y) "\033[" #x ";" #y "m"
-# define RED COL(31,1)
-# define GREEN COL(32,1)
-# define YELLOW COL(0,33)
-# define WHITE COL(0,1)
-# define GRAY "\033[0m"
-
- static const char ppsz_type[4][9] = { "", " error", " warning", " debug" };
- static const char ppsz_color[4][8] = { WHITE, RED, YELLOW, GRAY };
- const char *psz_object;
- libvlc_priv_t *priv = libvlc_priv (p_this->p_libvlc);
- msg_bank_t *bank = priv->msg_bank;
- int i_type = p_item->i_type;
-
- switch( i_type )
- {
- case VLC_MSG_ERR:
- if( priv->i_verbose < 0 ) return;
- break;
- case VLC_MSG_INFO:
- if( priv->i_verbose < 0 ) return;
- break;
- case VLC_MSG_WARN:
- if( priv->i_verbose < 1 ) return;
- break;
- case VLC_MSG_DBG:
- if( priv->i_verbose < 2 ) return;
- break;
- }
+ const int *pverbose = d;
+ FILE *stream = stderr;
- psz_object = p_item->psz_object_type;
- void * val = vlc_dictionary_value_for_key (&bank->enabled_objects,
- p_item->psz_module);
- if( val == kObjectPrintingDisabled )
+ if (*pverbose < 0 || *pverbose < (type - VLC_MSG_ERR))
return;
- if( val == kObjectPrintingEnabled )
- /* Allowed */;
- else
- {
- val = vlc_dictionary_value_for_key (&bank->enabled_objects,
- psz_object);
- if( val == kObjectPrintingDisabled )
- return;
- if( val == kObjectPrintingEnabled )
- /* Allowed */;
- else if( !bank->all_objects_enabled )
- return;
- }
int canc = vlc_savecancel ();
- /* Send the message to stderr */
- utf8_fprintf( stderr, "[%s%p%s] %s%s%s %s%s: %s%s%s\n",
- priv->b_color ? GREEN : "",
- (void *)p_item->i_object_id,
- priv->b_color ? GRAY : "",
- p_item->psz_header ? p_item->psz_header : "",
- p_item->psz_header ? " " : "",
- p_item->psz_module, psz_object,
- ppsz_type[i_type],
- priv->b_color ? ppsz_color[i_type] : "",
- p_item->psz_msg,
- priv->b_color ? GRAY : "" );
-#ifdef WIN32
- fflush( stderr );
+ flockfile (stream);
+ fprintf (stream, "[%p] ", (void *)p_item->i_object_id);
+ if (p_item->psz_header != NULL)
+ utf8_fprintf (stream, "[%s] ", p_item->psz_header);
+ utf8_fprintf (stream, "%s %s%s: ", p_item->psz_module,
+ p_item->psz_object_type, msg_type[type]);
+ utf8_vfprintf (stream, format, ap);
+ putc_unlocked ('\n', stream);
+#if defined (WIN32) || defined (__OS2__)
+ fflush (stream);
#endif
+ funlockfile (stream);
vlc_restorecancel (canc);
}