view src/gpf2/misc/printtofile.c @ 597:f18b29e27be5

First attempt at MCSI voice path automatic switching The function is implemented at the ACI level in both aci2 and aci3, successfully avoids triggering the DSP bug on the first call, but the shutdown of MCSI upon call completion is not working properly yet in either version.
author Mychaela Falconia <falcon@freecalypso.org>
date Wed, 27 Mar 2019 22:18:35 +0000
parents cd37d228dae0
children
line wrap: on
line source

/* 
+------------------------------------------------------------------------------
|  File:       printToFile.c
+------------------------------------------------------------------------------
|  Copyright 2002 Texas Instruments Berlin, AG 
|                 All rights reserved. 
| 
|                 This file is confidential and a trade secret of Texas 
|                 Instruments Berlin, AG 
|                 The receipt of or possession of this file does not convey 
|                 any rights to reproduce or disclose its contents or to 
|                 manufacture, use, or sell anything it may describe, in 
|                 whole, or in part, without the specific written consent of 
|                 Texas Instruments Berlin, AG. 
+----------------------------------------------------------------------------- 
| Purpose:     This module implements some stream output functions.
+----------------------------------------------------------------------------- 
*/ 

#ifndef __PRINTTOFILE_C__
#define __PRINTTOFILE_C__
#endif
 
#ifndef _TARGET_

/*==== INCLUDES ===================================================*/

#include "printtofile.h"

#include "typedefs.h"
#ifndef _LINUX_
#include <string.h>
#include <ctype.h>
#include <stdarg.h>
#include <stdio.h>
#include "windows.h"
#include "vsi.h"
#include "time.h"
#include <sys/types.h>
#include <sys/timeb.h>
#endif /* _LINUX_ */

/*==== TYPES ======================================================*/


/*==== CONSTANTS ==================================================*/


/*==== EXTERNALS ==================================================*/


/*==== VARIABLES ==================================================*/

#ifndef _LINUX_
static HANDLE mutEx;
#endif /* _LINUX_ */

/*==== FUNCTIONS ==================================================*/

#ifndef RUN_INT_RAM
/*
+------------------------------------------------------------------------------
|  Function     :  PrintToFile
+------------------------------------------------------------------------------
|  Description  :  print to file xx and do a printf() with ident. arguments
|
|  Parameters   :  const char *format, ... variable parameter list
|
|  Return       :  printf retval
|                  
+------------------------------------------------------------------------------
*/
void initPrintToFile()
{
#ifdef _LINUX_
  return;
#else /* _LINUX_ */
#ifndef _TARGET_
#ifdef _DEBUG
  FILE *fp;
#endif

  if ( (mutEx = OpenMutex (MUTEX_ALL_ACCESS, FALSE, "PrintToFile")) == NULL )
  {
    mutEx = CreateMutex( NULL, FALSE, "PrintToFile");
#ifdef _DEBUG
    fp = fopen("\\gpf\\BIN\\debug\\tstlog.txt", "w");
    PrintToFile("\n\nStart logging:\n");
#endif
  }

  if (mutEx == 0)
  {
    printf("PrintToFile semaphore creation failed!\n");
  }
#endif /* _LINUX_ */
#endif
}
#endif

#ifndef RUN_INT_RAM
/*
+------------------------------------------------------------------------------
|  Function     :  PrintToFile
+------------------------------------------------------------------------------
|  Description  :  print to file xx and do a printf() with ident. arguments
|
|  Parameters   :  const char *format, ... variable parameter list
|
|  Return       :  printf retval
|                  
+------------------------------------------------------------------------------
*/
int PrintToFile(const char *format, ... )
{
  int retval = 0;
#ifndef _LINUX_
#ifndef _TARGET_
  va_list unamedArgumentList;
  char* nextChar;
  int ival;
  char* sval;
#ifdef _DEBUG
  FILE *fp;
  struct _timeb timebuf;
  time_t seconds;
  unsigned long int t;
#endif
  
  if ( WaitForSingleObject (mutEx, INFINITE) == WAIT_FAILED )
  {
    printf("PrintToFile semaphore request failed! Is TST.exe up & running?\n");
    return -1;
  }
  va_start(unamedArgumentList, format);
#ifdef _DEBUG
  fp = fopen("\\gpf\\BIN\\debug\\tstlog.txt", "a");
  if ( fp != 0 )
  {
    time( &seconds );                   // seconds after 1.1.70 GMT
    _ftime( &timebuf );
    t = (unsigned long int)(seconds * 1000) + timebuf.millitm;

    /*lint -e668 */
    /*lint -e559 */
#ifdef _TOOLS_
  fprintf(fp, "TST   (%u): ", (unsigned int)t);
#else
  fprintf(fp, "Stack (%u): ", (unsigned int)t);
#endif
  }
#endif /* _DEBUG */

  /*lint -e662 */
  for (nextChar = (char*) format; *nextChar; nextChar++)
  {
    if (*nextChar != '%')
    {
      putchar(*nextChar);
#ifdef _DEBUG
      if (fp != 0)
      {
        fputc(*nextChar,fp);
      }
#endif
      continue;
    }

    switch (*++nextChar)
    {
      case 'd':
        ival = va_arg(unamedArgumentList, int);
        printf("%d", ival);
#ifdef _DEBUG
        if (fp != 0)
        {
          fprintf(fp, "%d", ival);
        }
#endif
        break;
      case 'x':
        ival = va_arg(unamedArgumentList, int);
        printf("%x", ival);
#ifdef _DEBUG
        if (fp != 0)
        {
          fprintf(fp, "%x", ival);
        }
#endif
        break;
      case 's':
        for(sval = va_arg(unamedArgumentList, char*); *sval; sval++)
        {
          putchar(*sval);
#ifdef _DEBUG
          if (fp != 0)
          {
            fputc(*sval,fp);
          }
#endif
        }
        break;
     default:
        putchar(*nextChar);
#ifdef _DEBUG
        if (fp != 0)
        {
          fputc(*nextChar,fp);
        }
#endif
        break;
    }
  }
  /*lint +e662 */
  va_end(unamedArgumentList);
#ifdef _DEBUG
  if (fp != 0)
  {
    fclose(fp);
  }
#endif
  ReleaseMutex(mutEx);
#endif /* !_LINUX_ */
#endif /* _TARGET_ */
  return retval;
}
#endif
#endif