src/thread/os2/SDL_sysmutex.c
changeset 1190 173c063d4f55
child 1312 c9b51268668f
     1.1 --- /dev/null	Thu Jan 01 00:00:00 1970 +0000
     1.2 +++ b/src/thread/os2/SDL_sysmutex.c	Wed Nov 23 07:29:56 2005 +0000
     1.3 @@ -0,0 +1,115 @@
     1.4 +/*
     1.5 +    SDL - Simple DirectMedia Layer
     1.6 +    Copyright (C) 1997, 1998, 1999, 2000, 2001, 2002  Sam Lantinga
     1.7 +
     1.8 +    This library is free software; you can redistribute it and/or
     1.9 +    modify it under the terms of the GNU Library General Public
    1.10 +    License as published by the Free Software Foundation; either
    1.11 +    version 2 of the License, or (at your option) any later version.
    1.12 +
    1.13 +    This library is distributed in the hope that it will be useful,
    1.14 +    but WITHOUT ANY WARRANTY; without even the implied warranty of
    1.15 +    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
    1.16 +    Library General Public License for more details.
    1.17 +
    1.18 +    You should have received a copy of the GNU Library General Public
    1.19 +    License along with this library; if not, write to the Free
    1.20 +    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
    1.21 +
    1.22 +    Sam Lantinga
    1.23 +    slouken@libsdl.org
    1.24 +*/
    1.25 +
    1.26 +#ifdef SAVE_RCSID
    1.27 +static char rcsid =
    1.28 + "@(#) $Id$";
    1.29 +#endif
    1.30 +
    1.31 +/* Mutex functions using the OS/2 API */
    1.32 +
    1.33 +#include <stdio.h>
    1.34 +#include <stdlib.h>
    1.35 +#define INCL_DOSERRORS
    1.36 +#define INCL_DOSSEMAPHORES
    1.37 +#include <os2.h>
    1.38 +
    1.39 +#include "SDL_error.h"
    1.40 +#include "SDL_mutex.h"
    1.41 +
    1.42 +
    1.43 +struct SDL_mutex {
    1.44 +	HMTX hmtxID;
    1.45 +};
    1.46 +
    1.47 +/* Create a mutex */
    1.48 +DECLSPEC SDL_mutex * SDLCALL SDL_CreateMutex(void)
    1.49 +{
    1.50 +  SDL_mutex *mutex;
    1.51 +  APIRET ulrc;
    1.52 +
    1.53 +  /* Allocate mutex memory */
    1.54 +  mutex = (SDL_mutex *)malloc(sizeof(*mutex));
    1.55 +  if (mutex)
    1.56 +  {
    1.57 +    /* Create the mutex, with initial value signaled */
    1.58 +    ulrc = DosCreateMutexSem(NULL,                  // Create unnamed semaphore
    1.59 +                             &(mutex->hmtxID),      // Pointer to handle
    1.60 +                             0L,                    // Flags: create it private (not shared)
    1.61 +                             FALSE);                // Initial value: unowned
    1.62 +    if (ulrc!=NO_ERROR)
    1.63 +    {
    1.64 +      SDL_SetError("Couldn't create mutex");
    1.65 +      free(mutex);
    1.66 +      mutex = NULL;
    1.67 +    }
    1.68 +  } else {
    1.69 +    SDL_OutOfMemory();
    1.70 +  }
    1.71 +  return(mutex);
    1.72 +}
    1.73 +
    1.74 +/* Free the mutex */
    1.75 +DECLSPEC void SDLCALL SDL_DestroyMutex(SDL_mutex *mutex)
    1.76 +{
    1.77 +  if ( mutex )
    1.78 +  {
    1.79 +    if ( mutex->hmtxID )
    1.80 +    {
    1.81 +      DosCloseMutexSem(mutex->hmtxID);
    1.82 +      mutex->hmtxID = 0;
    1.83 +    }
    1.84 +    free(mutex);
    1.85 +  }
    1.86 +}
    1.87 +
    1.88 +/* Lock the mutex */
    1.89 +DECLSPEC int SDLCALL SDL_mutexP(SDL_mutex *mutex)
    1.90 +{
    1.91 +  if ( mutex == NULL )
    1.92 +  {
    1.93 +    SDL_SetError("Passed a NULL mutex");
    1.94 +    return -1;
    1.95 +  }
    1.96 +  if ( DosRequestMutexSem(mutex->hmtxID, SEM_INDEFINITE_WAIT) != NO_ERROR )
    1.97 +  {
    1.98 +    SDL_SetError("Couldn't wait on mutex");
    1.99 +    return -1;
   1.100 +  }
   1.101 +  return(0);
   1.102 +}
   1.103 +
   1.104 +/* Unlock the mutex */
   1.105 +DECLSPEC int SDLCALL SDL_mutexV(SDL_mutex *mutex)
   1.106 +{
   1.107 +  if ( mutex == NULL )
   1.108 +  {
   1.109 +    SDL_SetError("Passed a NULL mutex");
   1.110 +    return -1;
   1.111 +  }
   1.112 +  if ( DosReleaseMutexSem(mutex->hmtxID) != NO_ERROR )
   1.113 +  {
   1.114 +    SDL_SetError("Couldn't release mutex");
   1.115 +    return -1;
   1.116 +  }
   1.117 +  return(0);
   1.118 +}