dlls/shell32/shellstring.c

   1 /*
   2  * Copyright 2000 Juergen Schmied
   3  *
   4  * This library is free software; you can redistribute it and/or
   5  * modify it under the terms of the GNU Lesser General Public
   6  * License as published by the Free Software Foundation; either
   7  * version 2.1 of the License, or (at your option) any later version.
   8  *
   9  * This library is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12  * Lesser General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU Lesser General Public
  15  * License along with this library; if not, write to the Free Software
  16  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  17  */
  18
  19 #include <string.h>
  20 #include <stdio.h>
  21 #include <ctype.h>
  22 #include <stdlib.h>
  23
  24 #include "winnls.h"
  25 #include "winerror.h"
  26 #include "winreg.h"
  27
  28 #include "shlobj.h"
  29 #include "shellapi.h"
  30 #include "shell32_main.h"
  31 #include "undocshell.h"
  32 #include "wine/unicode.h"
  33 #include "wine/debug.h"
  34
  35 WINE_DEFAULT_DEBUG_CHANNEL(shell);
  36
  37 /************************* STRRET functions ****************************/
  38
  39 /*
  40  * ***** NOTE *****
  41  *  These routines are identical to StrRetToBuf[AW] in dlls/shlwapi/string.c.
  42  *  They were duplicated here because not every version of Shlwapi.dll exports
  43  *  StrRetToBuf[AW]. If you change one routine, change them both. YOU HAVE BEEN
  44  *  WARNED.
  45  * ***** NOTE *****
  46  */
  47
  48 HRESULT WINAPI StrRetToStrNA (LPVOID dest, DWORD len, LPSTRRET src, const ITEMIDLIST *pidl)
  49 {
  50         TRACE("dest=0x%p len=0x%lx strret=%p(%s) pidl=%p\n",
  51             dest,len,src,
  52             (src->uType == STRRET_WSTR) ? "STRRET_WSTR" :
  53             (src->uType == STRRET_CSTR) ? "STRRET_CSTR" :
  54             (src->uType == STRRET_OFFSET) ? "STRRET_OFFSET" : "STRRET_???",
  55             pidl);
  56
  57         switch (src->uType)
  58         {
  59           case STRRET_WSTR:
  60             WideCharToMultiByte(CP_ACP, 0, src->u.pOleStr, -1, (LPSTR)dest, len, NULL, NULL);
  61             CoTaskMemFree(src->u.pOleStr);
  62             break;
  63
  64           case STRRET_CSTR:
  65             lstrcpynA((LPSTR)dest, src->u.cStr, len);
  66             break;
  67
  68           case STRRET_OFFSET:
  69             lstrcpynA((LPSTR)dest, ((LPCSTR)&pidl->mkid)+src->u.uOffset, len);
  70             break;
  71
  72           default:
  73             FIXME("unknown type!\n");
  74             if (len) *(LPSTR)dest = '\0';
  75             return(FALSE);
  76         }
  77         TRACE("-- %s\n", debugstr_a(dest) );
  78         return S_OK;
  79 }
  80
  81 /************************************************************************/
  82
  83 HRESULT WINAPI StrRetToStrNW (LPVOID dest, DWORD len, LPSTRRET src, const ITEMIDLIST *pidl)
  84 {
  85         TRACE("dest=0x%p len=0x%lx strret=%p(%s) pidl=%p\n",
  86             dest,len,src,
  87             (src->uType == STRRET_WSTR) ? "STRRET_WSTR" :
  88             (src->uType == STRRET_CSTR) ? "STRRET_CSTR" :
  89             (src->uType == STRRET_OFFSET) ? "STRRET_OFFSET" : "STRRET_???",
  90             pidl);
  91
  92         switch (src->uType)
  93         {
  94           case STRRET_WSTR:
  95             lstrcpynW((LPWSTR)dest, src->u.pOleStr, len);
  96             CoTaskMemFree(src->u.pOleStr);
  97             break;
  98
  99           case STRRET_CSTR:
 100             if (!MultiByteToWideChar( CP_ACP, 0, src->u.cStr, -1, dest, len ) && len)
 101                   ((LPWSTR)dest)[len-1] = 0;
 102             break;
 103
 104           case STRRET_OFFSET:
 105             if (!MultiByteToWideChar( CP_ACP, 0, ((LPCSTR)&pidl->mkid)+src->u.uOffset, -1, dest, len ) && len)
 106                   ((LPWSTR)dest)[len-1] = 0;
 107             break;
 108
 109           default:
 110             FIXME("unknown type!\n");
 111             if (len) *(LPWSTR)dest = '\0';
 112             return(FALSE);
 113         }
 114         return S_OK;
 115 }
 116
 117
 118 /*************************************************************************
 119  * StrRetToStrN                         [SHELL32.96]
 120  *
 121  * converts a STRRET to a normal string
 122  *
 123  * NOTES
 124  *  the pidl is for STRRET OFFSET
 125  */
 126 HRESULT WINAPI StrRetToStrNAW (LPVOID dest, DWORD len, LPSTRRET src, const ITEMIDLIST *pidl)
 127 {
 128         if(SHELL_OsIsUnicode())
 129           return StrRetToStrNW (dest, len, src, pidl);
 130         return StrRetToStrNA (dest, len, src, pidl);
 131 }
 132
 133 /************************* OLESTR functions ****************************/
 134
 135 /************************************************************************
 136  *      StrToOleStr                     [SHELL32.163]
 137  *
 138  */
 139 int WINAPI StrToOleStrA (LPWSTR lpWideCharStr, LPCSTR lpMultiByteString)
 140 {
 141         TRACE("(%p, %p %s)\n",
 142         lpWideCharStr, lpMultiByteString, debugstr_a(lpMultiByteString));
 143
 144         return MultiByteToWideChar(0, 0, lpMultiByteString, -1, lpWideCharStr, MAX_PATH);
 145
 146 }
 147 int WINAPI StrToOleStrW (LPWSTR lpWideCharStr, LPCWSTR lpWString)
 148 {
 149         TRACE("(%p, %p %s)\n",
 150         lpWideCharStr, lpWString, debugstr_w(lpWString));
 151
 152         strcpyW (lpWideCharStr, lpWString );
 153         return strlenW(lpWideCharStr);
 154 }
 155
 156 BOOL WINAPI StrToOleStrAW (LPWSTR lpWideCharStr, LPCVOID lpString)
 157 {
 158         if (SHELL_OsIsUnicode())
 159           return StrToOleStrW (lpWideCharStr, lpString);
 160         return StrToOleStrA (lpWideCharStr, lpString);
 161 }
 162
 163 /*************************************************************************
 164  * StrToOleStrN                                 [SHELL32.79]
 165  *  lpMulti, nMulti, nWide [IN]
 166  *  lpWide [OUT]
 167  */
 168 BOOL WINAPI StrToOleStrNA (LPWSTR lpWide, INT nWide, LPCSTR lpStrA, INT nStr)
 169 {
 170         TRACE("(%p, %x, %s, %x)\n", lpWide, nWide, debugstr_an(lpStrA,nStr), nStr);
 171         return MultiByteToWideChar (0, 0, lpStrA, nStr, lpWide, nWide);
 172 }
 173 BOOL WINAPI StrToOleStrNW (LPWSTR lpWide, INT nWide, LPCWSTR lpStrW, INT nStr)
 174 {
 175         TRACE("(%p, %x, %s, %x)\n", lpWide, nWide, debugstr_wn(lpStrW, nStr), nStr);
 176
 177         if (lstrcpynW (lpWide, lpStrW, nWide))
 178         { return lstrlenW (lpWide);
 179         }
 180         return 0;
 181 }
 182
 183 BOOL WINAPI StrToOleStrNAW (LPWSTR lpWide, INT nWide, LPCVOID lpStr, INT nStr)
 184 {
 185         if (SHELL_OsIsUnicode())
 186           return StrToOleStrNW (lpWide, nWide, lpStr, nStr);
 187         return StrToOleStrNA (lpWide, nWide, lpStr, nStr);
 188 }
 189
 190 /*************************************************************************
 191  * OleStrToStrN                                 [SHELL32.78]
 192  */
 193 BOOL WINAPI OleStrToStrNA (LPSTR lpStr, INT nStr, LPCWSTR lpOle, INT nOle)
 194 {
 195         TRACE("(%p, %x, %s, %x)\n", lpStr, nStr, debugstr_wn(lpOle,nOle), nOle);
 196         return WideCharToMultiByte (0, 0, lpOle, nOle, lpStr, nStr, NULL, NULL);
 197 }
 198
 199 BOOL WINAPI OleStrToStrNW (LPWSTR lpwStr, INT nwStr, LPCWSTR lpOle, INT nOle)
 200 {
 201         TRACE("(%p, %x, %s, %x)\n", lpwStr, nwStr, debugstr_wn(lpOle,nOle), nOle);
 202
 203         if (lstrcpynW ( lpwStr, lpOle, nwStr))
 204         { return lstrlenW (lpwStr);
 205         }
 206         return 0;
 207 }
 208
 209 BOOL WINAPI OleStrToStrNAW (LPVOID lpOut, INT nOut, LPCVOID lpIn, INT nIn)
 210 {
 211         if (SHELL_OsIsUnicode())
 212           return OleStrToStrNW (lpOut, nOut, lpIn, nIn);
 213         return OleStrToStrNA (lpOut, nOut, lpIn, nIn);
 214 }
 215
 216
 217 /*************************************************************************
 218  * CheckEscapes [SHELL32]
 219  */
 220 DWORD WINAPI CheckEscapesA(
 221     LPSTR    string,         /* [in]    string to check ??*/
 222            DWORD    b,              /* [???]   is 0 */
 223            DWORD    c,              /* [???]   is 0 */
 224            LPDWORD  d,              /* [???]   is address */
 225            LPDWORD  e,              /* [???]   is address */
 226            DWORD    handle )        /* [in]    looks like handle but not */
 227 {
 228     FIXME("(%p<%s> %ld %ld %p<%ld> %p<%ld> 0x%08lx) stub\n",
 229    string, debugstr_a(string),
 230    b,
 231    c,
 232    d, (d) ? *d : 0xabbacddc,
 233    e, (e) ? *e : 0xabbacddd,
 234    handle);
 235     return 0;
 236 }
 237
 238 DWORD WINAPI CheckEscapesW(
 239     LPWSTR   string,         /* [in]    string to check ??*/
 240            DWORD    b,              /* [???]   is 0 */
 241            DWORD    c,              /* [???]   is 0 */
 242            LPDWORD  d,              /* [???]   is address */
 243            LPDWORD  e,              /* [???]   is address */
 244            DWORD    handle )        /* [in]    looks like handle but not */
 245 {
 246     FIXME("(%p<%s> %ld %ld %p<%ld> %p<%ld> 0x%08lx) stub\n",
 247    string, debugstr_w(string),
 248    b,
 249    c,
 250    d, (d) ? *d : 0xabbacddc,
 251    e, (e) ? *e : 0xabbacddd,
 252    handle);
 253     return 0;
 254 }