[BACK]Return to trace.cpp CVS log [TXT] [DIR] Up to [RetroPC.NET] / np2 / win9x

Diff for /np2/win9x/trace.cpp between versions 1.5 and 1.15

version 1.5, 2003/11/28 08:01:33 version 1.15, 2005/03/24 04:40:33
Line 7 Line 7
   
 #ifdef TRACE  #ifdef TRACE
   
   // #define FILEBUFSIZE                  (1 << 20)
   // #define FILELASTBUFONLY
   
 #ifdef STRICT  #ifdef STRICT
 #define SUBCLASSPROC    WNDPROC  #define SUBCLASSPROC    WNDPROC
 #else  #else
Line 21 Line 24
 #define VIEW_SIZE               12  #define VIEW_SIZE               12
   
 typedef struct {  typedef struct {
         BYTE    en;          UINT8   en;
         FILEH   fh;          FILEH   fh;
         HWND    hwnd;          HWND    hwnd;
 } TRACEWIN;  } TRACEWIN;
Line 37  extern HINSTANCE hInst; Line 40  extern HINSTANCE hInst;
 extern  HINSTANCE       hPrev;  extern  HINSTANCE       hPrev;
   
 enum {  enum {
         IDM_TRACEEN             = 3300,          IDM_TRACE1              = 3300,
         IDM_TRACEFH          IDM_TRACE2,
           IDM_TRACEEN,
           IDM_TRACEFH,
           IDM_TRACECL
 };  };
   
 static const char       ProgTitle[] = "console";  static const TCHAR ProgTitle[] = _T("console");
 static const char       ClassName[] = "TRACE-console";  static const TCHAR ClassName[] = _T("TRACE-console");
 static const char       ClassEdit[] = "EDIT";  static const TCHAR ClassEdit[] = _T("EDIT");
 static const char       traceen[] = "Enable";  static const TCHAR trace1[] = _T("TRACE");
 static const char       tracefh[] = "File out";  static const TCHAR trace2[] = _T("VERBOSE");
 static const char       crlf[] = "\r\n";  static const TCHAR traceen[] = _T("Enable");
   static const TCHAR tracefh[] = _T("File out");
   static const TCHAR tracecl[] = _T("Clear");
   static const TCHAR fontface[] = _T(VIEW_TEXT);
   static const TCHAR crlf[] = _T("\r\n");
   
 static  TRACEWIN        tracewin;  static  TRACEWIN        tracewin;
 static  HWND            hView = NULL;  static  HWND            hView = NULL;
 static  HFONT           hfView = NULL;  static  HFONT           hfView = NULL;
 static  HBRUSH          hBrush = NULL;  static  HBRUSH          hBrush = NULL;
 static  char            szView[VIEW_BUFFERSIZE];  static  int                     viewpos;
   static  int                     viewleng;
   static  TCHAR           viewbuf[VIEW_BUFFERSIZE * 2];
 static  TRACECFG        tracecfg;  static  TRACECFG        tracecfg;
   static  int                     devpos;
   static  char            devstr[256];
   
 static const char       np2trace[] = "np2trace.ini";  static const OEMCHAR np2trace[] = OEMTEXT("np2trace.ini");
 static const char       inititle[] = "TRACE";  static const OEMCHAR inititle[] = OEMTEXT("TRACE");
 static const INITBL     initbl[4] = {  static const PFTBL initbl[4] = {
                         {"posx",        INITYPE_SINT32, &tracecfg.posx,         0},                          PFVAL("posx",   PFTYPE_SINT32,  &tracecfg.posx),
                         {"posy",        INITYPE_SINT32, &tracecfg.posy,         0},                          PFVAL("posy",   PFTYPE_SINT32,  &tracecfg.posy),
                         {"width",       INITYPE_SINT32, &tracecfg.width,        0},                          PFVAL("width",  PFTYPE_SINT32,  &tracecfg.width),
                         {"height",      INITYPE_SINT32, &tracecfg.height,       0}};                          PFVAL("height", PFTYPE_SINT32,  &tracecfg.height)};
   
 static void View_ScrollToBottom(HWND hWnd) {  static void View_ScrollToBottom(HWND hWnd) {
   
Line 72  static void View_ScrollToBottom(HWND hWn Line 86  static void View_ScrollToBottom(HWND hWn
         PostMessage(hWnd, EM_LINESCROLL, 0, MaxPos);          PostMessage(hWnd, EM_LINESCROLL, 0, MaxPos);
 }  }
   
 static void View_AddString(const char *lpszString) {  static void View_ClrString(void) {
   
           viewpos = 0;
           viewleng = 0;
           viewbuf[0] = '\0';
           SetWindowText(hView, viewbuf);
   }
   
   static void View_AddString(const TCHAR *string) {
   
         int             len, vlen;          int             slen;
         char    *p;          int             vpos;
           int             vlen;
           TCHAR   c;
   
         len = strlen(lpszString);          slen = lstrlen(string);
         if ((!len) || ((len + 3) > VIEW_BUFFERSIZE)) {          if ((slen == 0) || ((slen + 3) > VIEW_BUFFERSIZE)) {
                 return;                  return;
         }          }
         vlen = strlen(szView);          vpos = viewpos;
         if ((vlen + len + 3) > VIEW_BUFFERSIZE) {          vlen = viewleng;
                 p = szView;          if ((vpos + vlen + slen + 3) > (VIEW_BUFFERSIZE * 2)) {
                 while(*p) {                  while(vlen > 0) {
                         vlen--;                          vlen--;
                         if ((*p++ == 0x0a) && ((vlen + len + 3) <= VIEW_BUFFERSIZE)) {                          c = viewbuf[vpos++];
                           if ((c == 0x0a) && ((vlen + slen + 3) <= VIEW_BUFFERSIZE)) {
                                 break;                                  break;
                         }                          }
                 }                  }
                 strcpy(szView, p);                  if (vpos >= VIEW_BUFFERSIZE) {
                           if (vlen) {
                                   CopyMemory(viewbuf, viewbuf + vpos, vlen * sizeof(TCHAR));
                           }
                           vpos = 0;
                           viewpos = 0;
                   }
         }          }
         strcat(szView, lpszString);          CopyMemory(viewbuf + vpos + vlen, string, slen * sizeof(TCHAR));
         strcat(szView, crlf);          vlen += slen;
         SetWindowText(hView, szView);          viewbuf[vpos + vlen + 0] = '\r';
           viewbuf[vpos + vlen + 1] = '\n';
           viewbuf[vpos + vlen + 2] = '\0';
           viewleng = vlen + 2;
           SetWindowText(hView, viewbuf + vpos);
         View_ScrollToBottom(hView);          View_ScrollToBottom(hView);
 }  }
   
   
   // ----
   
   #if defined(FILEBUFSIZE)
   static  TCHAR   filebuf[FILEBUFSIZE];
   static  UINT32  filebufpos;
   #endif
   
   static void trfh_close(void) {
   
           FILEH   fh;
   
           fh = tracewin.fh;
           tracewin.fh = FILEH_INVALID;
           if (fh != FILEH_INVALID) {
   #if defined(FILEBUFSIZE)
                   UINT size = filebufpos & (FILEBUFSIZE - 1);
   #if defined(FILELASTBUFONLY)
                   if (filebufpos >= FILEBUFSIZE) {
                           file_write(fh, filebuf + size, FILEBUFSIZE - size);
                   }
   #endif
                   if (size) {
                           file_write(fh, filebuf, size);
                   }
   #endif
                   file_close(fh);
           }
   }
   
   static void trfh_open(const OEMCHAR *fname) {
   
           trfh_close();
           tracewin.fh = file_create(fname);
   #if defined(FILEBUFSIZE)
           filebufpos = 0;
   #endif
   }
   
   static void trfh_add(const TCHAR *buf) {
   
           UINT    size;
   
           size = lstrlen(buf);
   #if defined(FILEBUFSIZE)
           while(size) {
                   UINT pos = filebufpos & (FILEBUFSIZE - 1);
                   UINT rem = FILEBUFSIZE - pos;
                   if (size >= rem) {
                           CopyMemory(filebuf + pos, buf, rem);
                           filebufpos += rem;
                           buf += rem;
                           size -= rem;
   #if !defined(FILELASTBUFONLY)
                           file_write(tracewin.fh, filebuf, FILEBUFSIZE);
   #endif
                   }
                   else {
                           CopyMemory(filebuf + pos, buf, size);
                           filebufpos += size;
                           break;
                   }
           }
   #else
           file_write(tracewin.fh, buf, size);
   #endif
   }
   
   
   // ----
   
 static LRESULT CALLBACK traceproc(HWND hWnd, UINT msg, WPARAM wp, LPARAM lp) {  static LRESULT CALLBACK traceproc(HWND hWnd, UINT msg, WPARAM wp, LPARAM lp) {
   
         RECT    rc;          RECT    rc;
Line 107  static LRESULT CALLBACK traceproc(HWND h Line 213  static LRESULT CALLBACK traceproc(HWND h
                 case WM_CREATE:                  case WM_CREATE:
                         hmenu = GetSystemMenu(hWnd, FALSE);                          hmenu = GetSystemMenu(hWnd, FALSE);
                         InsertMenu(hmenu, 0, MF_BYPOSITION | MF_STRING,                          InsertMenu(hmenu, 0, MF_BYPOSITION | MF_STRING,
                                                                                                                 IDM_TRACEEN, traceen);                                                                                                                  IDM_TRACE1, trace1);
                         InsertMenu(hmenu, 1, MF_BYPOSITION | MF_STRING,                          InsertMenu(hmenu, 1, MF_BYPOSITION | MF_STRING,
                                                                                                                 IDM_TRACEFH, tracefh);                                                                                                                  IDM_TRACE2, trace2);
                         InsertMenu(hmenu, 2, MF_BYPOSITION | MF_SEPARATOR, 0, NULL);                          InsertMenu(hmenu, 2, MF_BYPOSITION | MF_SEPARATOR, 0, NULL);
                           InsertMenu(hmenu, 3, MF_BYPOSITION | MF_STRING,
                                                                                                                   IDM_TRACEEN, traceen);
                           InsertMenu(hmenu, 4, MF_BYPOSITION | MF_STRING,
                                                                                                                   IDM_TRACEFH, tracefh);
                           InsertMenu(hmenu, 5, MF_BYPOSITION | MF_STRING,
                                                                                                                   IDM_TRACECL, tracecl);
                           InsertMenu(hmenu, 6, MF_BYPOSITION | MF_SEPARATOR, 0, NULL);
   
                         CheckMenuItem(hmenu, IDM_TRACEEN,                          CheckMenuItem(hmenu, IDM_TRACE1,
                                                                 (tracewin.en & 1)?MF_CHECKED:MF_UNCHECKED);                                                                  (tracewin.en & 1)?MF_CHECKED:MF_UNCHECKED);
                           CheckMenuItem(hmenu, IDM_TRACE2,
                                                                   (tracewin.en & 2)?MF_CHECKED:MF_UNCHECKED);
                           CheckMenuItem(hmenu, IDM_TRACEEN,
                                                                   (tracewin.en & 4)?MF_CHECKED:MF_UNCHECKED);
   
                         GetClientRect(hWnd, &rc);                          GetClientRect(hWnd, &rc);
                         hView = CreateWindowEx(WS_EX_CLIENTEDGE,                          hView = CreateWindowEx(WS_EX_CLIENTEDGE,
Line 129  static LRESULT CALLBACK traceproc(HWND h Line 246  static LRESULT CALLBACK traceproc(HWND h
   
                         hfView = CreateFont(VIEW_SIZE, 0, 0, 0, 0, 0, 0, 0,                           hfView = CreateFont(VIEW_SIZE, 0, 0, 0, 0, 0, 0, 0, 
                                         SHIFTJIS_CHARSET, OUT_DEFAULT_PRECIS, CLIP_DEFAULT_PRECIS,                                          SHIFTJIS_CHARSET, OUT_DEFAULT_PRECIS, CLIP_DEFAULT_PRECIS,
                                         DEFAULT_QUALITY, FIXED_PITCH, VIEW_TEXT);                                          DEFAULT_QUALITY, FIXED_PITCH, fontface);
                         if (!hfView) {                          if (!hfView) {
                                 break;                                  break;
                         }                          }
Line 141  static LRESULT CALLBACK traceproc(HWND h Line 258  static LRESULT CALLBACK traceproc(HWND h
   
                 case WM_SYSCOMMAND:                  case WM_SYSCOMMAND:
                         switch(wp) {                          switch(wp) {
                                 case IDM_TRACEEN:                                  case IDM_TRACE1:
                                         tracewin.en ^= 1;                                          tracewin.en ^= 1;
                                         hmenu = GetSystemMenu(hWnd, FALSE);                                          hmenu = GetSystemMenu(hWnd, FALSE);
                                         CheckMenuItem(hmenu, IDM_TRACEEN,                                          CheckMenuItem(hmenu, IDM_TRACE1,
                                                                 (tracewin.en & 1)?MF_CHECKED:MF_UNCHECKED);                                                                  (tracewin.en & 1)?MF_CHECKED:MF_UNCHECKED);
                                         break;                                          break;
   
                                   case IDM_TRACE2:
                                           tracewin.en ^= 2;
                                           hmenu = GetSystemMenu(hWnd, FALSE);
                                           CheckMenuItem(hmenu, IDM_TRACE2,
                                                                   (tracewin.en & 2)?MF_CHECKED:MF_UNCHECKED);
                                           break;
   
                                   case IDM_TRACEEN:
                                           tracewin.en ^= 4;
                                           hmenu = GetSystemMenu(hWnd, FALSE);
                                           CheckMenuItem(hmenu, IDM_TRACEEN,
                                                                   (tracewin.en & 4)?MF_CHECKED:MF_UNCHECKED);
                                           break;
   
                                 case IDM_TRACEFH:                                  case IDM_TRACEFH:
                                         if (tracewin.fh != FILEH_INVALID) {                                          if (tracewin.fh != FILEH_INVALID) {
                                                 file_close(tracewin.fh);                                                  trfh_close();
                                                 tracewin.fh = FILEH_INVALID;  
                                         }                                          }
                                         else {                                          else {
                                                 tracewin.fh = file_create("traceout.txt");                                                  trfh_open(OEMTEXT("traceout.txt"));
                                         }                                          }
                                         hmenu = GetSystemMenu(hWnd, FALSE);                                          hmenu = GetSystemMenu(hWnd, FALSE);
                                         CheckMenuItem(hmenu, IDM_TRACEFH,                                          CheckMenuItem(hmenu, IDM_TRACEFH,
Line 162  static LRESULT CALLBACK traceproc(HWND h Line 292  static LRESULT CALLBACK traceproc(HWND h
                                                                                                         MF_CHECKED:MF_UNCHECKED);                                                                                                          MF_CHECKED:MF_UNCHECKED);
                                         break;                                          break;
   
                                   case IDM_TRACECL:
                                           View_ClrString();
                                           break;
   
                                 default:                                  default:
                                         return(DefWindowProc(hWnd, msg, wp, lp));                                          return(DefWindowProc(hWnd, msg, wp, lp));
                         }                          }
Line 233  void trace_init(void) { Line 367  void trace_init(void) {
   
         HWND    hwnd;          HWND    hwnd;
   
           ZeroMemory(&tracewin, sizeof(tracewin));
         if (!hPrev) {          if (!hPrev) {
                 WNDCLASS wc;                  WNDCLASS wc;
                 wc.style = CS_HREDRAW | CS_VREDRAW;                  wc.style = CS_HREDRAW | CS_VREDRAW;
Line 244  void trace_init(void) { Line 379  void trace_init(void) {
                 wc.hCursor = LoadCursor(NULL, IDC_ARROW);                  wc.hCursor = LoadCursor(NULL, IDC_ARROW);
                 wc.hbrBackground = (HBRUSH)GetStockObject(WHITE_BRUSH);                  wc.hbrBackground = (HBRUSH)GetStockObject(WHITE_BRUSH);
                 wc.lpszMenuName = NULL;                  wc.lpszMenuName = NULL;
                 wc.lpszClassName = (LPCSTR)ClassName;                  wc.lpszClassName = (LPCTSTR)ClassName;
                 if (!RegisterClass(&wc)) {                  if (!RegisterClass(&wc)) {
                         return;                          return;
                 }                  }
         }          }
   
         tracewin.en = 1;  #if 1
           tracewin.en = 4;
   #else
           tracewin.en = 0;
   #endif
         tracewin.fh = FILEH_INVALID;          tracewin.fh = FILEH_INVALID;
   
         tracecfg.posx = CW_USEDEFAULT;          tracecfg.posx = CW_USEDEFAULT;
Line 276  void trace_init(void) { Line 415  void trace_init(void) {
 void trace_term(void) {  void trace_term(void) {
   
         if (tracewin.fh != FILEH_INVALID) {          if (tracewin.fh != FILEH_INVALID) {
                 file_close(tracewin.fh);                  trfh_close();
                 tracewin.fh = FILEH_INVALID;  
         }          }
         if (tracewin.hwnd) {          if (tracewin.hwnd) {
                 DestroyWindow(tracewin.hwnd);                  DestroyWindow(tracewin.hwnd);
Line 290  void trace_fmt(const char *fmt, ...) { Line 428  void trace_fmt(const char *fmt, ...) {
   
         BOOL    en;          BOOL    en;
         va_list ap;          va_list ap;
         char    buf[0x1000];          OEMCHAR buf[0x1000];
   
           en = (tracewin.en & 1) &&
                   ((tracewin.en & 4) || (tracewin.fh != FILEH_INVALID));
           if (en) {
                   va_start(ap, fmt);
   #if defined(_UNICODE)
                   TCHAR cnvfmt[0x800];
                   MultiByteToWideChar(CP_ACP, MB_PRECOMPOSED, fmt, -1,
                                                                                                   cnvfmt, NELEMENTS(cnvfmt));
                   vswprintf(buf, cnvfmt, ap);
   #else
                   vsprintf(buf, fmt, ap);
   #endif
                   va_end(ap);
                   if ((tracewin.en & 4) && (hView)) {
                           View_AddString(buf);
                   }
                   if (tracewin.fh != FILEH_INVALID) {
                           trfh_add(buf);
                           trfh_add(crlf);
                   }
           }
   }
   
   void trace_fmt2(const char *fmt, ...) {
   
           BOOL    en;
           va_list ap;
           OEMCHAR buf[0x1000];
   
         en = (tracewin.en & 1) || (tracewin.fh != FILEH_INVALID);          en = (tracewin.en & 2) &&
                   ((tracewin.en & 4) || (tracewin.fh != FILEH_INVALID));
         if (en) {          if (en) {
                 va_start(ap, fmt);                  va_start(ap, fmt);
   #if defined(_UNICODE)
                   TCHAR cnvfmt[0x800];
                   MultiByteToWideChar(CP_ACP, MB_PRECOMPOSED, fmt, -1,
                                                                                                   cnvfmt, NELEMENTS(cnvfmt));
                   vswprintf(buf, cnvfmt, ap);
   #else
                 vsprintf(buf, fmt, ap);                  vsprintf(buf, fmt, ap);
   #endif
                 va_end(ap);                  va_end(ap);
                 if ((tracewin.en & 1) && (hView)) {                  if ((tracewin.en & 4) && (hView)) {
                         View_AddString(buf);                          View_AddString(buf);
                 }                  }
                 if (tracewin.fh != FILEH_INVALID) {                  if (tracewin.fh != FILEH_INVALID) {
                         file_write(tracewin.fh, buf, strlen(buf));                          trfh_add(buf);
                         file_write(tracewin.fh, crlf, strlen(crlf));                          trfh_add(crlf);
                 }                  }
         }          }
 }  }
   
   void trace_char(char c) {
   
           if ((c == 0x0a) || (c == 0x0d)) {
                   if (devpos) {
                           devstr[devpos] = '\0';
   #if defined(_UNICODE)
                           TCHAR pdevstr[0x800];
                           MultiByteToWideChar(CP_ACP, MB_PRECOMPOSED, devstr, -1,
                                                                                                   pdevstr, NELEMENTS(pdevstr));
   #else
                           const TCHAR *pdevstr = devstr;
   #endif
                           if ((tracewin.en & 4) && (hView)) {
                                   View_AddString(pdevstr);
                           }
                           if (tracewin.fh != FILEH_INVALID) {
                                   trfh_add(pdevstr);
                                   trfh_add(crlf);
                           }
                           devpos = 0;
                   }
           }
           else {
                   if (devpos < (sizeof(devstr) - 1)) {
                           devstr[devpos++] = c;
                   }
           }
   }
 #endif  #endif
   
Removed from v.1.5  
changed lines
  Added in v.1.15

RetroPC.NET-CVS <cvs@retropc.net>