src/msw/mslu.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        src/msw/mslu.cpp
   3 // Purpose:     Fixes for bugs in MSLU
   4 // Author:      Vaclav Slavik
   5 // Modified by:
   6 // Created:     2002/02/17
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) 2002 Vaclav Slavik
   9 // Licence:     wxWindows licence
  10 /////////////////////////////////////////////////////////////////////////////
  11
  12 // For compilers that support precompilation, includes "wx.h".
  13 #include "wx/wxprec.h"
  14
  15 #ifdef __BORLANDC__
  16     #pragma hdrstop
  17     #include <dir.h>
  18 #endif
  19
  20 #ifndef WX_PRECOMP
  21     #include "wx/utils.h"
  22 #endif
  23
  24 //------------------------------------------------------------------------
  25 // Check for use of MSLU
  26 //------------------------------------------------------------------------
  27
  28 #if wxUSE_BASE
  29
  30 bool WXDLLIMPEXP_BASE wxUsingUnicowsDll()
  31 {
  32 #if wxUSE_UNICODE_MSLU
  33     return (wxGetOsVersion() == wxOS_WINDOWS_9X);
  34 #else
  35     return false;
  36 #endif
  37 }
  38
  39 #endif // wxUSE_BASE
  40
  41
  42 #if wxUSE_UNICODE_MSLU
  43
  44 //------------------------------------------------------------------------
  45 //
  46 // NB: MSLU only covers Win32 API, it doesn't provide Unicode implementation of
  47 //     libc functions. Unfortunately, some of MSVCRT wchar_t functions
  48 //     (e.g. _wopen) don't work on Windows 9x, so we have to workaround it
  49 //     by calling the char version. We still want to use wchar_t version on
  50 //     NT/2000/XP, though, because they allow for Unicode file names.
  51 //
  52 //     Moreover, there are bugs in unicows.dll, of course. We have to
  53 //     workaround them, too.
  54 //
  55 //------------------------------------------------------------------------
  56
  57 #include "wx/msw/private.h"
  58 #include "wx/msw/mslu.h"
  59
  60 #include <stdio.h>
  61 #include <io.h>
  62 #include <sys/stat.h>
  63
  64 #ifdef __VISUALC__
  65     #include <direct.h>
  66 #endif
  67
  68 // Undef redirection macros defined in wx/msw/mslu.h:
  69 #undef DrawStateW
  70 #undef GetOpenFileNameW
  71 #undef GetSaveFileNameW
  72
  73 //------------------------------------------------------------------------
  74 // Wrongly implemented functions from unicows.dll
  75 //------------------------------------------------------------------------
  76
  77 #if wxUSE_GUI
  78
  79 WXDLLEXPORT int  wxMSLU_DrawStateW(WXHDC dc, WXHBRUSH br, WXFARPROC outputFunc,
  80                                    WXLPARAM lData, WXWPARAM wData,
  81                                    int x, int y, int cx, int cy,
  82                                    unsigned int flags)
  83 {
  84     // VS: There's yet another bug in MSLU: DrawStateW behaves like if it was
  85     //     expecting char*, not wchar_t* input. We have to use DrawStateA
  86     //     explicitly.
  87
  88     if ( wxUsingUnicowsDll() )
  89     {
  90         return DrawStateA((HDC)dc, (HBRUSH)br, (DRAWSTATEPROC)outputFunc,
  91                           (LPARAM)(const char*)
  92                                 wxConvLocal.cWX2MB((const wxChar*)lData),
  93                           wData, x, y, cx, cy, flags);
  94     }
  95     else
  96     {
  97         return DrawStateW((HDC)dc, (HBRUSH)br, (DRAWSTATEPROC)outputFunc,
  98                           lData, wData, x, y, cx, cy, flags);
  99     }
 100 }
 101
 102 static void wxFixOPENFILENAME(LPOPENFILENAME ofn)
 103 {
 104 #ifdef OFN_EXPLORER
 105     // VS: there's a bug in unicows.dll - when multiple files are selected,
 106     //     of.nFileOffset doesn't point to the first filename but rather to
 107     //     the last component of directory name. This bug is known to MSLU
 108     //     developers, but they are not going to fix it: "this is a true
 109     //     limitation, that we have decided to live with" and "working
 110     //     harder on this case just did not seem worth the effort"...
 111     //
 112     //     Our only option is to try to fix it ourselves:
 113
 114     if ( (ofn->Flags & OFN_ALLOWMULTISELECT) &&
 115          ofn->lpstrFile[ofn->nFileOffset-1] != wxT('\0') )
 116     {
 117         if ( wxDirExists(ofn->lpstrFile) )
 118         {
 119             // 1st component is dir => multiple files selected
 120             ofn->nFileOffset = wxStrlen(ofn->lpstrFile)+1;
 121         }
 122     }
 123 #endif
 124 }
 125
 126 WXDLLEXPORT int wxMSLU_GetOpenFileNameW(void *ofn)
 127 {
 128     int ret = GetOpenFileName((LPOPENFILENAME)ofn);
 129     if ( wxUsingUnicowsDll() && ret != 0 )
 130         wxFixOPENFILENAME((LPOPENFILENAME)ofn);
 131     return ret;
 132 }
 133
 134 WXDLLEXPORT int wxMSLU_GetSaveFileNameW(void *ofn)
 135 {
 136     int ret = GetSaveFileName((LPOPENFILENAME)ofn);
 137     if ( wxUsingUnicowsDll() && ret != 0 )
 138         wxFixOPENFILENAME((LPOPENFILENAME)ofn);
 139     return ret;
 140 }
 141
 142 #endif // wxUSE_GUI
 143
 144 //------------------------------------------------------------------------
 145 // Missing libc file manipulation functions in Win9x
 146 //------------------------------------------------------------------------
 147
 148 #if wxUSE_BASE
 149
 150 WXDLLIMPEXP_BASE int wxMSLU__trename(const wxChar *oldname,
 151                                      const wxChar *newname)
 152 {
 153     if ( wxUsingUnicowsDll() )
 154         return rename(wxConvFile.cWX2MB(oldname), wxConvFile.cWX2MB(newname));
 155     else
 156         return _trename(oldname, newname);
 157 }
 158
 159 WXDLLIMPEXP_BASE int wxMSLU__tremove(const wxChar *name)
 160 {
 161     if ( wxUsingUnicowsDll() )
 162         return remove(wxConvFile.cWX2MB(name));
 163     else
 164         return _tremove(name);
 165 }
 166
 167 WXDLLIMPEXP_BASE FILE* wxMSLU__tfopen(const wxChar *name,const wxChar* mode)
 168 {
 169     if ( wxUsingUnicowsDll() )
 170         return fopen(wxConvFile.cWX2MB(name),wxConvFile.cWX2MB(mode));
 171     else
 172         return _tfopen(name,mode);
 173 }
 174
 175 #if defined( __VISUALC__ ) \
 176     || ( defined(__MINGW32__) && wxCHECK_W32API_VERSION( 0, 5 ) ) \
 177     || ( defined(__MWERKS__) && defined(__WXMSW__) ) \
 178     || ( defined(__BORLANDC__) && (__BORLANDC__ > 0x460) )
 179
 180 WXDLLIMPEXP_BASE int wxMSLU__wopen(const wxChar *name, int flags, int mode)
 181 {
 182     if ( wxUsingUnicowsDll() )
 183 #ifdef __BORLANDC__
 184         return open(wxConvFile.cWX2MB(name), flags, mode);
 185 #else
 186         return _open(wxConvFile.cWX2MB(name), flags, mode);
 187 #endif
 188     else
 189         return _wopen(name, flags, mode);
 190 }
 191
 192 WXDLLIMPEXP_BASE int wxMSLU__waccess(const wxChar *name, int mode)
 193 {
 194     if ( wxUsingUnicowsDll() )
 195         return _access(wxConvFile.cWX2MB(name), mode);
 196     else
 197         return _waccess(name, mode);
 198 }
 199
 200 WXDLLIMPEXP_BASE int wxMSLU__wmkdir(const wxChar *name)
 201 {
 202     if ( wxUsingUnicowsDll() )
 203         return _mkdir(wxConvFile.cWX2MB(name));
 204     else
 205         return _wmkdir(name);
 206 }
 207
 208 WXDLLIMPEXP_BASE int wxMSLU__wrmdir(const wxChar *name)
 209 {
 210     if ( wxUsingUnicowsDll() )
 211         return _rmdir(wxConvFile.cWX2MB(name));
 212     else
 213         return _wrmdir(name);
 214 }
 215
 216 WXDLLIMPEXP_BASE int wxMSLU__wstat(const wxChar *name, struct _stat *buffer)
 217 {
 218     if ( wxUsingUnicowsDll() )
 219         return _stat((const char*)wxConvFile.cWX2MB(name), buffer);
 220     else
 221         return _wstat(name, buffer);
 222 }
 223
 224 #ifdef __BORLANDC__
 225 //here _stati64 is defined as stati64, see msw/mslu.h line 62
 226 #undef _stati64
 227 WXDLLIMPEXP_BASE int wxMSLU__wstati64(const wxChar *name, struct _stati64 *buffer)
 228  {
 229      if ( wxUsingUnicowsDll() )
 230         return _stati64((const char*)wxConvFile.cWX2MB(name), (stati64 *) buffer);
 231     else
 232         return _wstati64(name, (stati64 *) buffer);
 233 }
 234 #else
 235 WXDLLIMPEXP_BASE int wxMSLU__wstati64(const wxChar *name, struct _stati64 *buffer)
 236 {
 237     if ( wxUsingUnicowsDll() )
 238         return _stati64((const char*)wxConvFile.cWX2MB(name), buffer);
 239     else
 240         return _wstati64(name, buffer);
 241 }
 242 #endif //__BORLANDC__
 243
 244 #endif // compilers having wopen() &c
 245
 246 #endif // wxUSE_BASE
 247
 248 #endif // wxUSE_UNICODE_MSLU