PubSub.c

 
#include <winpr/config.h>
 
#include <winpr/crt.h>
 
#include <winpr/collections.h>
 
struct s_wPubSub
{
  CRITICAL_SECTION lock;
  BOOL synchronized;
 
  size_t size;
  size_t count;
  wEventType* events;
};
 
wEventType* PubSub_GetEventTypes(wPubSub* pubSub, size_t* count)
{
  WINPR_ASSERT(pubSub);
  if (count)
    *count = pubSub->count;
 
  return pubSub->events;
}
 
void PubSub_Lock(wPubSub* pubSub)
{
  WINPR_ASSERT(pubSub);
  if (pubSub->synchronized)
    EnterCriticalSection(&pubSub->lock);
}
 
void PubSub_Unlock(wPubSub* pubSub)
{
  WINPR_ASSERT(pubSub);
  if (pubSub->synchronized)
    LeaveCriticalSection(&pubSub->lock);
}
 
wEventType* PubSub_FindEventType(wPubSub* pubSub, const char* EventName)
{
  wEventType* event = NULL;
 
  WINPR_ASSERT(pubSub);
  WINPR_ASSERT(EventName);
  for (size_t index = 0; index < pubSub->count; index++)
  {
    if (strcmp(pubSub->events[index].EventName, EventName) == 0)
    {
      event = &(pubSub->events[index]);
      break;
    }
  }
 
  return event;
}
 
void PubSub_AddEventTypes(wPubSub* pubSub, wEventType* events, size_t count)
{
  WINPR_ASSERT(pubSub);
  WINPR_ASSERT(events || (count == 0));
  if (pubSub->synchronized)
    PubSub_Lock(pubSub);
 
  const size_t required = pubSub->count + count;
  WINPR_ASSERT((required >= pubSub->count) && (required >= count));
 
  if (required >= pubSub->size)
  {
    size_t new_size = pubSub->size;
    do
    {
      WINPR_ASSERT(new_size <= SIZE_MAX - 128ull);
      new_size += 128ull;
    } while (new_size <= required);
 
    wEventType* new_event = (wEventType*)realloc(pubSub->events, new_size * sizeof(wEventType));
    if (!new_event)
      goto fail;
    pubSub->size = new_size;
    pubSub->events = new_event;
  }
 
  CopyMemory(&pubSub->events[pubSub->count], events, count * sizeof(wEventType));
  pubSub->count += count;
 
fail:
  if (pubSub->synchronized)
    PubSub_Unlock(pubSub);
}
 
int PubSub_Subscribe(wPubSub* pubSub, const char* EventName, ...)
{
  wEventType* event = NULL;
  int status = -1;
  WINPR_ASSERT(pubSub);
 
  va_list ap = { 0 };
  va_start(ap, EventName);
  pEventHandler EventHandler = va_arg(ap, pEventHandler);
 
  if (pubSub->synchronized)
    PubSub_Lock(pubSub);
 
  event = PubSub_FindEventType(pubSub, EventName);
 
  if (event)
  {
    status = 0;
 
    if (event->EventHandlerCount < MAX_EVENT_HANDLERS)
      event->EventHandlers[event->EventHandlerCount++] = EventHandler;
    else
      status = -1;
  }
 
  if (pubSub->synchronized)
    PubSub_Unlock(pubSub);
 
  va_end(ap);
  return status;
}
 
int PubSub_Unsubscribe(wPubSub* pubSub, const char* EventName, ...)
{
  wEventType* event = NULL;
  int status = -1;
  WINPR_ASSERT(pubSub);
  WINPR_ASSERT(EventName);
 
  va_list ap = { 0 };
  va_start(ap, EventName);
  pEventHandler EventHandler = va_arg(ap, pEventHandler);
 
  if (pubSub->synchronized)
    PubSub_Lock(pubSub);
 
  event = PubSub_FindEventType(pubSub, EventName);
 
  if (event)
  {
    status = 0;
 
    for (size_t index = 0; index < event->EventHandlerCount; index++)
    {
      if (event->EventHandlers[index] == EventHandler)
      {
        event->EventHandlers[index] = NULL;
        event->EventHandlerCount--;
        MoveMemory((void*)&event->EventHandlers[index],
                   (void*)&event->EventHandlers[index + 1],
                   (MAX_EVENT_HANDLERS - index - 1) * sizeof(pEventHandler));
        status = 1;
      }
    }
  }
 
  if (pubSub->synchronized)
    PubSub_Unlock(pubSub);
 
  va_end(ap);
  return status;
}
 
int PubSub_OnEvent(wPubSub* pubSub, const char* EventName, void* context, const wEventArgs* e)
{
  wEventType* event = NULL;
  int status = -1;
 
  if (!pubSub)
    return -1;
  WINPR_ASSERT(e);
 
  if (pubSub->synchronized)
    PubSub_Lock(pubSub);
 
  event = PubSub_FindEventType(pubSub, EventName);
 
  if (pubSub->synchronized)
    PubSub_Unlock(pubSub);
 
  if (event)
  {
    status = 0;
 
    for (size_t index = 0; index < event->EventHandlerCount; index++)
    {
      if (event->EventHandlers[index])
      {
        event->EventHandlers[index](context, e);
        status++;
      }
    }
  }
 
  return status;
}
 
wPubSub* PubSub_New(BOOL synchronized)
{
  wPubSub* pubSub = (wPubSub*)calloc(1, sizeof(wPubSub));
 
  if (!pubSub)
    return NULL;
 
  pubSub->synchronized = synchronized;
 
  if (pubSub->synchronized && !InitializeCriticalSectionAndSpinCount(&pubSub->lock, 4000))
    goto fail;
 
  pubSub->count = 0;
  pubSub->size = 64;
 
  pubSub->events = (wEventType*)calloc(pubSub->size, sizeof(wEventType));
  if (!pubSub->events)
    goto fail;
 
  return pubSub;
fail:
  WINPR_PRAGMA_DIAG_PUSH
  WINPR_PRAGMA_DIAG_IGNORED_MISMATCHED_DEALLOC
  PubSub_Free(pubSub);
  WINPR_PRAGMA_DIAG_POP
  return NULL;
}
 
void PubSub_Free(wPubSub* pubSub)
{
  if (pubSub)
  {
    if (pubSub->synchronized)
      DeleteCriticalSection(&pubSub->lock);
 
    free(pubSub->events);
    free(pubSub);
  }
}