FreeCalypso > hg > fc-tourmaline
view src/gpf/misc/printtofile.c @ 291:a72feaed133a
PWT buzzer driver: conditionalize on TARGET_HAS_BUZZER
Here we add a new target config preprocessor symbol TARGET_HAS_BUZZER,
currently defined for c11x and c139; later we also expect to have it
on for FC Venus, and in FC Magnetite we are going to turn it on for
target dsample, just for the sake of completeness and philosophical
correctness.
author | Mychaela Falconia <falcon@freecalypso.org> |
---|---|
date | Sat, 26 Mar 2022 19:31:18 +0000 |
parents | 4e78acac3d88 |
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