5 #include "debugtools.h"
10 #include "shell32_main.h"
11 #include "wine/undocshell.h"
14 DEFAULT_DEBUG_CHANNEL(shell);
16 #define ASK_DELETE_FILE 1
17 #define ASK_DELETE_FOLDER 2
18 #define ASK_DELETE_MULTIPLE_FILE 3
20 static BOOL SHELL_WarnFolderDelete (int nKindOfDialog, LPCSTR szDir)
22 char szCaption[255], szText[255], szBuffer[MAX_PATH + 256];
24 LoadStringA(shell32_hInstance, IDS_DELETEFOLDER_TEXT, szText, sizeof(szText));
25 LoadStringA(shell32_hInstance, IDS_DELETEFOLDER_CAPTION, szCaption, sizeof(szCaption));
26 FormatMessageA(FORMAT_MESSAGE_FROM_STRING|FORMAT_MESSAGE_ARGUMENT_ARRAY,
27 szText, 0, 0, szBuffer, sizeof(szBuffer), (va_list*)&szDir);
29 return (IDOK == MessageBoxA(GetActiveWindow(), szBuffer, szCaption, MB_OKCANCEL | MB_ICONEXCLAMATION));
32 /**************************************************************************
33 * SHELL_DeleteDirectoryA()
38 BOOL SHELL_DeleteDirectoryA(LPCSTR pszDir, BOOL bShowUI)
43 char szTemp[MAX_PATH];
45 strcpy(szTemp, pszDir);
46 PathAddBackslashA(szTemp);
47 strcat(szTemp, "*.*");
49 if (bShowUI && !SHELL_WarnFolderDelete(ASK_DELETE_FOLDER, pszDir)) return FALSE;
51 if(INVALID_HANDLE_VALUE != (hFind = FindFirstFileA(szTemp, &wfd)))
55 if(strcasecmp(wfd.cFileName, ".") && strcasecmp(wfd.cFileName, ".."))
57 strcpy(szTemp, pszDir);
58 PathAddBackslashA(szTemp);
59 strcat(szTemp, wfd.cFileName);
61 if(FILE_ATTRIBUTE_DIRECTORY & wfd.dwFileAttributes)
62 SHELL_DeleteDirectoryA(szTemp, FALSE);
66 } while(FindNextFileA(hFind, &wfd));
69 ret = RemoveDirectoryA(pszDir);
75 /*************************************************************************
76 * SHCreateDirectory [SHELL32.165]
80 * not sure about LPSECURITY_ATTRIBUTES
82 DWORD WINAPI SHCreateDirectory(LPSECURITY_ATTRIBUTES sec,LPCSTR path)
85 TRACE("(%p,%s)\n",sec,path);
86 if ((ret = CreateDirectoryA(path,sec)))
88 SHChangeNotifyA(SHCNE_MKDIR, SHCNF_PATHA, path, NULL);
93 /************************************************************************
94 * Win32DeleteFile [SHELL32.164]
96 * Deletes a file. Also triggers a change notify if one exists.
99 * Verified on Win98 / IE 5 (SHELL32 4.72, March 1999 build) to be
100 * ANSI. Is this Unicode on NT?
104 BOOL WINAPI Win32DeleteFile(LPSTR fName)
106 TRACE("%p(%s)\n", fName, fName);
109 SHChangeNotifyA(SHCNE_DELETE, SHCNF_PATHA, fName, NULL);
113 /*************************************************************************
114 * SHFileOperationA [SHELL32.243]
119 DWORD WINAPI SHFileOperationA (LPSHFILEOPSTRUCTA lpFileOp)
121 FIXME("(%p):stub.\n", lpFileOp);
125 /*************************************************************************
126 * SHFileOperationW [SHELL32.244]
131 DWORD WINAPI SHFileOperationW (LPSHFILEOPSTRUCTW lpFileOp)
133 FIXME("(%p):stub.\n", lpFileOp);
137 /*************************************************************************
138 * SHFileOperation [SHELL32.242]
141 DWORD WINAPI SHFileOperationAW(LPVOID lpFileOp)
143 if (SHELL_OsIsUnicode())
144 return SHFileOperationW(lpFileOp);
145 return SHFileOperationA(lpFileOp);
148 /*************************************************************************
149 * SheGetDirW [SHELL32.281]
152 HRESULT WINAPI SheGetDirW(LPWSTR u, LPWSTR v)
153 { FIXME("%p %p stub\n",u,v);
157 /*************************************************************************
158 * SheChangeDirW [SHELL32.274]
161 HRESULT WINAPI SheChangeDirW(LPWSTR u)
162 { FIXME("(%s),stub\n",debugstr_w(u));
166 /*************************************************************************
167 * IsNetDrive [SHELL32.66]
169 BOOL WINAPI IsNetDrive(DWORD drive)
172 strcpy(root, "A:\\");
174 return (GetDriveTypeA(root) == DRIVE_REMOTE);