289 lines
7.9 KiB
C
289 lines
7.9 KiB
C
/*
|
|
* Copyright 2000 Juergen Schmied
|
|
*
|
|
* This library is free software; you can redistribute it and/or
|
|
* modify it under the terms of the GNU Lesser General Public
|
|
* License as published by the Free Software Foundation; either
|
|
* version 2.1 of the License, or (at your option) any later version.
|
|
*
|
|
* This library is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
* Lesser General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU Lesser General Public
|
|
* License along with this library; if not, write to the Free Software
|
|
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
|
*/
|
|
|
|
#include <string.h>
|
|
#include <stdarg.h>
|
|
#include <stdio.h>
|
|
#include <ctype.h>
|
|
#include <stdlib.h>
|
|
|
|
#define NONAMELESSUNION
|
|
#define NONAMELESSSTRUCT
|
|
#include "windef.h"
|
|
#include "winbase.h"
|
|
#include "winnls.h"
|
|
#include "winerror.h"
|
|
#include "wingdi.h"
|
|
#include "winuser.h"
|
|
#include "winreg.h"
|
|
|
|
#include "shlobj.h"
|
|
#include "shellapi.h"
|
|
#include "shlwapi.h"
|
|
#include "shell32_main.h"
|
|
#include "undocshell.h"
|
|
#include "wine/unicode.h"
|
|
#include "wine/debug.h"
|
|
|
|
WINE_DEFAULT_DEBUG_CHANNEL(shell);
|
|
|
|
/************************* STRRET functions ****************************/
|
|
|
|
/*
|
|
* ***** NOTE *****
|
|
* These routines are identical to StrRetToBuf[AW] in dlls/shlwapi/string.c.
|
|
* They were duplicated here because not every version of Shlwapi.dll exports
|
|
* StrRetToBuf[AW]. If you change one routine, change them both. YOU HAVE BEEN
|
|
* WARNED.
|
|
* ***** NOTE *****
|
|
*/
|
|
|
|
HRESULT WINAPI StrRetToStrNA (LPVOID dest, DWORD len, LPSTRRET src, const ITEMIDLIST *pidl)
|
|
{
|
|
TRACE("dest=%p len=0x%lx strret=%p(%s) pidl=%p\n",
|
|
dest,len,src,
|
|
(src->uType == STRRET_WSTR) ? "STRRET_WSTR" :
|
|
(src->uType == STRRET_CSTR) ? "STRRET_CSTR" :
|
|
(src->uType == STRRET_OFFSET) ? "STRRET_OFFSET" : "STRRET_???",
|
|
pidl);
|
|
|
|
switch (src->uType)
|
|
{
|
|
case STRRET_WSTR:
|
|
WideCharToMultiByte(CP_ACP, 0, src->u.pOleStr, -1, (LPSTR)dest, len, NULL, NULL);
|
|
CoTaskMemFree(src->u.pOleStr);
|
|
break;
|
|
|
|
case STRRET_CSTR:
|
|
lstrcpynA((LPSTR)dest, src->u.cStr, len);
|
|
break;
|
|
|
|
case STRRET_OFFSET:
|
|
lstrcpynA((LPSTR)dest, ((LPCSTR)&pidl->mkid)+src->u.uOffset, len);
|
|
break;
|
|
|
|
default:
|
|
FIXME("unknown type!\n");
|
|
if (len) *(LPSTR)dest = '\0';
|
|
return(FALSE);
|
|
}
|
|
TRACE("-- %s\n", debugstr_a(dest) );
|
|
return S_OK;
|
|
}
|
|
|
|
/************************************************************************/
|
|
|
|
HRESULT WINAPI StrRetToStrNW (LPVOID dest, DWORD len, LPSTRRET src, const ITEMIDLIST *pidl)
|
|
{
|
|
TRACE("dest=%p len=0x%lx strret=%p(%s) pidl=%p\n",
|
|
dest,len,src,
|
|
(src->uType == STRRET_WSTR) ? "STRRET_WSTR" :
|
|
(src->uType == STRRET_CSTR) ? "STRRET_CSTR" :
|
|
(src->uType == STRRET_OFFSET) ? "STRRET_OFFSET" : "STRRET_???",
|
|
pidl);
|
|
|
|
switch (src->uType)
|
|
{
|
|
case STRRET_WSTR:
|
|
lstrcpynW((LPWSTR)dest, src->u.pOleStr, len);
|
|
CoTaskMemFree(src->u.pOleStr);
|
|
break;
|
|
|
|
case STRRET_CSTR:
|
|
if (!MultiByteToWideChar( CP_ACP, 0, src->u.cStr, -1, dest, len ) && len)
|
|
((LPWSTR)dest)[len-1] = 0;
|
|
break;
|
|
|
|
case STRRET_OFFSET:
|
|
if (!MultiByteToWideChar( CP_ACP, 0, ((LPCSTR)&pidl->mkid)+src->u.uOffset, -1, dest, len ) && len)
|
|
((LPWSTR)dest)[len-1] = 0;
|
|
break;
|
|
|
|
default:
|
|
FIXME("unknown type!\n");
|
|
if (len) *(LPWSTR)dest = '\0';
|
|
return(FALSE);
|
|
}
|
|
return S_OK;
|
|
}
|
|
|
|
|
|
/*************************************************************************
|
|
* StrRetToStrN [SHELL32.96]
|
|
*
|
|
* converts a STRRET to a normal string
|
|
*
|
|
* NOTES
|
|
* the pidl is for STRRET OFFSET
|
|
*/
|
|
HRESULT WINAPI StrRetToStrNAW (LPVOID dest, DWORD len, LPSTRRET src, const ITEMIDLIST *pidl)
|
|
{
|
|
if(SHELL_OsIsUnicode())
|
|
return StrRetToStrNW (dest, len, src, pidl);
|
|
return StrRetToStrNA (dest, len, src, pidl);
|
|
}
|
|
|
|
/************************* OLESTR functions ****************************/
|
|
|
|
/************************************************************************
|
|
* StrToOleStr [SHELL32.163]
|
|
*
|
|
*/
|
|
int WINAPI StrToOleStrA (LPWSTR lpWideCharStr, LPCSTR lpMultiByteString)
|
|
{
|
|
TRACE("(%p, %p %s)\n",
|
|
lpWideCharStr, lpMultiByteString, debugstr_a(lpMultiByteString));
|
|
|
|
return MultiByteToWideChar(0, 0, lpMultiByteString, -1, lpWideCharStr, MAX_PATH);
|
|
|
|
}
|
|
int WINAPI StrToOleStrW (LPWSTR lpWideCharStr, LPCWSTR lpWString)
|
|
{
|
|
TRACE("(%p, %p %s)\n",
|
|
lpWideCharStr, lpWString, debugstr_w(lpWString));
|
|
|
|
strcpyW (lpWideCharStr, lpWString );
|
|
return strlenW(lpWideCharStr);
|
|
}
|
|
|
|
BOOL WINAPI StrToOleStrAW (LPWSTR lpWideCharStr, LPCVOID lpString)
|
|
{
|
|
if (SHELL_OsIsUnicode())
|
|
return StrToOleStrW (lpWideCharStr, lpString);
|
|
return StrToOleStrA (lpWideCharStr, lpString);
|
|
}
|
|
|
|
/*************************************************************************
|
|
* StrToOleStrN [SHELL32.79]
|
|
* lpMulti, nMulti, nWide [IN]
|
|
* lpWide [OUT]
|
|
*/
|
|
BOOL WINAPI StrToOleStrNA (LPWSTR lpWide, INT nWide, LPCSTR lpStrA, INT nStr)
|
|
{
|
|
TRACE("(%p, %x, %s, %x)\n", lpWide, nWide, debugstr_an(lpStrA,nStr), nStr);
|
|
return MultiByteToWideChar (0, 0, lpStrA, nStr, lpWide, nWide);
|
|
}
|
|
BOOL WINAPI StrToOleStrNW (LPWSTR lpWide, INT nWide, LPCWSTR lpStrW, INT nStr)
|
|
{
|
|
TRACE("(%p, %x, %s, %x)\n", lpWide, nWide, debugstr_wn(lpStrW, nStr), nStr);
|
|
|
|
if (lstrcpynW (lpWide, lpStrW, nWide))
|
|
{ return lstrlenW (lpWide);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
BOOL WINAPI StrToOleStrNAW (LPWSTR lpWide, INT nWide, LPCVOID lpStr, INT nStr)
|
|
{
|
|
if (SHELL_OsIsUnicode())
|
|
return StrToOleStrNW (lpWide, nWide, lpStr, nStr);
|
|
return StrToOleStrNA (lpWide, nWide, lpStr, nStr);
|
|
}
|
|
|
|
/*************************************************************************
|
|
* OleStrToStrN [SHELL32.78]
|
|
*/
|
|
BOOL WINAPI OleStrToStrNA (LPSTR lpStr, INT nStr, LPCWSTR lpOle, INT nOle)
|
|
{
|
|
TRACE("(%p, %x, %s, %x)\n", lpStr, nStr, debugstr_wn(lpOle,nOle), nOle);
|
|
return WideCharToMultiByte (0, 0, lpOle, nOle, lpStr, nStr, NULL, NULL);
|
|
}
|
|
|
|
BOOL WINAPI OleStrToStrNW (LPWSTR lpwStr, INT nwStr, LPCWSTR lpOle, INT nOle)
|
|
{
|
|
TRACE("(%p, %x, %s, %x)\n", lpwStr, nwStr, debugstr_wn(lpOle,nOle), nOle);
|
|
|
|
if (lstrcpynW ( lpwStr, lpOle, nwStr))
|
|
{ return lstrlenW (lpwStr);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
BOOL WINAPI OleStrToStrNAW (LPVOID lpOut, INT nOut, LPCVOID lpIn, INT nIn)
|
|
{
|
|
if (SHELL_OsIsUnicode())
|
|
return OleStrToStrNW (lpOut, nOut, lpIn, nIn);
|
|
return OleStrToStrNA (lpOut, nOut, lpIn, nIn);
|
|
}
|
|
|
|
|
|
/*************************************************************************
|
|
* CheckEscapesA [SHELL32.@]
|
|
*
|
|
* Checks a string for special characters which are not allowed in a path
|
|
* and encloses it in quotes if that is the case.
|
|
*
|
|
* PARAMS
|
|
* string [I/O] string to check and on return eventually quoted
|
|
* len [I] length of string
|
|
*
|
|
* RETURNS
|
|
* length of actual string
|
|
*
|
|
* NOTES
|
|
* Not really sure if this function returns actually a value at all.
|
|
*/
|
|
DWORD WINAPI CheckEscapesA(
|
|
LPSTR string, /* [I/O] string to check ??*/
|
|
DWORD len) /* [I] is 0 */
|
|
{
|
|
LPWSTR wString;
|
|
DWORD ret = 0;
|
|
|
|
TRACE("(%s %ld)\n", debugstr_a(string), len);
|
|
wString = (LPWSTR)LocalAlloc(LPTR, len * sizeof(WCHAR));
|
|
if (wString)
|
|
{
|
|
MultiByteToWideChar(CP_ACP, 0, string, len, wString, len);
|
|
ret = CheckEscapesW(wString, len);
|
|
WideCharToMultiByte(CP_ACP, 0, wString, len, string, len, NULL, NULL);
|
|
LocalFree(wString);
|
|
}
|
|
return ret;
|
|
}
|
|
|
|
static const WCHAR strEscapedChars[] = {' ','"',',',';','^',0};
|
|
|
|
/*************************************************************************
|
|
* CheckEscapesW [SHELL32.@]
|
|
*
|
|
* see CheckEscapesA
|
|
*/
|
|
DWORD WINAPI CheckEscapesW(
|
|
LPWSTR string,
|
|
DWORD len)
|
|
{
|
|
DWORD size = lstrlenW(string);
|
|
LPWSTR s, d;
|
|
|
|
TRACE("(%s %ld) stub\n", debugstr_w(string), len);
|
|
|
|
if (StrPBrkW(string, strEscapedChars) && size + 2 <= len)
|
|
{
|
|
s = &string[size - 1];
|
|
d = &string[size + 2];
|
|
*d-- = 0;
|
|
*d-- = '"';
|
|
for (;d > string;)
|
|
*d-- = *s--;
|
|
*d = '"';
|
|
return size + 2;
|
|
}
|
|
return size;
|
|
}
|