T168_111\appl\Text\Agfa：第17~18

最新推荐文章于 2024-07-06 18:47:57 发布

qq_33772147

最新推荐文章于 2024-07-06 18:47:57 发布

阅读量751

点赞数 10

文章标签：单片机 stm32 嵌入式硬件

本文链接：https://blog.csdn.net/qq_33772147/article/details/137057811

版权

cg_mutex.txt ///

/*
* Copyright (C) 2005 Monotype Imaging Inc. All rights reserved.
*/

/* $Header: I:/BULL/URIP/RTS/DEP/cg_mutex.c_v 1.5 Dec 14 2004 15:47:38 galejss $ */
/* $Log: I:/BULL/URIP/RTS/DEP/cg_mutex.c_v $
*
* Rev 1.5 Dec 14 2004 15:47:38 galejss
* make all DBG calls 16-bit-compatible
*
* Rev 1.4 Nov 08 2004 14:36:28 DugganJ
* Multithreading changes to resolve UNIX compiler errors.
*
*
* Rev 1.3 Oct 26 2004 11:38:16 dugganj
* Multithreading changes.
*
* Rev 1.2 Oct 19 2004 13:52:12 galejss
* remove a double-slash comment
*
* Rev 1.1 Oct 06 2004 10:46:28 dugganj
* Conditionally compiled "#include <windows.h>"
* statement to resolve unix compile error.
*
*
* Rev 1.0 Sep 28 2004 08:59:38 dugganj
* Initial revision.
*/

#include <stdio.h>

#ifdef VXWORKS
#include "vxWorks.h"
#endif

#include "cgconfig.h"
#if !(defined(_WIN32) && !defined (__MARM_ARMI__))
#include "ufstport.h"
#endif
#if UFST_MULTITHREAD
#if defined(_WIN32) && !defined (__MARM_ARMI__)
#include <windows.h>
#include "ufstport.h"
#elif defined (UFST_UNIX)
#include <unistd.h>
#if (_POSIX_VERSION >= 199506L)
#include <pthread.h>
#include <errno.h>
#endif
#endif
#endif

#if UFST_MULTITHREAD

#include "dbg_ufst.h"
#include "shareinc.h"

/* templates so we can test on windows */
/* NOTE: this code contains some unconditional printfs (for error conditions):
these should be removed / conditionally-compiled for production code. */

#if defined(_WIN32) && !defined (__MARM_ARMI__)
/**************************************************************************/

#if defined (ANSI_DEFS)
SL32 CGENTRY CGIFcreate_mutex(FSP0)
#else
SL32 CGENTRY CGIFcreate_mutex()
#endif
{
   if_state.mutex_ptr = CreateMutex(NULL,0,NULL);
   if (if_state.mutex_ptr == NULL)
       return ERR_creating_mutex;

#if THREAD_DUMP
   print_current_thread(FSA0);
   printf(": mutex created");
#endif   /* THREAD_DUMP */
       return SUCCESS;
}

#if defined (ANSI_DEFS)
SL32 CGENTRY CGIFcreate_app_mutex(FSP0)
#else
SL32 CGENTRY CGIFcreate_app_mutex()
#endif
{
   if_state.app_mutex_ptr = CreateMutex(NULL,0,NULL);
   if (if_state.app_mutex_ptr == NULL)
       return ERR_creating_mutex;

#if THREAD_DUMP
   print_current_thread(FSA0);
   printf(": app mutex created");
#endif   /* THREAD_DUMP */
       return SUCCESS;
}

#if defined (ANSI_DEFS)
SL32 CGENTRY CGIFobtain_mutex(FSP0)
#else
SL32 CGENTRY CGIFobtain_mutex()
#endif
{
SL32 err;

if (if_state.mutex_ptr == NULL)
return ERR_MUTEX_GONE;

   /* ask for exclusive access with a 5 second timeout */
#ifdef _DEBUG
   /* but no timeout if we are debugging */
   err = WaitForSingleObject(if_state.mutex_ptr,INFINITE);
#else
   err = WaitForSingleObject(if_state.mutex_ptr,5000);
#endif

   if (err == WAIT_ABANDONED)
       {
#ifdef AGFADEBUG
       DBG("*** FS_OpenMutex: WAIT_ABANDONED\n");
#endif
       err = ERR_MUTEX_GONE;
       }
   else if (err == WAIT_OBJECT_0)
       {
       /* DBG("*** FS_OpenMutex: WAIT_OBJECT_0\n"); */
       err = SUCCESS;
       }
   else if (err == WAIT_TIMEOUT)
       {
#ifdef AGFADEBUG
       DBG("*** FS_OpenMutex: WAIT_TIMEOUT\n");
#endif
       err = ERR_MUTEX_TIMEOUT;   /* this is bad -- we timed out */
       }
   else if (err == WAIT_FAILED)
       {
#ifdef AGFADEBUG
       DBG("*** FS_OpenMutex: WAIT_FAILED\n");
#endif
       err = ERR_MUTEX_CREATE;
       }
   if (err != SUCCESS)
       err = ERR_obtaining_mutex;

#if THREAD_DUMP
   print_current_thread(FSA0);
   printf(": mutex obtained");
#endif   /* THREAD_DUMP */
   return err;
}

#if defined (ANSI_DEFS)
SL32 CGENTRY CGIFobtain_app_mutex(FSP0)
#else
SL32 CGENTRY CGIFobtain_app_mutex()
#endif
{
SL32 err;

if (if_state.app_mutex_ptr == NULL)
return ERR_MUTEX_GONE;

   /* ask for exclusive access with a 5 second timeout */
#ifdef _DEBUG
   /* but no timeout if we are debugging */
   err = WaitForSingleObject(if_state.app_mutex_ptr,INFINITE);
#else
   err = WaitForSingleObject(if_state.app_mutex_ptr,5000);
#endif

#if THREAD_DUMP
   print_current_thread(FSA0);
   printf(": app mutex obtained");
#endif   /* THREAD_DUMP */
   return err;
}

#if defined (ANSI_DEFS)
SL32 CGENTRY CGIFrelease_mutex(FSP0)
#else
SL32 CGENTRY CGIFrelease_mutex()
#endif
{
SL32 err;

   err = ReleaseMutex(if_state.mutex_ptr);
   if (err==0)
       {
       PVOID lpMsgBuf;
       FormatMessage(
           FORMAT_MESSAGE_ALLOCATE_BUFFER |
           FORMAT_MESSAGE_FROM_SYSTEM |
           FORMAT_MESSAGE_IGNORE_INSERTS,
           NULL,
           err=GetLastError(),
           MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT), /* Default language */
           (LPTSTR) &lpMsgBuf,
           0,
           NULL
           );
#ifdef AGFADEBUG
       DBG2("ReleaseMutex error=%ld: %s\n",err,lpMsgBuf);
#endif
       LocalFree( lpMsgBuf );
       }
   if (err = 0)
       err = ERR_releasing_mutex;
   else
       err = SUCCESS;

#if THREAD_DUMP
   print_current_thread(FSA0);
   printf(": mutex released\n");
#endif   /* THREAD_DUMP */
   return err;
}

#if defined (ANSI_DEFS)
SL32 CGENTRY CGIFrelease_app_mutex(FSP0)
#else
SL32 CGENTRY CGIFrelease_app_mutex()
#endif
{
SL32 err;

   err = ReleaseMutex(if_state.app_mutex_ptr);
   if (err==0)
       {
       PVOID lpMsgBuf;
       FormatMessage(
           FORMAT_MESSAGE_ALLOCATE_BUFFER |
           FORMAT_MESSAGE_FROM_SYSTEM |
           FORMAT_MESSAGE_IGNORE_INSERTS,
           NULL,
           err=GetLastError(),
           MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT), /* Default language */
           (LPTSTR) &lpMsgBuf,
           0,
           NULL
           );
#ifdef AGFADEBUG
       DBG2("ReleaseMutex error=%ld: %s\n",err,lpMsgBuf);
#endif
       LocalFree( lpMsgBuf );
       }
   if (err = 0)
       err = ERR_releasing_mutex;
   else
       err = SUCCESS;

#if THREAD_DUMP
   print_current_thread(FSA0);
   printf(": app mutex released\n");
#endif   /* THREAD_DUMP */
   return err;
}

#if defined (ANSI_DEFS)
SL32 CGENTRY CGIFdelete_mutex(FSP0)
#else
SL32 CGENTRY CGIFdelete_mutex()
#endif
{
SL32 err;

   err = CloseHandle(if_state.mutex_ptr);
   if (err == 0)
       err = ERR_deleting_mutex;
   else
       err = SUCCESS;

#if THREAD_DUMP
   print_current_thread(FSA0);
   printf(": mutex deleted\n");
#endif   /* THREAD_DUMP */
   return err;
}

#if defined (ANSI_DEFS)
SL32 CGENTRY CGIFdelete_app_mutex(FSP0)
#else
SL32 CGENTRY CGIFdelete_app_mutex()
#endif
{
SL32 err;

   err = CloseHandle(if_state.app_mutex_ptr);
   if (err == 0)
       err = ERR_deleting_mutex;
   else
       err = SUCCESS;

#if THREAD_DUMP
   print_current_thread(FSA0);
   printf(": app mutex deleted\n");
#endif   /* THREAD_DUMP */
   return err;
}

#if defined (ANSI_DEFS)
SL32 CGENTRY get_thread_id(FSP0)
#else
SL32 CGENTRY get_thread_id()
#endif
{
return GetCurrentThreadId();
}

#elif defined (UFST_UNIX)
#include <unistd.h>

#if (_POSIX_VERSION >= 199506L)
#include <pthread.h>
#include <errno.h>
#endif

#if defined (ANSI_DEFS)
SL32 CGENTRY CGIFcreate_mutex(FSP0)
#else
SL32 CGENTRY CGIFcreate_mutex()
#endif
{
#if (_POSIX_VERSION >= 199506L)
   SL32 err;

   if_state.mutex_ptr = (MUTEX)malloc(sizeof(pthread_mutex_t));
   if (!if_state.mutex_ptr)
   {
       if_state.error = ERR_creating_mutex;
       return if_state.error;
   }

   err = pthread_mutex_init((pthread_mutex_t *)if_state.mutex_ptr, NULL);
   if (err)
   {
       if_state.error = ERR_creating_mutex;
       switch (err)
       {
       case EAGAIN :
#ifdef AGFADEBUG
           DBG("\n System resources (other than memory) are unavailable.");
#endif
           break;

       case EINVAL:
#ifdef AGFADEBUG
           DBG("\n Attr does not refer to a valid condition variable attribute object.");
#endif
           break;

       case EFAULT:
#ifdef AGFADEBUG
           DBG("\n Mutex or attr is an invalid pointer.");
#endif
           break;

       case ENOMEM:
#ifdef AGFADEBUG
           DBG("\n Insufficient memory exists to initialize the mutex.");
#endif
           break;

       }
       return if_state.error;
   }
#if THREAD_DUMP
   print_current_thread(FSA0);
   printf(": mutex created");
#endif   /* THREAD_DUMP */
   if_state.error = SUCCESS;
#else
#ifdef AGFADEBUG
   DBG("\n FS_create_mutex() error - POSIX threads not supported");
#endif
   if_state.error = ERR_POSIX_THREADS_NOT_SUPP;
#endif
   return if_state.error;
}

#if defined (ANSI_DEFS)
SL32 CGENTRY CGIFcreate_app_mutex(FSP0)
#else
SL32 CGENTRY CGIFcreate_app_mutex()
#endif
{
#if (_POSIX_VERSION >= 199506L)
   SL32 err;

   if_state.app_mutex_ptr = (MUTEX)malloc(sizeof(pthread_mutex_t));
   if (!if_state.app_mutex_ptr)
   {
       if_state.error = ERR_creating_mutex;
       return if_state.error;
   }

   err = pthread_mutex_init((pthread_mutex_t *)if_state.app_mutex_ptr, NULL);
   if (err)
   {
       if_state.error = ERR_creating_mutex;
       switch (err)
       {
       case EAGAIN :
#ifdef AGFADEBUG
           DBG("\n System resources (other than memory) are unavailable.");
#endif
           break;

       case EINVAL:
#ifdef AGFADEBUG
           DBG("\n Attr does not refer to a valid condition variable attribute object.");
#endif
           break;

       case EFAULT:
#ifdef AGFADEBUG
           DBG("\n Mutex or attr is an invalid pointer.");
#endif
           break;

       case ENOMEM:
#ifdef AGFADEBUG
           DBG("\n Insufficient memory exists to initialize the mutex.");
#endif
           break;

       }
       return if_state.error;
   }
#if THREAD_DUMP
   print_current_thread(FSA0);
   printf(": app mutex created");
#endif   /* THREAD_DUMP */
   if_state.error = SUCCESS;
#else
#ifdef AGFADEBUG
   DBG("\n CGIFcreate_app_mutex() error - POSIX threads not supported");
#endif
   if_state.error = ERR_POSIX_THREADS_NOT_SUPP;
#endif
   return if_state.error;
}

#if defined (ANSI_DEFS)
SL32 CGENTRY CGIFobtain_mutex(FSP0)
#else
SL32 CGENTRY CGIFobtain_mutex()
#endif
{
#if (_POSIX_VERSION >= 199506L)
long err;

   err = pthread_mutex_lock((pthread_mutex_t *)if_state.mutex_ptr);
   if (err)
   {
       switch (err)
       {
       case EINVAL:
#ifdef AGFADEBUG
           DBG("\n Mutex is not an initialized mutex.");
#endif
           break;