| /* |
| * Extract - Wine-compatible program for extract *.cab files. |
| * |
| * Copyright 2007 Etersoft (Lyutin Anatoly) |
| * Copyright 2009 Ilya Shpigor |
| * |
| * 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA |
| */ |
| |
| #include <windows.h> |
| #include <shellapi.h> |
| #include <setupapi.h> |
| #include <shlwapi.h> |
| |
| #include "wine/unicode.h" |
| #include "wine/debug.h" |
| |
| WINE_DEFAULT_DEBUG_CHANNEL(extrac32); |
| |
| static BOOL force_mode; |
| |
| static UINT WINAPI ExtCabCallback(PVOID Context, UINT Notification, UINT_PTR Param1, UINT_PTR Param2) |
| { |
| FILE_IN_CABINET_INFO_W *pInfo; |
| FILEPATHS_W *pFilePaths; |
| |
| switch(Notification) |
| { |
| case SPFILENOTIFY_FILEINCABINET: |
| pInfo = (FILE_IN_CABINET_INFO_W*)Param1; |
| lstrcpyW(pInfo->FullTargetName, (LPCWSTR)Context); |
| lstrcatW(pInfo->FullTargetName, pInfo->NameInCabinet); |
| return FILEOP_DOIT; |
| case SPFILENOTIFY_FILEEXTRACTED: |
| pFilePaths = (FILEPATHS_W*)Param1; |
| WINE_TRACE("Extracted %s\n", wine_dbgstr_w(pFilePaths->Target)); |
| return NO_ERROR; |
| } |
| return NO_ERROR; |
| } |
| |
| static void extract(LPCWSTR cabfile, LPWSTR destdir) |
| { |
| if (!SetupIterateCabinetW(cabfile, 0, ExtCabCallback, destdir)) |
| WINE_ERR("Could not extract cab file %s\n", wine_dbgstr_w(cabfile)); |
| } |
| |
| static void copy_file(LPCWSTR source, LPCWSTR destination) |
| { |
| WCHAR destfile[MAX_PATH]; |
| |
| /* append source filename if destination is a directory */ |
| if (PathIsDirectoryW(destination)) |
| { |
| PathCombineW(destfile, destination, PathFindFileNameW(source)); |
| destination = destfile; |
| } |
| |
| if (PathFileExistsW(destination) && !force_mode) |
| { |
| static const WCHAR overwriteMsg[] = {'O','v','e','r','w','r','i','t','e',' ','"','%','s','"','?',0}; |
| static const WCHAR titleMsg[] = {'E','x','t','r','a','c','t',0}; |
| WCHAR msg[MAX_PATH+100]; |
| snprintfW(msg, sizeof(msg)/sizeof(msg[0]), overwriteMsg, destination); |
| if (MessageBoxW(NULL, msg, titleMsg, MB_YESNO | MB_ICONWARNING) != IDYES) |
| return; |
| } |
| |
| WINE_TRACE("copying %s to %s\n", wine_dbgstr_w(source), wine_dbgstr_w(destination)); |
| CopyFileW(source, destination, FALSE); |
| } |
| |
| int PASCAL wWinMain(HINSTANCE hInstance, HINSTANCE prev, LPWSTR cmdline, int show) |
| { |
| LPWSTR *argv; |
| int argc; |
| int i; |
| WCHAR check, cmd = 0; |
| WCHAR path[MAX_PATH]; |
| WCHAR backslash[] = {'\\',0}; |
| LPCWSTR cabfile = NULL; |
| |
| path[0] = 0; |
| argv = CommandLineToArgvW(cmdline, &argc); |
| |
| if(!argv) |
| { |
| WINE_ERR("Bad command line arguments\n"); |
| return 0; |
| } |
| |
| /* Parse arguments */ |
| for(i = 0; i < argc; i++) |
| { |
| /* Get cabfile */ |
| if (argv[i][0] != '/') |
| { |
| if (!cabfile) |
| { |
| cabfile = argv[i]; |
| continue; |
| } else |
| break; |
| } |
| /* Get parameters for commands */ |
| check = toupperW( argv[i][1] ); |
| switch(check) |
| { |
| case 'A': |
| WINE_FIXME("/A not implemented\n"); |
| break; |
| case 'Y': |
| force_mode = TRUE; |
| break; |
| case 'L': |
| if ((i + 1) >= argc) return 0; |
| if (!GetFullPathNameW(argv[++i], MAX_PATH, path, NULL)) |
| return 0; |
| break; |
| case 'C': |
| if (cmd) return 0; |
| cmd = check; |
| break; |
| case 'E': |
| case 'D': |
| if (cmd) return 0; |
| cmd = check; |
| break; |
| default: |
| return 0; |
| } |
| } |
| |
| if (!cabfile) |
| return 0; |
| |
| if (cmd == 'C') |
| { |
| if ((i + 1) != argc) return 0; |
| if (!GetFullPathNameW(argv[i], MAX_PATH, path, NULL)) |
| return 0; |
| } |
| |
| if (!path[0]) |
| GetCurrentDirectoryW(MAX_PATH, path); |
| |
| lstrcatW(path, backslash); |
| |
| /* Execute the specified command */ |
| switch(cmd) |
| { |
| case 'C': |
| /* Copy file */ |
| copy_file(cabfile, path); |
| break; |
| case 'E': |
| /* Extract CAB archive */ |
| extract(cabfile, path); |
| break; |
| case 0: |
| case 'D': |
| /* Display CAB archive */ |
| WINE_FIXME("/D not implemented\n"); |
| break; |
| } |
| return 0; |
| } |