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=0x%p pidl=%p stub\n",dest,len,src,pidl);
  51
  52         switch (src->uType)
  53         {
  54           case STRRET_WSTR:
  55             WideCharToMultiByte(CP_ACP, 0, src->u.pOleStr, -1, (LPSTR)dest, len, NULL, NULL);
  56 /*          SHFree(src->u.pOleStr);  FIXME: is this right? */
  57             break;
  58
  59           case STRRET_CSTRA:
  60             lstrcpynA((LPSTR)dest, src->u.cStr, len);
  61             break;
  62
  63           case STRRET_OFFSETA:
  64             lstrcpynA((LPSTR)dest, ((LPCSTR)&pidl->mkid)+src->u.uOffset, len);
  65             break;
  66
  67           default:
  68             FIXME("unknown type!\n");
  69             if (len)
  70             {
  71               *(LPSTR)dest = '\0';
  72             }
  73             return(FALSE);
  74         }
  75         return S_OK;
  76 }
  77
  78 /************************************************************************/
  79
  80 HRESULT WINAPI StrRetToStrNW (LPVOID dest1, DWORD len, LPSTRRET src, const ITEMIDLIST *pidl)
  81 {
  82     LPWSTR dest = (LPWSTR) dest1;
  83         TRACE("dest=0x%p len=0x%lx strret=0x%p pidl=%p stub\n",dest,len,src,pidl);
  84
  85         switch (src->uType)
  86         {
  87           case STRRET_WSTR:
  88             lstrcpynW((LPWSTR)dest, src->u.pOleStr, len);
  89 /*          SHFree(src->u.pOleStr);  FIXME: is this right? */
  90             break;
  91
  92           case STRRET_CSTRA:
  93               if (!MultiByteToWideChar( CP_ACP, 0, src->u.cStr, -1, dest, len ) && len)
  94                   dest[len-1] = 0;
  95             break;
  96
  97           case STRRET_OFFSETA:
  98             if (pidl)
  99             {
 100               if (!MultiByteToWideChar( CP_ACP, 0, ((LPCSTR)&pidl->mkid)+src->u.uOffset, -1,
 101                                         dest, len ) && len)
 102                   dest[len-1] = 0;
 103             }
 104             break;
 105
 106           default:
 107             FIXME("unknown type!\n");
 108             if (len)
 109             { *(LPSTR)dest = '\0';
 110             }
 111             return(FALSE);
 112         }
 113         return S_OK;
 114 }
 115
 116
 117 /*************************************************************************
 118  * StrRetToStrN                         [SHELL32.96]
 119  *
 120  * converts a STRRET to a normal string
 121  *
 122  * NOTES
 123  *  the pidl is for STRRET OFFSET
 124  */
 125 HRESULT WINAPI StrRetToStrNAW (LPVOID dest, DWORD len, LPSTRRET src, const ITEMIDLIST *pidl)
 126 {
 127         if(SHELL_OsIsUnicode())
 128           return StrRetToStrNW (dest, len, src, pidl);
 129         return StrRetToStrNA (dest, len, src, pidl);
 130 }
 131
 132 /************************* OLESTR functions ****************************/
 133
 134 /************************************************************************
 135  *      StrToOleStr                     [SHELL32.163]
 136  *
 137  */
 138 int WINAPI StrToOleStrA (LPWSTR lpWideCharStr, LPCSTR lpMultiByteString)
 139 {
 140         TRACE("(%p, %p %s)\n",
 141         lpWideCharStr, lpMultiByteString, debugstr_a(lpMultiByteString));
 142
 143         return MultiByteToWideChar(0, 0, lpMultiByteString, -1, lpWideCharStr, MAX_PATH);
 144
 145 }
 146 int WINAPI StrToOleStrW (LPWSTR lpWideCharStr, LPCWSTR lpWString)
 147 {
 148         TRACE("(%p, %p %s)\n",
 149         lpWideCharStr, lpWString, debugstr_w(lpWString));
 150
 151         strcpyW (lpWideCharStr, lpWString );
 152         return strlenW(lpWideCharStr);
 153 }
 154
 155 BOOL WINAPI StrToOleStrAW (LPWSTR lpWideCharStr, LPCVOID lpString)
 156 {
 157         if (SHELL_OsIsUnicode())
 158           return StrToOleStrW (lpWideCharStr, lpString);
 159         return StrToOleStrA (lpWideCharStr, lpString);
 160 }
 161
 162 /*************************************************************************
 163  * StrToOleStrN                                 [SHELL32.79]
 164  *  lpMulti, nMulti, nWide [IN]
 165  *  lpWide [OUT]
 166  */
 167 BOOL WINAPI StrToOleStrNA (LPWSTR lpWide, INT nWide, LPCSTR lpStrA, INT nStr)
 168 {
 169         TRACE("(%p, %x, %s, %x)\n", lpWide, nWide, debugstr_an(lpStrA,nStr), nStr);
 170         return MultiByteToWideChar (0, 0, lpStrA, nStr, lpWide, nWide);
 171 }
 172 BOOL WINAPI StrToOleStrNW (LPWSTR lpWide, INT nWide, LPCWSTR lpStrW, INT nStr)
 173 {
 174         TRACE("(%p, %x, %s, %x)\n", lpWide, nWide, debugstr_wn(lpStrW, nStr), nStr);
 175
 176         if (lstrcpynW (lpWide, lpStrW, nWide))
 177         { return lstrlenW (lpWide);
 178         }
 179         return 0;
 180 }
 181
 182 BOOL WINAPI StrToOleStrNAW (LPWSTR lpWide, INT nWide, LPCVOID lpStr, INT nStr)
 183 {
 184         if (SHELL_OsIsUnicode())
 185           return StrToOleStrNW (lpWide, nWide, lpStr, nStr);
 186         return StrToOleStrNA (lpWide, nWide, lpStr, nStr);
 187 }
 188
 189 /*************************************************************************
 190  * OleStrToStrN                                 [SHELL32.78]
 191  */
 192 BOOL WINAPI OleStrToStrNA (LPSTR lpStr, INT nStr, LPCWSTR lpOle, INT nOle)
 193 {
 194         TRACE("(%p, %x, %s, %x)\n", lpStr, nStr, debugstr_wn(lpOle,nOle), nOle);
 195         return WideCharToMultiByte (0, 0, lpOle, nOle, lpStr, nStr, NULL, NULL);
 196 }
 197
 198 BOOL WINAPI OleStrToStrNW (LPWSTR lpwStr, INT nwStr, LPCWSTR lpOle, INT nOle)
 199 {
 200         TRACE("(%p, %x, %s, %x)\n", lpwStr, nwStr, debugstr_wn(lpOle,nOle), nOle);
 201
 202         if (lstrcpynW ( lpwStr, lpOle, nwStr))
 203         { return lstrlenW (lpwStr);
 204         }
 205         return 0;
 206 }
 207
 208 BOOL WINAPI OleStrToStrNAW (LPVOID lpOut, INT nOut, LPCVOID lpIn, INT nIn)
 209 {
 210         if (SHELL_OsIsUnicode())
 211           return OleStrToStrNW (lpOut, nOut, lpIn, nIn);
 212         return OleStrToStrNA (lpOut, nOut, lpIn, nIn);
 213 }
 214
 215
 216 /*************************************************************************
 217  * CheckEscapes [SHELL32]
 218  */
 219 DWORD WINAPI CheckEscapesA(
 220     LPSTR    string,         /* [in]    string to check ??*/
 221            DWORD    b,              /* [???]   is 0 */
 222            DWORD    c,              /* [???]   is 0 */
 223            LPDWORD  d,              /* [???]   is address */
 224            LPDWORD  e,              /* [???]   is address */
 225            DWORD    handle )        /* [in]    looks like handle but not */
 226 {
 227     FIXME("(%p<%s> %ld %ld %p<%ld> %p<%ld> 0x%08lx) stub\n",
 228    string, debugstr_a(string),
 229    b,
 230    c,
 231    d, (d) ? *d : 0xabbacddc,
 232    e, (e) ? *e : 0xabbacddd,
 233    handle);
 234     return 0;
 235 }
 236
 237 DWORD WINAPI CheckEscapesW(
 238     LPWSTR   string,         /* [in]    string to check ??*/
 239            DWORD    b,              /* [???]   is 0 */
 240            DWORD    c,              /* [???]   is 0 */
 241            LPDWORD  d,              /* [???]   is address */
 242            LPDWORD  e,              /* [???]   is address */
 243            DWORD    handle )        /* [in]    looks like handle but not */
 244 {
 245     FIXME("(%p<%s> %ld %ld %p<%ld> %p<%ld> 0x%08lx) stub\n",
 246    string, debugstr_w(string),
 247    b,
 248    c,
 249    d, (d) ? *d : 0xabbacddc,
 250    e, (e) ? *e : 0xabbacddd,
 251    handle);
 252     return 0;
 253 }