X-Git-Url: https://git.saurik.com/wxWidgets.git/blobdiff_plain/a246f95e96183bc81bf5be5e1927d9bb53094f55..fbf456aa8952c6d2d3edeea1208b0e3159a3cb8d:/src/mgl/utils.cpp

diff --git a/src/mgl/utils.cpp b/src/mgl/utils.cpp
index 52b214cfd4..34930515df 100644
--- a/src/mgl/utils.cpp
+++ b/src/mgl/utils.cpp
@@ -3,7 +3,7 @@
 // Purpose:
 // Author:      Vaclav Slavik
 // Id:          $Id$
-// Copyright:   (c) 2001 SciTech Software, Inc. (www.scitechsoft.com)
+// Copyright:   (c) 2001-2002 SciTech Software, Inc. (www.scitechsoft.com)
 // Licence:     wxWindows licence
 /////////////////////////////////////////////////////////////////////////////
 
@@ -43,13 +43,131 @@ void wxBell()
     // FIXME_MGL
 }
 
+
+#ifdef __DOS__
+// VS: this should be in utilsdos.cpp, but since there will hardly ever
+//     be a non-MGL MS-DOS port...
+
+void wxSleep(int nSecs)
+{
+    wxUsleep(1000 * nSecs);
+}
+
+void wxUsleep(unsigned long milliseconds)
+{
+    PM_sleep(milliseconds);
+}
+
+
+bool wxGetEnv(const wxString& var, wxString *value)
+{
+    // wxGetenv is defined as getenv()
+    wxChar *p = wxGetenv(var);
+    if ( !p )
+        return FALSE;
+
+    if ( value )
+        *value = p;
+
+    return TRUE;
+}
+
+bool wxSetEnv(const wxString& variable, const wxChar *value)
+{
+    wxString s = variable;
+    if ( value )
+        s << _T('=') << value;
+
+    // transform to ANSI
+    const char *p = s.mb_str();
+
+    // the string will be free()d by libc
+    char *buf = (char *)malloc(strlen(p) + 1);
+    strcpy(buf, p);
+
+    return putenv(buf) == 0;
+}
+
+const wxChar* wxGetHomeDir(wxString *home)
+{
+    *home = wxT(".");
+    return home->c_str();
+}
+
+const wxChar* wxGetUserHomeDir(wxString *home)
+{
+    *home = wxT(".");
+    return home->c_str();
+}
+
+#if wxUSE_UNICODE
+const wxMB2WXbuf wxGetUserHome(const wxString &user)
+#else // just for binary compatibility -- there is no 'const' here
+wxChar *wxGetUserHome(const wxString &user)
+#endif
+{
+    return wxT(".");
+}
+
+void wxFatalError(const wxString &msg, const wxString &title)
+{
+    if (!title.IsNull()) 
+        wxFprintf( stderr, wxT("%s "), WXSTRINGCAST(title));
+    PM_fatalError(msg.c_str());
+}
+
+bool wxGetUserId(wxChar *WXUNUSED(buf), int WXUNUSED(sz))
+{
+    wxFAIL_MSG( wxT("wxGetUserId not implemented under MS-DOS!") );
+    return FALSE;
+}
+
+bool wxGetUserName(wxChar *WXUNUSED(buf), int WXUNUSED(sz))
+{
+    wxFAIL_MSG( wxT("wxGetUserName not implemented under MS-DOS!") );
+    return FALSE;
+}
+
+bool wxGetHostName(wxChar *WXUNUSED(buf), int WXUNUSED(sz))
+{
+    wxFAIL_MSG( wxT("wxGetHostName not implemented under MS-DOS!") );
+    return FALSE;
+}
+
+bool wxGetFullHostName(wxChar *WXUNUSED(buf), int WXUNUSED(sz))
+{
+    wxFAIL_MSG( wxT("wxGetFullHostName not implemented under MS-DOS!") );
+    return FALSE;
+}
+
+int wxKill(long WXUNUSED(pid), wxSignal WXUNUSED(sig), wxKillError *WXUNUSED(rc))
+{
+    wxFAIL_MSG( wxT("wxKill not implemented under MS-DOS!") );
+    return 0;
+}
+
+long wxExecute(const wxString& WXUNUSED(command), bool WXUNUSED(sync), wxProcess *WXUNUSED(process))
+{
+    wxFAIL_MSG( wxT("wxExecute not implemented under MS-DOS!") );
+    return 0;
+}
+
+long wxExecute(wxChar **WXUNUSED(argv), bool WXUNUSED(sync), wxProcess *WXUNUSED(process))
+{
+    wxFAIL_MSG( wxT("wxExecute not implemented under MS-DOS!") );
+    return 0;
+}
+
+
+#endif
+
 // ----------------------------------------------------------------------------
 // display characterstics
 // ----------------------------------------------------------------------------
 
 void wxDisplaySize(int *width, int *height)
 {
-    wxASSERT_MSG( g_displayDC, wxT("You must call wxApp::SetDisplayMode before using this function") );
+   wxASSERT_MSG( g_displayDC, wxT("You must call wxApp::SetDisplayMode before using this function") );
     if (width) *width = g_displayDC->sizex()+1;
     if (height) *height = g_displayDC->sizey()+1;
 }
@@ -57,11 +175,14 @@ void wxDisplaySize(int *width, int *height)
 void wxDisplaySizeMM(int *width, int *height)
 {
     wxASSERT_MSG( g_displayDC, wxT("You must call wxApp::SetDisplayMode before using this function") );
+
+    int xDPI, yDPI;
+    MGL_getDotsPerInch(&xDPI, &yDPI);    
+    
     if ( width ) 
-        *width = (g_displayDC->sizex()+1) * 25/72;
+        *width = (int)((g_displayDC->sizex()+1) * 25.4 / xDPI);
     if ( height ) 
-        *height = (g_displayDC->sizey()+1) * 25/72;
-    // FIXME_MGL -- what about returning *real* monitor dimensions?
+        *height = (int)((g_displayDC->sizey()+1) * 25.4 / yDPI);
 }
 
 void wxClientDisplayRect(int *x, int *y, int *width, int *height)