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

Diff for /np2/win9x/trace.cpp between versions 1.2 and 1.19

version 1.2, 2003/10/28 13:03:48 version 1.19, 2008/02/17 01:29:17
Line 1 Line 1
 #include        "compiler.h"  #include        "compiler.h"
 #include        <stdarg.h>  #include        <stdarg.h>
   #include        "resource.h"
 #include        "strres.h"  #include        "strres.h"
   #include        "textfile.h"
   #include        "oemtext.h"
 #include        "dosio.h"  #include        "dosio.h"
 #include        "ini.h"  #include        "ini.h"
   #include        "menu.h"
   
 #ifdef TRACE  #ifdef TRACE
   
Line 20 Line 23
 #define VIEW_TEXT               "£Í£Ó ¥´¥·¥Ã¥¯"  #define VIEW_TEXT               "£Í£Ó ¥´¥·¥Ã¥¯"
 #define VIEW_SIZE               12  #define VIEW_SIZE               12
   
   typedef struct
   {
           UINT8           en;
           TEXTFILEH       tf;
           HWND            hwnd;
   } TRACEWIN;
   
 typedef struct {  typedef struct {
         int             posx;          int             posx;
         int             posy;          int             posy;
Line 27  typedef struct { Line 37  typedef struct {
         int             height;          int             height;
 } TRACECFG;  } TRACECFG;
   
 extern  HINSTANCE       hInst;  extern  HINSTANCE       g_hInstance;
 extern  HINSTANCE       hPrev;  
   
 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       crlf[] = "\r\n";  static const TCHAR viewfont[] = _T(VIEW_TEXT);
   
 static  HWND            hWndConsole = NULL;  static const OEMCHAR crlf[] = OEMTEXT("\r\n");
 static  HWND            hView = NULL;  
 static  HFONT           hfView = NULL;  static  TRACEWIN        tracewin;
 static  HBRUSH          hBrush = NULL;  static  HWND            s_hView = NULL;
 static  char            szView[VIEW_BUFFERSIZE];  static  HFONT           s_hfView = NULL;
   static  HBRUSH          s_hBrush = NULL;
   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 60  static void View_ScrollToBottom(HWND hWn Line 74  static void View_ScrollToBottom(HWND hWn
         PostMessage(hWnd, EM_LINESCROLL, 0, MaxPos);          PostMessage(hWnd, EM_LINESCROLL, 0, MaxPos);
 }  }
   
 static void View_AddString(char *lpszString) {  static void View_ClrString(void) {
   
           viewpos = 0;
           viewleng = 0;
           viewbuf[0] = '\0';
           SetWindowText(s_hView, viewbuf);
   }
   
   static void View_AddString(const OEMCHAR *string) {
   
         int             len, vlen;          int             slen;
         char    *p;          int             vpos;
           int             vlen;
           TCHAR   c;
   
         len = strlen(lpszString);  #if defined(OEMCHAR_SAME_TCHAR)
         if ((!len) || ((len + 3) > VIEW_BUFFERSIZE)) {          slen = lstrlen(string);
   #else
           slen = oemtotchar(NULL, 0, string, (UINT)-1) - 1;
   #endif
           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);  #if defined(OEMCHAR_SAME_TCHAR)
         strcat(szView, crlf);          CopyMemory(viewbuf + vpos + vlen, string, slen * sizeof(TCHAR));
         SetWindowText(hView, szView);  #else
         View_ScrollToBottom(hView);          oemtotchar(viewbuf + vpos + vlen, slen + 1, string, (UINT)-1);
   #endif
           vlen += slen;
           viewbuf[vpos + vlen + 0] = '\r';
           viewbuf[vpos + vlen + 1] = '\n';
           viewbuf[vpos + vlen + 2] = '\0';
           viewleng = vlen + 2;
           SetWindowText(s_hView, viewbuf + vpos);
           View_ScrollToBottom(s_hView);
 }  }
   
 static LRESULT CALLBACK traceproc(HWND hWnd, UINT msg, WPARAM wp, LPARAM lp) {  
   
   // ----
   
   static LRESULT onCreate(HWND hWnd)
   {
           HMENU   hMenu;
         RECT    rc;          RECT    rc;
   
         switch (msg) {          hMenu = GetSystemMenu(hWnd, FALSE);
                 case WM_CREATE:          menu_addmenures(hMenu, 0, IDR_TRACE, FALSE);
                         GetClientRect(hWnd, &rc);  
                         hView = CreateWindowEx(WS_EX_CLIENTEDGE,          CheckMenuItem(hMenu, IDM_TRACE_TRACE,
                                                                   (tracewin.en & 1)?MF_CHECKED:MF_UNCHECKED);
           CheckMenuItem(hMenu, IDM_TRACE_VERBOSE,
                                                                   (tracewin.en & 2)?MF_CHECKED:MF_UNCHECKED);
           CheckMenuItem(hMenu, IDM_TRACE_ENABLE,
                                                                   (tracewin.en & 4)?MF_CHECKED:MF_UNCHECKED);
   
           GetClientRect(hWnd, &rc);
           s_hView = CreateWindowEx(WS_EX_CLIENTEDGE,
                                                         ClassEdit, NULL,                                                          ClassEdit, NULL,
                                                         WS_CHILD | WS_VISIBLE | ES_READONLY | ES_LEFT |                                                          WS_CHILD | WS_VISIBLE | ES_READONLY | ES_LEFT |
                                                         ES_MULTILINE | WS_VSCROLL | ES_AUTOVSCROLL,                                                          ES_MULTILINE | WS_VSCROLL | ES_AUTOVSCROLL,
                                                         0, 0, rc.right, rc.bottom,                                                          0, 0, rc.right, rc.bottom,
                                                         hWnd, (HMENU)IDC_VIEW, hInst, NULL);                                                          hWnd, (HMENU)IDC_VIEW, g_hInstance, NULL);
                         if (!hView) {          SendMessage(s_hView, EM_SETLIMITTEXT, (WPARAM)VIEW_BUFFERSIZE, 0);
                                 break;  
                         }  
                         SendMessage(hView, EM_SETLIMITTEXT, (WPARAM)VIEW_BUFFERSIZE, 0);  
   
                         hfView = CreateFont(VIEW_SIZE, 0, 0, 0, 0, 0, 0, 0,           s_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, viewfont);
                         if (!hfView) {          if (s_hfView)
                                 break;          {
                         }                  SendMessage(s_hView, WM_SETFONT, (WPARAM)s_hfView,
                         SendMessage(hView, WM_SETFONT, (WPARAM)hfView,  
                                                                                                 MAKELPARAM(TRUE, 0));                                                                                                  MAKELPARAM(TRUE, 0));
                         hBrush = CreateSolidBrush(VIEW_BGCOLOR);          }
                         SetFocus(hView);  
                         return(TRUE);          s_hBrush = CreateSolidBrush(VIEW_BGCOLOR);
           SetFocus(s_hView);
   
           return TRUE;
   }
   
   static LRESULT onSysCommand(HWND hWnd, WPARAM wParam, LPARAM lParam)
   {
           HMENU   hMenu;
   
           hMenu = GetSystemMenu(hWnd, FALSE);
           switch(wParam)
           {
                   case IDM_TRACE_TRACE:
                           tracewin.en ^= 1;
                           CheckMenuItem(hMenu, IDM_TRACE_TRACE,
                                                                   (tracewin.en & 1)?MF_CHECKED:MF_UNCHECKED);
                           break;
   
                   case IDM_TRACE_VERBOSE:
                           tracewin.en ^= 2;
                           CheckMenuItem(hMenu, IDM_TRACE_VERBOSE,
                                                                   (tracewin.en & 2)?MF_CHECKED:MF_UNCHECKED);
                           break;
   
                   case IDM_TRACE_ENABLE:
                           tracewin.en ^= 4;
                           CheckMenuItem(hMenu, IDM_TRACE_ENABLE,
                                                                   (tracewin.en & 4)?MF_CHECKED:MF_UNCHECKED);
                           break;
   
                   case IDM_TRACE_FILEOUT:
                           if (tracewin.tf != NULL)
                           {
                                   textfile_close(tracewin.tf);
                                   tracewin.tf = NULL;
                           }
                           else
                           {
                                   tracewin.tf = textfile_create(OEMTEXT("traceout.txt"),
                                                                                                                                   0x800);
                           }
                           CheckMenuItem(hMenu, IDM_TRACE_FILEOUT,
                                                                           (tracewin.tf)?MF_CHECKED:MF_UNCHECKED);
                           break;
   
                   case IDM_TRACE_CLEAR:
                           View_ClrString();
                           break;
   
                   default:
                           return DefWindowProc(hWnd, WM_SYSCOMMAND, wParam, lParam);
           }
           return FALSE;
   }
   
   static LRESULT CALLBACK traceproc(HWND hWnd, UINT uMsg,
                                                                                                   WPARAM wParam, LPARAM lParam)
   {
           RECT    rc;
   
           switch(uMsg)
           {
                   case WM_CREATE:
                           return onCreate(hWnd);
   
                   case WM_SYSCOMMAND:
                           return onSysCommand(hWnd, wParam, lParam);
   
                 case WM_MOVE:                  case WM_MOVE:
                         if (!(GetWindowLong(hWnd, GWL_STYLE) &                          if (!(GetWindowLong(hWnd, GWL_STYLE) &
                                                                                         (WS_MAXIMIZE | WS_MINIMIZE))) {                                                                                          (WS_MAXIMIZE | WS_MINIMIZE)))
                           {
                                 GetWindowRect(hWnd, &rc);                                  GetWindowRect(hWnd, &rc);
                                 tracecfg.posx = rc.left;                                  tracecfg.posx = rc.left;
                                 tracecfg.posy = rc.top;                                  tracecfg.posy = rc.top;
Line 127  static LRESULT CALLBACK traceproc(HWND h Line 246  static LRESULT CALLBACK traceproc(HWND h
   
                 case WM_SIZE:                                                   // window resize                  case WM_SIZE:                                                   // window resize
                         if (!(GetWindowLong(hWnd, GWL_STYLE) &                          if (!(GetWindowLong(hWnd, GWL_STYLE) &
                                                                                 (WS_MAXIMIZE | WS_MINIMIZE))) {                                                                                  (WS_MAXIMIZE | WS_MINIMIZE)))
                           {
                                 GetWindowRect(hWnd, &rc);                                  GetWindowRect(hWnd, &rc);
                                 tracecfg.width = rc.right - rc.left;                                  tracecfg.width = rc.right - rc.left;
                                 tracecfg.height = rc.bottom - rc.top;                                  tracecfg.height = rc.bottom - rc.top;
                         }                          }
                         MoveWindow(hView, 0, 0, LOWORD(lp), HIWORD(lp), TRUE);                          MoveWindow(s_hView, 0, 0, LOWORD(lParam), HIWORD(lParam), TRUE);
                         View_ScrollToBottom(hView);                          View_ScrollToBottom(s_hView);
                         break;                          break;
   
                 case WM_SETFOCUS:                  case WM_SETFOCUS:
                         SetFocus(hView);                          SetFocus(s_hView);
                         return(0L);                          return(0L);
   
                 case WM_CTLCOLORSTATIC:                  case WM_CTLCOLORSTATIC:
                 case WM_CTLCOLOREDIT:                  case WM_CTLCOLOREDIT:
                         SetTextColor((HDC)wp, VIEW_FGCOLOR);                          SetTextColor((HDC)wParam, VIEW_FGCOLOR);
                         SetBkColor((HDC)wp, VIEW_BGCOLOR);                          SetBkColor((HDC)wParam, VIEW_BGCOLOR);
                         return((LRESULT)hBrush);                          return((LRESULT)s_hBrush);
   
                 case WM_CLOSE:                  case WM_CLOSE:
                         break;                          break;
   
                 case WM_DESTROY:                  case WM_DESTROY:
                         if (hBrush) {                          if (s_hBrush)
                                 DeleteObject(hBrush);                          {
                                   DeleteObject(s_hBrush);
                         }                          }
                         if (hfView) {                          if (s_hfView)
                                 DeleteObject(hfView);                          {
                                   DeleteObject(s_hfView);
                         }                          }
                         break;                          break;
 #if 0  #if 0
Line 163  static LRESULT CALLBACK traceproc(HWND h Line 285  static LRESULT CALLBACK traceproc(HWND h
                         break;                          break;
   
                 case WM_MOVING:                  case WM_MOVING:
                         winloc_movingproc((RECT *)lp);                          winloc_movingproc((RECT *)lParam);
                         break;                          break;
   
                 case WM_ERASEBKGND:                  case WM_ERASEBKGND:
                         return(FALSE);                          return FALSE;
 #endif  #endif
                 default:                  default:
                         return(DefWindowProc(hWnd, msg, wp, lp));                          return DefWindowProc(hWnd, uMsg, wParam, lParam);
         }          }
         return(0L);          return FALSE;
 }  }
   
   
Line 180  static LRESULT CALLBACK traceproc(HWND h Line 302  static LRESULT CALLBACK traceproc(HWND h
   
 void trace_init(void) {  void trace_init(void) {
   
         if (!hPrev) {          HWND    hwnd;
                 WNDCLASS wc;  
                 wc.style = CS_HREDRAW | CS_VREDRAW;          ZeroMemory(&tracewin, sizeof(tracewin));
                 wc.lpfnWndProc = traceproc;          WNDCLASS wc;
                 wc.cbClsExtra = 0;          wc.style = CS_HREDRAW | CS_VREDRAW;
                 wc.cbWndExtra = 0;          wc.lpfnWndProc = traceproc;
                 wc.hInstance = hInst;          wc.cbClsExtra = 0;
                 wc.hIcon = NULL;          wc.cbWndExtra = 0;
                 wc.hCursor = LoadCursor(NULL, IDC_ARROW);          wc.hInstance = g_hInstance;
                 wc.hbrBackground = (HBRUSH)GetStockObject(WHITE_BRUSH);          wc.hIcon = NULL;
                 wc.lpszMenuName = NULL;          wc.hCursor = LoadCursor(NULL, IDC_ARROW);
                 wc.lpszClassName = (LPCSTR)ClassName;          wc.hbrBackground = (HBRUSH)GetStockObject(WHITE_BRUSH);
                 if (!RegisterClass(&wc)) {          wc.lpszMenuName = NULL;
                         return;          wc.lpszClassName = ClassName;
                 }          if (!RegisterClass(&wc)) {
                   return;
         }          }
   
   #if 1
           tracewin.en = 4;
   #else
           tracewin.en = 1;
           tracewin.tf = textfile_create(OEMTEXT("traceout.txt"), 0x800);
   #endif
   
         tracecfg.posx = CW_USEDEFAULT;          tracecfg.posx = CW_USEDEFAULT;
         tracecfg.posy = CW_USEDEFAULT;          tracecfg.posy = CW_USEDEFAULT;
         tracecfg.width = CW_USEDEFAULT;          tracecfg.width = CW_USEDEFAULT;
         tracecfg.height = CW_USEDEFAULT;          tracecfg.height = CW_USEDEFAULT;
         ini_read(file_getcd(np2trace), inititle, initbl, 4);          ini_read(file_getcd(np2trace), inititle, initbl, NELEMENTS(initbl));
   
         hWndConsole = CreateWindowEx(WS_EX_CONTROLPARENT,          hwnd = CreateWindowEx(WS_EX_CONTROLPARENT,
                                                         ClassName, ProgTitle,                                                          ClassName, ProgTitle,
                                                         WS_OVERLAPPEDWINDOW,                                                          WS_OVERLAPPEDWINDOW,
                                                         tracecfg.posx, tracecfg.posy,                                                          tracecfg.posx, tracecfg.posy,
                                                         tracecfg.width, tracecfg.height,                                                          tracecfg.width, tracecfg.height,
                                                         NULL, NULL, hInst, NULL);                                                          NULL, NULL, g_hInstance, NULL);
         if (!hWndConsole) {          tracewin.hwnd = hwnd;
           if (hwnd == NULL) {
                 return;                  return;
         }          }
         ShowWindow(hWndConsole, SW_SHOW);          ShowWindow(hwnd, SW_SHOW);
         UpdateWindow(hWndConsole);          UpdateWindow(hwnd);
 }  }
   
 void trace_term(void) {  void trace_term(void) {
   
         if (hWndConsole) {          if (tracewin.tf != NULL) {
                 DestroyWindow(hWndConsole);                  textfile_close(tracewin.tf);
                 hWndConsole = NULL;                  tracewin.tf = NULL;
                 ini_write(file_getcd(np2trace), inititle, initbl, 4);          }
           if (tracewin.hwnd) {
                   DestroyWindow(tracewin.hwnd);
                   tracewin.hwnd = NULL;
                   ini_write(file_getcd(np2trace), inititle, initbl, NELEMENTS(initbl));
         }          }
 }  }
   
 void trace_fmt(const char *fmt, ...) {  void trace_fmt(const char *fmt, ...) {
   
         char    buf[0x1000];          BOOL    en;
           va_list ap;
           OEMCHAR buf[0x1000];
   
           en = (tracewin.en & 1) &&
                   ((tracewin.en & 4) || (tracewin.tf != NULL));
           if (en) {
                   va_start(ap, fmt);
   #if defined(OSLANG_UCS2)
                   OEMCHAR 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) && (s_hView)) {
                           View_AddString(buf);
                   }
                   if (tracewin.tf != NULL) {
                           textfile_write(tracewin.tf, buf);
                           textfile_write(tracewin.tf, crlf);
                   }
           }
   }
   
   void trace_fmt2(const char *fmt, ...) {
   
           BOOL    en;
         va_list ap;          va_list ap;
           OEMCHAR buf[0x1000];
   
         if (hView) {          en = (tracewin.en & 2) &&
                   ((tracewin.en & 4) || (tracewin.tf != NULL));
           if (en) {
                 va_start(ap, fmt);                  va_start(ap, fmt);
   #if defined(OSLANG_UCS2)
                   OEMCHAR 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);
                 View_AddString(buf);                  if ((tracewin.en & 4) && (s_hView)) {
                           View_AddString(buf);
                   }
                   if (tracewin.tf != FILEH_INVALID) {
                           textfile_write(tracewin.tf, buf);
                           textfile_write(tracewin.tf, crlf);
                   }
         }          }
 }  }
   
   void trace_char(char c) {
   
           if ((c == 0x0a) || (c == 0x0d)) {
                   if (devpos) {
                           devstr[devpos] = '\0';
   #if defined(OSLANG_UCS2)
                           TCHAR pdevstr[0x800];
                           MultiByteToWideChar(CP_ACP, MB_PRECOMPOSED, devstr, -1,
                                                                                                   pdevstr, NELEMENTS(pdevstr));
   #else
                           const OEMCHAR *pdevstr = devstr;
   #endif
                           if ((tracewin.en & 4) && (s_hView))
                           {
                                   View_AddString(pdevstr);
                           }
                           if (tracewin.tf != NULL) {
                                   textfile_write(tracewin.tf, pdevstr);
                                   textfile_write(tracewin.tf, crlf);
                           }
                           devpos = 0;
                   }
           }
           else {
                   if (devpos < (sizeof(devstr) - 1)) {
                           devstr[devpos++] = c;
                   }
           }
   }
 #endif  #endif
   
Removed from v.1.2  
changed lines
  Added in v.1.19

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