FreeCalypso > hg > fc-magnetite
view src/gpf2/misc/printtofile.c @ 605:07d0dc4431f4
bootloader.s: same MEMIF fix as in int.s plus DPLL BYPASS fix
Both MEMIF and DPLL settings are now the same between int.s and bootloader.s
assembly code paths. Previously bootloader.s was setting DPLL BYPASS /2 mode,
which persisted until _INT_Initialize code with the bootloader body omitted,
or was changed to /1 in the hardware init function in the
bootloader.lib:start.obj module.
author | Mychaela Falconia <falcon@freecalypso.org> |
---|---|
date | Mon, 17 Jun 2019 18:40:32 +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