annotate src/GvimExt/gvimext.cpp @ 16250:aeb340e0e485

Added tag v8.1.1129 for changeset 67e43b01497f1780bac0c7d3ca2b9bf394d6bed6
author Bram Moolenaar <Bram@vim.org>
date Sat, 06 Apr 2019 21:00:06 +0200
parents 4b2de998ebd6
children 7e733046db1d
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1 /* vi:set ts=8 sts=4 sw=4:
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
2 *
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
3 * VIM - Vi IMproved gvimext by Tianmiao Hu
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
4 *
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
5 * Do ":help uganda" in Vim to read copying and usage conditions.
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
6 * Do ":help credits" in Vim to see a list of people who contributed.
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
7 */
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
8
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
9 /*
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
10 * gvimext is a DLL which is used for the "Edit with Vim" context menu
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
11 * extension. It implements a MS defined interface with the Shell.
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
12 *
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
13 * If you have any questions or any suggestions concerning gvimext, please
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
14 * contact Tianmiao Hu: tianmiao@acm.org.
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
15 */
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
16
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
17 #include "gvimext.h"
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
18
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
19 #ifdef __BORLANDC__
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
20 # include <dir.h>
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
21 # ifndef _strnicmp
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
22 # define _strnicmp(a, b, c) strnicmp((a), (b), (c))
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
23 # endif
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
24 #else
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
25 static char *searchpath(char *name);
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
26 #endif
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
27
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
28 // Always get an error while putting the following stuff to the
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
29 // gvimext.h file as class protected variables, give up and
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
30 // declare them as global stuff
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
31 FORMATETC fmte = {CF_HDROP,
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
32 (DVTARGETDEVICE FAR *)NULL,
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
33 DVASPECT_CONTENT,
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
34 -1,
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
35 TYMED_HGLOBAL
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
36 };
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
37 STGMEDIUM medium;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
38 HRESULT hres = 0;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
39 UINT cbFiles = 0;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
40
12626
aca41efd888c patch 8.0.1191: MS-Windows: missing 32 and 64 bit files in installer
Christian Brabandt <cb@256bit.org>
parents: 8180
diff changeset
41 /* The buffers size used to be MAX_PATH (260 bytes), but that's not always
415
165c628aa9fc updated for version 7.0108
vimboss
parents: 26
diff changeset
42 * enough */
165c628aa9fc updated for version 7.0108
vimboss
parents: 26
diff changeset
43 #define BUFSIZE 1100
165c628aa9fc updated for version 7.0108
vimboss
parents: 26
diff changeset
44
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
45 //
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
46 // Get the name of the Gvim executable to use, with the path.
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
47 // When "runtime" is non-zero, we were called to find the runtime directory.
415
165c628aa9fc updated for version 7.0108
vimboss
parents: 26
diff changeset
48 // Returns the path in name[BUFSIZE]. It's empty when it fails.
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
49 //
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
50 static void
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
51 getGvimName(char *name, int runtime)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
52 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
53 HKEY keyhandle;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
54 DWORD hlen;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
55
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
56 // Get the location of gvim from the registry.
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
57 name[0] = 0;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
58 if (RegOpenKeyEx(HKEY_LOCAL_MACHINE, "Software\\Vim\\Gvim", 0,
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
59 KEY_READ, &keyhandle) == ERROR_SUCCESS)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
60 {
415
165c628aa9fc updated for version 7.0108
vimboss
parents: 26
diff changeset
61 hlen = BUFSIZE;
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
62 if (RegQueryValueEx(keyhandle, "path", 0, NULL, (BYTE *)name, &hlen)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
63 != ERROR_SUCCESS)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
64 name[0] = 0;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
65 else
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
66 name[hlen] = 0;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
67 RegCloseKey(keyhandle);
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
68 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
69
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
70 // Registry didn't work, use the search path.
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
71 if (name[0] == 0)
1366
7e7da11555d2 updated for version 7.1-080
vimboss
parents: 1226
diff changeset
72 strcpy(name, searchpath((char *)"gvim.exe"));
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
73
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
74 if (!runtime)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
75 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
76 // Only when looking for the executable, not the runtime dir, we can
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
77 // search for the batch file or a name without a path.
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
78 if (name[0] == 0)
1366
7e7da11555d2 updated for version 7.1-080
vimboss
parents: 1226
diff changeset
79 strcpy(name, searchpath((char *)"gvim.bat"));
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
80 if (name[0] == 0)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
81 strcpy(name, "gvim"); // finds gvim.bat or gvim.exe
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
82 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
83 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
84
2295
b9bc9c5df131 Support wide file names in gvimext. (Szabolcs Horvat)
Bram Moolenaar <bram@vim.org>
parents: 1953
diff changeset
85 static void
6805
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
86 getGvimInvocation(char *name, int runtime)
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
87 {
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
88 getGvimName(name, runtime);
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
89 // avoid that Vim tries to expand wildcards in the file names
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
90 strcat(name, " --literal");
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
91 }
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
92
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
93 static void
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
94 getGvimInvocationW(wchar_t *nameW)
2295
b9bc9c5df131 Support wide file names in gvimext. (Szabolcs Horvat)
Bram Moolenaar <bram@vim.org>
parents: 1953
diff changeset
95 {
b9bc9c5df131 Support wide file names in gvimext. (Szabolcs Horvat)
Bram Moolenaar <bram@vim.org>
parents: 1953
diff changeset
96 char *name;
b9bc9c5df131 Support wide file names in gvimext. (Szabolcs Horvat)
Bram Moolenaar <bram@vim.org>
parents: 1953
diff changeset
97
b9bc9c5df131 Support wide file names in gvimext. (Szabolcs Horvat)
Bram Moolenaar <bram@vim.org>
parents: 1953
diff changeset
98 name = (char *)malloc(BUFSIZE);
6805
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
99 getGvimInvocation(name, 0);
2295
b9bc9c5df131 Support wide file names in gvimext. (Szabolcs Horvat)
Bram Moolenaar <bram@vim.org>
parents: 1953
diff changeset
100 mbstowcs(nameW, name, BUFSIZE);
b9bc9c5df131 Support wide file names in gvimext. (Szabolcs Horvat)
Bram Moolenaar <bram@vim.org>
parents: 1953
diff changeset
101 free(name);
b9bc9c5df131 Support wide file names in gvimext. (Szabolcs Horvat)
Bram Moolenaar <bram@vim.org>
parents: 1953
diff changeset
102 }
b9bc9c5df131 Support wide file names in gvimext. (Szabolcs Horvat)
Bram Moolenaar <bram@vim.org>
parents: 1953
diff changeset
103
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
104 //
415
165c628aa9fc updated for version 7.0108
vimboss
parents: 26
diff changeset
105 // Get the Vim runtime directory into buf[BUFSIZE].
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
106 // The result is empty when it failed.
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
107 // When it works, the path ends in a slash or backslash.
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
108 //
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
109 static void
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
110 getRuntimeDir(char *buf)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
111 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
112 int idx;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
113
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
114 getGvimName(buf, 1);
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
115 if (buf[0] != 0)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
116 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
117 // When no path found, use the search path to expand it.
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
118 if (strchr(buf, '/') == NULL && strchr(buf, '\\') == NULL)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
119 strcpy(buf, searchpath(buf));
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
120
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
121 // remove "gvim.exe" from the end
835
8bebcabccc2c updated for version 7.0e01
vimboss
parents: 415
diff changeset
122 for (idx = (int)strlen(buf) - 1; idx >= 0; idx--)
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
123 if (buf[idx] == '\\' || buf[idx] == '/')
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
124 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
125 buf[idx + 1] = 0;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
126 break;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
127 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
128 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
129 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
130
6805
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
131 HBITMAP IconToBitmap(HICON hIcon, HBRUSH hBackground, int width, int height)
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
132 {
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
133 HDC hDC = GetDC(NULL);
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
134 HDC hMemDC = CreateCompatibleDC(hDC);
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
135 HBITMAP hMemBmp = CreateCompatibleBitmap(hDC, width, height);
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
136 HBITMAP hResultBmp = NULL;
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
137 HGDIOBJ hOrgBMP = SelectObject(hMemDC, hMemBmp);
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
138
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
139 DrawIconEx(hMemDC, 0, 0, hIcon, width, height, 0, hBackground, DI_NORMAL);
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
140
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
141 hResultBmp = hMemBmp;
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
142 hMemBmp = NULL;
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
143
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
144 SelectObject(hMemDC, hOrgBMP);
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
145 DeleteDC(hMemDC);
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
146 ReleaseDC(NULL, hDC);
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
147 DestroyIcon(hIcon);
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
148 return hResultBmp;
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
149 }
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
150
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
151 //
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
152 // GETTEXT: translated messages and menu entries
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
153 //
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
154 #ifndef FEAT_GETTEXT
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
155 # define _(x) x
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
156 #else
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
157 # define _(x) (*dyn_libintl_gettext)(x)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
158 # define VIMPACKAGE "vim"
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
159 # ifndef GETTEXT_DLL
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
160 # define GETTEXT_DLL "libintl.dll"
8180
1e48ffa2d697 commit https://github.com/vim/vim/commit/271273c39f2150ecdaa67fe1a2a8e9cdc63db545
Christian Brabandt <cb@256bit.org>
parents: 6805
diff changeset
161 # define GETTEXT_DLL_ALT "libintl-8.dll"
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
162 # endif
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
163
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
164 // Dummy functions
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
165 static char *null_libintl_gettext(const char *);
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
166 static char *null_libintl_textdomain(const char *);
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
167 static char *null_libintl_bindtextdomain(const char *, const char *);
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
168 static int dyn_libintl_init(char *dir);
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
169 static void dyn_libintl_end(void);
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
170
3008
37a54a85413e updated for version 7.3.276
Bram Moolenaar <bram@vim.org>
parents: 2972
diff changeset
171 static wchar_t *oldenv = NULL;
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
172 static HINSTANCE hLibintlDLL = 0;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
173 static char *(*dyn_libintl_gettext)(const char *) = null_libintl_gettext;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
174 static char *(*dyn_libintl_textdomain)(const char *) = null_libintl_textdomain;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
175 static char *(*dyn_libintl_bindtextdomain)(const char *, const char *)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
176 = null_libintl_bindtextdomain;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
177
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
178 //
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
179 // Attempt to load libintl.dll. If it doesn't work, use dummy functions.
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
180 // "dir" is the directory where the libintl.dll might be.
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
181 // Return 1 for success, 0 for failure.
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
182 //
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
183 static int
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
184 dyn_libintl_init(char *dir)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
185 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
186 int i;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
187 static struct
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
188 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
189 char *name;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
190 FARPROC *ptr;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
191 } libintl_entry[] =
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
192 {
1366
7e7da11555d2 updated for version 7.1-080
vimboss
parents: 1226
diff changeset
193 {(char *)"gettext", (FARPROC*)&dyn_libintl_gettext},
7e7da11555d2 updated for version 7.1-080
vimboss
parents: 1226
diff changeset
194 {(char *)"textdomain", (FARPROC*)&dyn_libintl_textdomain},
7e7da11555d2 updated for version 7.1-080
vimboss
parents: 1226
diff changeset
195 {(char *)"bindtextdomain", (FARPROC*)&dyn_libintl_bindtextdomain},
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
196 {NULL, NULL}
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
197 };
8180
1e48ffa2d697 commit https://github.com/vim/vim/commit/271273c39f2150ecdaa67fe1a2a8e9cdc63db545
Christian Brabandt <cb@256bit.org>
parents: 6805
diff changeset
198 DWORD len, len2;
1e48ffa2d697 commit https://github.com/vim/vim/commit/271273c39f2150ecdaa67fe1a2a8e9cdc63db545
Christian Brabandt <cb@256bit.org>
parents: 6805
diff changeset
199 LPWSTR buf = NULL;
1e48ffa2d697 commit https://github.com/vim/vim/commit/271273c39f2150ecdaa67fe1a2a8e9cdc63db545
Christian Brabandt <cb@256bit.org>
parents: 6805
diff changeset
200 LPWSTR buf2 = NULL;
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
201
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
202 // No need to initialize twice.
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
203 if (hLibintlDLL)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
204 return 1;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
205
12626
aca41efd888c patch 8.0.1191: MS-Windows: missing 32 and 64 bit files in installer
Christian Brabandt <cb@256bit.org>
parents: 8180
diff changeset
206 // Load gettext library from $VIMRUNTIME\GvimExt{64,32} directory.
8180
1e48ffa2d697 commit https://github.com/vim/vim/commit/271273c39f2150ecdaa67fe1a2a8e9cdc63db545
Christian Brabandt <cb@256bit.org>
parents: 6805
diff changeset
207 // Add the directory to $PATH temporarily.
1e48ffa2d697 commit https://github.com/vim/vim/commit/271273c39f2150ecdaa67fe1a2a8e9cdc63db545
Christian Brabandt <cb@256bit.org>
parents: 6805
diff changeset
208 len = GetEnvironmentVariableW(L"PATH", NULL, 0);
1e48ffa2d697 commit https://github.com/vim/vim/commit/271273c39f2150ecdaa67fe1a2a8e9cdc63db545
Christian Brabandt <cb@256bit.org>
parents: 6805
diff changeset
209 len2 = MAX_PATH + 1 + len;
1e48ffa2d697 commit https://github.com/vim/vim/commit/271273c39f2150ecdaa67fe1a2a8e9cdc63db545
Christian Brabandt <cb@256bit.org>
parents: 6805
diff changeset
210 buf = (LPWSTR)malloc(len * sizeof(WCHAR));
1e48ffa2d697 commit https://github.com/vim/vim/commit/271273c39f2150ecdaa67fe1a2a8e9cdc63db545
Christian Brabandt <cb@256bit.org>
parents: 6805
diff changeset
211 buf2 = (LPWSTR)malloc(len2 * sizeof(WCHAR));
1e48ffa2d697 commit https://github.com/vim/vim/commit/271273c39f2150ecdaa67fe1a2a8e9cdc63db545
Christian Brabandt <cb@256bit.org>
parents: 6805
diff changeset
212 if (buf != NULL && buf2 != NULL)
1e48ffa2d697 commit https://github.com/vim/vim/commit/271273c39f2150ecdaa67fe1a2a8e9cdc63db545
Christian Brabandt <cb@256bit.org>
parents: 6805
diff changeset
213 {
1e48ffa2d697 commit https://github.com/vim/vim/commit/271273c39f2150ecdaa67fe1a2a8e9cdc63db545
Christian Brabandt <cb@256bit.org>
parents: 6805
diff changeset
214 GetEnvironmentVariableW(L"PATH", buf, len);
12626
aca41efd888c patch 8.0.1191: MS-Windows: missing 32 and 64 bit files in installer
Christian Brabandt <cb@256bit.org>
parents: 8180
diff changeset
215 #ifdef _WIN64
aca41efd888c patch 8.0.1191: MS-Windows: missing 32 and 64 bit files in installer
Christian Brabandt <cb@256bit.org>
parents: 8180
diff changeset
216 _snwprintf(buf2, len2, L"%S\\GvimExt64;%s", dir, buf);
aca41efd888c patch 8.0.1191: MS-Windows: missing 32 and 64 bit files in installer
Christian Brabandt <cb@256bit.org>
parents: 8180
diff changeset
217 #else
aca41efd888c patch 8.0.1191: MS-Windows: missing 32 and 64 bit files in installer
Christian Brabandt <cb@256bit.org>
parents: 8180
diff changeset
218 _snwprintf(buf2, len2, L"%S\\GvimExt32;%s", dir, buf);
aca41efd888c patch 8.0.1191: MS-Windows: missing 32 and 64 bit files in installer
Christian Brabandt <cb@256bit.org>
parents: 8180
diff changeset
219 #endif
8180
1e48ffa2d697 commit https://github.com/vim/vim/commit/271273c39f2150ecdaa67fe1a2a8e9cdc63db545
Christian Brabandt <cb@256bit.org>
parents: 6805
diff changeset
220 SetEnvironmentVariableW(L"PATH", buf2);
1e48ffa2d697 commit https://github.com/vim/vim/commit/271273c39f2150ecdaa67fe1a2a8e9cdc63db545
Christian Brabandt <cb@256bit.org>
parents: 6805
diff changeset
221 hLibintlDLL = LoadLibrary(GETTEXT_DLL);
1e48ffa2d697 commit https://github.com/vim/vim/commit/271273c39f2150ecdaa67fe1a2a8e9cdc63db545
Christian Brabandt <cb@256bit.org>
parents: 6805
diff changeset
222 #ifdef GETTEXT_DLL_ALT
1e48ffa2d697 commit https://github.com/vim/vim/commit/271273c39f2150ecdaa67fe1a2a8e9cdc63db545
Christian Brabandt <cb@256bit.org>
parents: 6805
diff changeset
223 if (!hLibintlDLL)
1e48ffa2d697 commit https://github.com/vim/vim/commit/271273c39f2150ecdaa67fe1a2a8e9cdc63db545
Christian Brabandt <cb@256bit.org>
parents: 6805
diff changeset
224 hLibintlDLL = LoadLibrary(GETTEXT_DLL_ALT);
1e48ffa2d697 commit https://github.com/vim/vim/commit/271273c39f2150ecdaa67fe1a2a8e9cdc63db545
Christian Brabandt <cb@256bit.org>
parents: 6805
diff changeset
225 #endif
1e48ffa2d697 commit https://github.com/vim/vim/commit/271273c39f2150ecdaa67fe1a2a8e9cdc63db545
Christian Brabandt <cb@256bit.org>
parents: 6805
diff changeset
226 SetEnvironmentVariableW(L"PATH", buf);
1e48ffa2d697 commit https://github.com/vim/vim/commit/271273c39f2150ecdaa67fe1a2a8e9cdc63db545
Christian Brabandt <cb@256bit.org>
parents: 6805
diff changeset
227 }
1e48ffa2d697 commit https://github.com/vim/vim/commit/271273c39f2150ecdaa67fe1a2a8e9cdc63db545
Christian Brabandt <cb@256bit.org>
parents: 6805
diff changeset
228 free(buf);
1e48ffa2d697 commit https://github.com/vim/vim/commit/271273c39f2150ecdaa67fe1a2a8e9cdc63db545
Christian Brabandt <cb@256bit.org>
parents: 6805
diff changeset
229 free(buf2);
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
230 if (!hLibintlDLL)
8180
1e48ffa2d697 commit https://github.com/vim/vim/commit/271273c39f2150ecdaa67fe1a2a8e9cdc63db545
Christian Brabandt <cb@256bit.org>
parents: 6805
diff changeset
231 return 0;
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
232
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
233 // Get the addresses of the functions we need.
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
234 for (i = 0; libintl_entry[i].name != NULL
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
235 && libintl_entry[i].ptr != NULL; ++i)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
236 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
237 if ((*libintl_entry[i].ptr = GetProcAddress(hLibintlDLL,
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
238 libintl_entry[i].name)) == NULL)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
239 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
240 dyn_libintl_end();
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
241 return 0;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
242 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
243 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
244 return 1;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
245 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
246
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
247 static void
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
248 dyn_libintl_end(void)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
249 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
250 if (hLibintlDLL)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
251 FreeLibrary(hLibintlDLL);
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
252 hLibintlDLL = NULL;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
253 dyn_libintl_gettext = null_libintl_gettext;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
254 dyn_libintl_textdomain = null_libintl_textdomain;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
255 dyn_libintl_bindtextdomain = null_libintl_bindtextdomain;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
256 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
257
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
258 static char *
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
259 null_libintl_gettext(const char *msgid)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
260 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
261 return (char *)msgid;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
262 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
263
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
264 static char *
1686
c7c53db66b55 updated for version 7.2b-019
vimboss
parents: 1366
diff changeset
265 null_libintl_bindtextdomain(const char * /* domainname */, const char * /* dirname */)
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
266 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
267 return NULL;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
268 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
269
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
270 static char *
1686
c7c53db66b55 updated for version 7.2b-019
vimboss
parents: 1366
diff changeset
271 null_libintl_textdomain(const char* /* domainname */)
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
272 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
273 return NULL;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
274 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
275
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
276 //
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
277 // Setup for translating strings.
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
278 //
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
279 static void
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
280 dyn_gettext_load(void)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
281 {
415
165c628aa9fc updated for version 7.0108
vimboss
parents: 26
diff changeset
282 char szBuff[BUFSIZE];
165c628aa9fc updated for version 7.0108
vimboss
parents: 26
diff changeset
283 char szLang[BUFSIZE];
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
284 DWORD len;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
285 HKEY keyhandle;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
286 int gotlang = 0;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
287
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
288 strcpy(szLang, "LANG=");
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
289
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
290 // First try getting the language from the registry, this can be
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
291 // used to overrule the system language.
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
292 if (RegOpenKeyEx(HKEY_LOCAL_MACHINE, "Software\\Vim\\Gvim", 0,
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
293 KEY_READ, &keyhandle) == ERROR_SUCCESS)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
294 {
415
165c628aa9fc updated for version 7.0108
vimboss
parents: 26
diff changeset
295 len = BUFSIZE;
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
296 if (RegQueryValueEx(keyhandle, "lang", 0, NULL, (BYTE*)szBuff, &len)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
297 == ERROR_SUCCESS)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
298 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
299 szBuff[len] = 0;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
300 strcat(szLang, szBuff);
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
301 gotlang = 1;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
302 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
303 RegCloseKey(keyhandle);
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
304 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
305
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
306 if (!gotlang && getenv("LANG") == NULL)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
307 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
308 // Get the language from the system.
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
309 // Could use LOCALE_SISO639LANGNAME, but it's not in Win95.
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
310 // LOCALE_SABBREVLANGNAME gives us three letters, like "enu", we use
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
311 // only the first two.
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
312 len = GetLocaleInfo(LOCALE_USER_DEFAULT, LOCALE_SABBREVLANGNAME,
415
165c628aa9fc updated for version 7.0108
vimboss
parents: 26
diff changeset
313 (LPTSTR)szBuff, BUFSIZE);
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
314 if (len >= 2 && _strnicmp(szBuff, "en", 2) != 0)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
315 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
316 // There are a few exceptions (probably more)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
317 if (_strnicmp(szBuff, "cht", 3) == 0
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
318 || _strnicmp(szBuff, "zht", 3) == 0)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
319 strcpy(szBuff, "zh_TW");
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
320 else if (_strnicmp(szBuff, "chs", 3) == 0
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
321 || _strnicmp(szBuff, "zhc", 3) == 0)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
322 strcpy(szBuff, "zh_CN");
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
323 else if (_strnicmp(szBuff, "jp", 2) == 0)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
324 strcpy(szBuff, "ja");
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
325 else
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
326 szBuff[2] = 0; // truncate to two-letter code
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
327 strcat(szLang, szBuff);
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
328 gotlang = 1;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
329 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
330 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
331 if (gotlang)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
332 putenv(szLang);
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
333
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
334 // Try to locate the runtime files. The path is used to find libintl.dll
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
335 // and the vim.mo files.
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
336 getRuntimeDir(szBuff);
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
337 if (szBuff[0] != 0)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
338 {
835
8bebcabccc2c updated for version 7.0e01
vimboss
parents: 415
diff changeset
339 len = (DWORD)strlen(szBuff);
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
340 if (dyn_libintl_init(szBuff))
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
341 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
342 strcpy(szBuff + len, "lang");
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
343
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
344 (*dyn_libintl_bindtextdomain)(VIMPACKAGE, szBuff);
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
345 (*dyn_libintl_textdomain)(VIMPACKAGE);
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
346 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
347 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
348 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
349
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
350 static void
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
351 dyn_gettext_free(void)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
352 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
353 dyn_libintl_end();
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
354 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
355 #endif // FEAT_GETTEXT
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
356
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
357 //
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
358 // Global variables
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
359 //
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
360 UINT g_cRefThisDll = 0; // Reference count of this DLL.
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
361 HINSTANCE g_hmodThisDll = NULL; // Handle to this DLL itself.
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
362
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
363
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
364 //---------------------------------------------------------------------------
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
365 // DllMain
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
366 //---------------------------------------------------------------------------
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
367 extern "C" int APIENTRY
1686
c7c53db66b55 updated for version 7.2b-019
vimboss
parents: 1366
diff changeset
368 DllMain(HINSTANCE hInstance, DWORD dwReason, LPVOID /* lpReserved */)
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
369 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
370 switch (dwReason)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
371 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
372 case DLL_PROCESS_ATTACH:
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
373 // Extension DLL one-time initialization
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
374 g_hmodThisDll = hInstance;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
375 break;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
376
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
377 case DLL_PROCESS_DETACH:
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
378 break;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
379 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
380
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
381 return 1; // ok
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
382 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
383
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
384 static void
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
385 inc_cRefThisDLL()
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
386 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
387 #ifdef FEAT_GETTEXT
3008
37a54a85413e updated for version 7.3.276
Bram Moolenaar <bram@vim.org>
parents: 2972
diff changeset
388 if (g_cRefThisDll == 0) {
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
389 dyn_gettext_load();
3008
37a54a85413e updated for version 7.3.276
Bram Moolenaar <bram@vim.org>
parents: 2972
diff changeset
390 oldenv = GetEnvironmentStringsW();
37a54a85413e updated for version 7.3.276
Bram Moolenaar <bram@vim.org>
parents: 2972
diff changeset
391 }
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
392 #endif
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
393 InterlockedIncrement((LPLONG)&g_cRefThisDll);
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
394 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
395
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
396 static void
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
397 dec_cRefThisDLL()
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
398 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
399 #ifdef FEAT_GETTEXT
3008
37a54a85413e updated for version 7.3.276
Bram Moolenaar <bram@vim.org>
parents: 2972
diff changeset
400 if (InterlockedDecrement((LPLONG)&g_cRefThisDll) == 0) {
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
401 dyn_gettext_free();
3008
37a54a85413e updated for version 7.3.276
Bram Moolenaar <bram@vim.org>
parents: 2972
diff changeset
402 if (oldenv != NULL) {
37a54a85413e updated for version 7.3.276
Bram Moolenaar <bram@vim.org>
parents: 2972
diff changeset
403 FreeEnvironmentStringsW(oldenv);
37a54a85413e updated for version 7.3.276
Bram Moolenaar <bram@vim.org>
parents: 2972
diff changeset
404 oldenv = NULL;
37a54a85413e updated for version 7.3.276
Bram Moolenaar <bram@vim.org>
parents: 2972
diff changeset
405 }
37a54a85413e updated for version 7.3.276
Bram Moolenaar <bram@vim.org>
parents: 2972
diff changeset
406 }
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
407 #else
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
408 InterlockedDecrement((LPLONG)&g_cRefThisDll);
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
409 #endif
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
410 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
411
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
412 //---------------------------------------------------------------------------
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
413 // DllCanUnloadNow
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
414 //---------------------------------------------------------------------------
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
415
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
416 STDAPI DllCanUnloadNow(void)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
417 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
418 return (g_cRefThisDll == 0 ? S_OK : S_FALSE);
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
419 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
420
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
421 STDAPI DllGetClassObject(REFCLSID rclsid, REFIID riid, LPVOID *ppvOut)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
422 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
423 *ppvOut = NULL;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
424
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
425 if (IsEqualIID(rclsid, CLSID_ShellExtension))
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
426 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
427 CShellExtClassFactory *pcf = new CShellExtClassFactory;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
428
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
429 return pcf->QueryInterface(riid, ppvOut);
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
430 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
431
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
432 return CLASS_E_CLASSNOTAVAILABLE;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
433 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
434
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
435 CShellExtClassFactory::CShellExtClassFactory()
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
436 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
437 m_cRef = 0L;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
438
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
439 inc_cRefThisDLL();
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
440 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
441
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
442 CShellExtClassFactory::~CShellExtClassFactory()
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
443 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
444 dec_cRefThisDLL();
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
445 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
446
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
447 STDMETHODIMP CShellExtClassFactory::QueryInterface(REFIID riid,
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
448 LPVOID FAR *ppv)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
449 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
450 *ppv = NULL;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
451
6805
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
452 // any interface on this object is the object pointer
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
453
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
454 if (IsEqualIID(riid, IID_IUnknown) || IsEqualIID(riid, IID_IClassFactory))
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
455 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
456 *ppv = (LPCLASSFACTORY)this;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
457
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
458 AddRef();
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
459
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
460 return NOERROR;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
461 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
462
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
463 return E_NOINTERFACE;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
464 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
465
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
466 STDMETHODIMP_(ULONG) CShellExtClassFactory::AddRef()
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
467 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
468 return InterlockedIncrement((LPLONG)&m_cRef);
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
469 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
470
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
471 STDMETHODIMP_(ULONG) CShellExtClassFactory::Release()
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
472 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
473 if (InterlockedDecrement((LPLONG)&m_cRef))
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
474 return m_cRef;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
475
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
476 delete this;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
477
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
478 return 0L;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
479 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
480
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
481 STDMETHODIMP CShellExtClassFactory::CreateInstance(LPUNKNOWN pUnkOuter,
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
482 REFIID riid,
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
483 LPVOID *ppvObj)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
484 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
485 *ppvObj = NULL;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
486
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
487 // Shell extensions typically don't support aggregation (inheritance)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
488
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
489 if (pUnkOuter)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
490 return CLASS_E_NOAGGREGATION;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
491
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
492 // Create the main shell extension object. The shell will then call
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
493 // QueryInterface with IID_IShellExtInit--this is how shell extensions are
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
494 // initialized.
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
495
6805
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
496 LPCSHELLEXT pShellExt = new CShellExt(); // create the CShellExt object
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
497
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
498 if (NULL == pShellExt)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
499 return E_OUTOFMEMORY;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
500
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
501 return pShellExt->QueryInterface(riid, ppvObj);
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
502 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
503
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
504
1686
c7c53db66b55 updated for version 7.2b-019
vimboss
parents: 1366
diff changeset
505 STDMETHODIMP CShellExtClassFactory::LockServer(BOOL /* fLock */)
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
506 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
507 return NOERROR;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
508 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
509
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
510 // *********************** CShellExt *************************
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
511 CShellExt::CShellExt()
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
512 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
513 m_cRef = 0L;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
514 m_pDataObj = NULL;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
515
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
516 inc_cRefThisDLL();
6805
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
517
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
518 LoadMenuIcon();
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
519 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
520
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
521 CShellExt::~CShellExt()
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
522 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
523 if (m_pDataObj)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
524 m_pDataObj->Release();
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
525
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
526 dec_cRefThisDLL();
6805
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
527
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
528 if (m_hVimIconBitmap)
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
529 DeleteObject(m_hVimIconBitmap);
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
530 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
531
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
532 STDMETHODIMP CShellExt::QueryInterface(REFIID riid, LPVOID FAR *ppv)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
533 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
534 *ppv = NULL;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
535
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
536 if (IsEqualIID(riid, IID_IShellExtInit) || IsEqualIID(riid, IID_IUnknown))
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
537 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
538 *ppv = (LPSHELLEXTINIT)this;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
539 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
540 else if (IsEqualIID(riid, IID_IContextMenu))
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
541 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
542 *ppv = (LPCONTEXTMENU)this;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
543 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
544
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
545 if (*ppv)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
546 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
547 AddRef();
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
548
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
549 return NOERROR;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
550 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
551
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
552 return E_NOINTERFACE;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
553 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
554
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
555 STDMETHODIMP_(ULONG) CShellExt::AddRef()
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
556 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
557 return InterlockedIncrement((LPLONG)&m_cRef);
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
558 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
559
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
560 STDMETHODIMP_(ULONG) CShellExt::Release()
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
561 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
562
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
563 if (InterlockedDecrement((LPLONG)&m_cRef))
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
564 return m_cRef;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
565
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
566 delete this;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
567
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
568 return 0L;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
569 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
570
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
571
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
572 //
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
573 // FUNCTION: CShellExt::Initialize(LPCITEMIDLIST, LPDATAOBJECT, HKEY)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
574 //
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
575 // PURPOSE: Called by the shell when initializing a context menu or property
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
576 // sheet extension.
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
577 //
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
578 // PARAMETERS:
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
579 // pIDFolder - Specifies the parent folder
4352
04736b4030ec updated for version 7.3.925
Bram Moolenaar <bram@vim.org>
parents: 3008
diff changeset
580 // pDataObj - Specifies the set of items selected in that folder.
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
581 // hRegKey - Specifies the type of the focused item in the selection.
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
582 //
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
583 // RETURN VALUE:
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
584 //
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
585 // NOERROR in all cases.
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
586 //
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
587 // COMMENTS: Note that at the time this function is called, we don't know
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
588 // (or care) what type of shell extension is being initialized.
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
589 // It could be a context menu or a property sheet.
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
590 //
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
591
1686
c7c53db66b55 updated for version 7.2b-019
vimboss
parents: 1366
diff changeset
592 STDMETHODIMP CShellExt::Initialize(LPCITEMIDLIST /* pIDFolder */,
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
593 LPDATAOBJECT pDataObj,
1686
c7c53db66b55 updated for version 7.2b-019
vimboss
parents: 1366
diff changeset
594 HKEY /* hRegKey */)
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
595 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
596 // Initialize can be called more than once
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
597 if (m_pDataObj)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
598 m_pDataObj->Release();
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
599
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
600 // duplicate the object pointer and registry handle
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
601
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
602 if (pDataObj)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
603 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
604 m_pDataObj = pDataObj;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
605 pDataObj->AddRef();
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
606 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
607
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
608 return NOERROR;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
609 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
610
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
611
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
612 //
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
613 // FUNCTION: CShellExt::QueryContextMenu(HMENU, UINT, UINT, UINT, UINT)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
614 //
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
615 // PURPOSE: Called by the shell just before the context menu is displayed.
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
616 // This is where you add your specific menu items.
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
617 //
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
618 // PARAMETERS:
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
619 // hMenu - Handle to the context menu
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
620 // indexMenu - Index of where to begin inserting menu items
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
621 // idCmdFirst - Lowest value for new menu ID's
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
622 // idCmtLast - Highest value for new menu ID's
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
623 // uFlags - Specifies the context of the menu event
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
624 //
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
625 // RETURN VALUE:
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
626 //
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
627 //
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
628 // COMMENTS:
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
629 //
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
630
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
631 STDMETHODIMP CShellExt::QueryContextMenu(HMENU hMenu,
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
632 UINT indexMenu,
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
633 UINT idCmdFirst,
1686
c7c53db66b55 updated for version 7.2b-019
vimboss
parents: 1366
diff changeset
634 UINT /* idCmdLast */,
c7c53db66b55 updated for version 7.2b-019
vimboss
parents: 1366
diff changeset
635 UINT /* uFlags */)
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
636 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
637 UINT idCmd = idCmdFirst;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
638
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
639 hres = m_pDataObj->GetData(&fmte, &medium);
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
640 if (medium.hGlobal)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
641 cbFiles = DragQueryFile((HDROP)medium.hGlobal, (UINT)-1, 0, 0);
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
642
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
643 // InsertMenu(hMenu, indexMenu++, MF_SEPARATOR|MF_BYPOSITION, 0, NULL);
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
644
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
645 // Initialize m_cntOfHWnd to 0
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
646 m_cntOfHWnd = 0;
2972
bdc3335bd72e updated for version 7.3.258
Bram Moolenaar <bram@vim.org>
parents: 2295
diff changeset
647
bdc3335bd72e updated for version 7.3.258
Bram Moolenaar <bram@vim.org>
parents: 2295
diff changeset
648 HKEY keyhandle;
bdc3335bd72e updated for version 7.3.258
Bram Moolenaar <bram@vim.org>
parents: 2295
diff changeset
649 bool showExisting = true;
6805
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
650 bool showIcons = true;
2972
bdc3335bd72e updated for version 7.3.258
Bram Moolenaar <bram@vim.org>
parents: 2295
diff changeset
651
bdc3335bd72e updated for version 7.3.258
Bram Moolenaar <bram@vim.org>
parents: 2295
diff changeset
652 // Check whether "Edit with existing Vim" entries are disabled.
bdc3335bd72e updated for version 7.3.258
Bram Moolenaar <bram@vim.org>
parents: 2295
diff changeset
653 if (RegOpenKeyEx(HKEY_LOCAL_MACHINE, "Software\\Vim\\Gvim", 0,
bdc3335bd72e updated for version 7.3.258
Bram Moolenaar <bram@vim.org>
parents: 2295
diff changeset
654 KEY_READ, &keyhandle) == ERROR_SUCCESS)
bdc3335bd72e updated for version 7.3.258
Bram Moolenaar <bram@vim.org>
parents: 2295
diff changeset
655 {
bdc3335bd72e updated for version 7.3.258
Bram Moolenaar <bram@vim.org>
parents: 2295
diff changeset
656 if (RegQueryValueEx(keyhandle, "DisableEditWithExisting", 0, NULL,
bdc3335bd72e updated for version 7.3.258
Bram Moolenaar <bram@vim.org>
parents: 2295
diff changeset
657 NULL, NULL) == ERROR_SUCCESS)
bdc3335bd72e updated for version 7.3.258
Bram Moolenaar <bram@vim.org>
parents: 2295
diff changeset
658 showExisting = false;
6805
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
659 if (RegQueryValueEx(keyhandle, "DisableContextMenuIcons", 0, NULL,
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
660 NULL, NULL) == ERROR_SUCCESS)
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
661 showIcons = false;
2972
bdc3335bd72e updated for version 7.3.258
Bram Moolenaar <bram@vim.org>
parents: 2295
diff changeset
662 RegCloseKey(keyhandle);
bdc3335bd72e updated for version 7.3.258
Bram Moolenaar <bram@vim.org>
parents: 2295
diff changeset
663 }
bdc3335bd72e updated for version 7.3.258
Bram Moolenaar <bram@vim.org>
parents: 2295
diff changeset
664
bdc3335bd72e updated for version 7.3.258
Bram Moolenaar <bram@vim.org>
parents: 2295
diff changeset
665 // Retrieve all the vim instances, unless disabled.
bdc3335bd72e updated for version 7.3.258
Bram Moolenaar <bram@vim.org>
parents: 2295
diff changeset
666 if (showExisting)
bdc3335bd72e updated for version 7.3.258
Bram Moolenaar <bram@vim.org>
parents: 2295
diff changeset
667 EnumWindows(EnumWindowsProc, (LPARAM)this);
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
668
6805
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
669 MENUITEMINFO mii = { sizeof(MENUITEMINFO) };
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
670 mii.fMask = MIIM_STRING | MIIM_ID;
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
671 if (showIcons)
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
672 {
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
673 mii.fMask |= MIIM_BITMAP;
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
674 mii.hbmpItem = m_hVimIconBitmap;
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
675 }
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
676
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
677 if (cbFiles > 1)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
678 {
6805
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
679 mii.wID = idCmd++;
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
680 mii.dwTypeData = _("Edit with &multiple Vims");
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
681 mii.cch = lstrlen(mii.dwTypeData);
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
682 InsertMenuItem(hMenu, indexMenu++, TRUE, &mii);
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
683
6805
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
684 mii.wID = idCmd++;
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
685 mii.dwTypeData = _("Edit with single &Vim");
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
686 mii.cch = lstrlen(mii.dwTypeData);
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
687 InsertMenuItem(hMenu, indexMenu++, TRUE, &mii);
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
688
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
689 if (cbFiles <= 4)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
690 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
691 // Can edit up to 4 files in diff mode
6805
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
692 mii.wID = idCmd++;
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
693 mii.dwTypeData = _("Diff with Vim");
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
694 mii.cch = lstrlen(mii.dwTypeData);
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
695 InsertMenuItem(hMenu, indexMenu++, TRUE, &mii);
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
696 m_edit_existing_off = 3;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
697 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
698 else
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
699 m_edit_existing_off = 2;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
700
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
701 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
702 else
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
703 {
6805
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
704 mii.wID = idCmd++;
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
705 mii.dwTypeData = _("Edit with &Vim");
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
706 mii.cch = lstrlen(mii.dwTypeData);
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
707 InsertMenuItem(hMenu, indexMenu++, TRUE, &mii);
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
708 m_edit_existing_off = 1;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
709 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
710
14962
013b70517b1a patch 8.1.0492: "Edit with existing Vim" list can get long
Bram Moolenaar <Bram@vim.org>
parents: 12626
diff changeset
711 HMENU hSubMenu = NULL;
013b70517b1a patch 8.1.0492: "Edit with existing Vim" list can get long
Bram Moolenaar <Bram@vim.org>
parents: 12626
diff changeset
712 if (m_cntOfHWnd > 1)
013b70517b1a patch 8.1.0492: "Edit with existing Vim" list can get long
Bram Moolenaar <Bram@vim.org>
parents: 12626
diff changeset
713 {
013b70517b1a patch 8.1.0492: "Edit with existing Vim" list can get long
Bram Moolenaar <Bram@vim.org>
parents: 12626
diff changeset
714 hSubMenu = CreatePopupMenu();
013b70517b1a patch 8.1.0492: "Edit with existing Vim" list can get long
Bram Moolenaar <Bram@vim.org>
parents: 12626
diff changeset
715 mii.fMask |= MIIM_SUBMENU;
013b70517b1a patch 8.1.0492: "Edit with existing Vim" list can get long
Bram Moolenaar <Bram@vim.org>
parents: 12626
diff changeset
716 mii.wID = idCmd;
013b70517b1a patch 8.1.0492: "Edit with existing Vim" list can get long
Bram Moolenaar <Bram@vim.org>
parents: 12626
diff changeset
717 mii.dwTypeData = _("Edit with existing Vim");
013b70517b1a patch 8.1.0492: "Edit with existing Vim" list can get long
Bram Moolenaar <Bram@vim.org>
parents: 12626
diff changeset
718 mii.cch = lstrlen(mii.dwTypeData);
013b70517b1a patch 8.1.0492: "Edit with existing Vim" list can get long
Bram Moolenaar <Bram@vim.org>
parents: 12626
diff changeset
719 mii.hSubMenu = hSubMenu;
013b70517b1a patch 8.1.0492: "Edit with existing Vim" list can get long
Bram Moolenaar <Bram@vim.org>
parents: 12626
diff changeset
720 InsertMenuItem(hMenu, indexMenu++, TRUE, &mii);
013b70517b1a patch 8.1.0492: "Edit with existing Vim" list can get long
Bram Moolenaar <Bram@vim.org>
parents: 12626
diff changeset
721 mii.fMask = mii.fMask & ~MIIM_SUBMENU;
013b70517b1a patch 8.1.0492: "Edit with existing Vim" list can get long
Bram Moolenaar <Bram@vim.org>
parents: 12626
diff changeset
722 mii.hSubMenu = NULL;
013b70517b1a patch 8.1.0492: "Edit with existing Vim" list can get long
Bram Moolenaar <Bram@vim.org>
parents: 12626
diff changeset
723 }
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
724 // Now display all the vim instances
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
725 for (int i = 0; i < m_cntOfHWnd; i++)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
726 {
415
165c628aa9fc updated for version 7.0108
vimboss
parents: 26
diff changeset
727 char title[BUFSIZE];
165c628aa9fc updated for version 7.0108
vimboss
parents: 26
diff changeset
728 char temp[BUFSIZE];
14962
013b70517b1a patch 8.1.0492: "Edit with existing Vim" list can get long
Bram Moolenaar <Bram@vim.org>
parents: 12626
diff changeset
729 int index;
013b70517b1a patch 8.1.0492: "Edit with existing Vim" list can get long
Bram Moolenaar <Bram@vim.org>
parents: 12626
diff changeset
730 HMENU hmenu;
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
731
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
732 // Obtain window title, continue if can not
415
165c628aa9fc updated for version 7.0108
vimboss
parents: 26
diff changeset
733 if (GetWindowText(m_hWnd[i], title, BUFSIZE - 1) == 0)
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
734 continue;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
735 // Truncate the title before the path, keep the file name
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
736 char *pos = strchr(title, '(');
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
737 if (pos != NULL)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
738 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
739 if (pos > title && pos[-1] == ' ')
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
740 --pos;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
741 *pos = 0;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
742 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
743 // Now concatenate
14962
013b70517b1a patch 8.1.0492: "Edit with existing Vim" list can get long
Bram Moolenaar <Bram@vim.org>
parents: 12626
diff changeset
744 if (m_cntOfHWnd > 1)
013b70517b1a patch 8.1.0492: "Edit with existing Vim" list can get long
Bram Moolenaar <Bram@vim.org>
parents: 12626
diff changeset
745 temp[0] = '\0';
013b70517b1a patch 8.1.0492: "Edit with existing Vim" list can get long
Bram Moolenaar <Bram@vim.org>
parents: 12626
diff changeset
746 else
013b70517b1a patch 8.1.0492: "Edit with existing Vim" list can get long
Bram Moolenaar <Bram@vim.org>
parents: 12626
diff changeset
747 {
013b70517b1a patch 8.1.0492: "Edit with existing Vim" list can get long
Bram Moolenaar <Bram@vim.org>
parents: 12626
diff changeset
748 strncpy(temp, _("Edit with existing Vim - "), BUFSIZE - 1);
013b70517b1a patch 8.1.0492: "Edit with existing Vim" list can get long
Bram Moolenaar <Bram@vim.org>
parents: 12626
diff changeset
749 temp[BUFSIZE - 1] = '\0';
013b70517b1a patch 8.1.0492: "Edit with existing Vim" list can get long
Bram Moolenaar <Bram@vim.org>
parents: 12626
diff changeset
750 }
1953
378e33d47ab0 updated for version 7.2-250
vimboss
parents: 1686
diff changeset
751 strncat(temp, title, BUFSIZE - 1 - strlen(temp));
378e33d47ab0 updated for version 7.2-250
vimboss
parents: 1686
diff changeset
752 temp[BUFSIZE - 1] = '\0';
6805
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
753
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
754 mii.wID = idCmd++;
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
755 mii.dwTypeData = temp;
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
756 mii.cch = lstrlen(mii.dwTypeData);
14962
013b70517b1a patch 8.1.0492: "Edit with existing Vim" list can get long
Bram Moolenaar <Bram@vim.org>
parents: 12626
diff changeset
757 if (m_cntOfHWnd > 1)
013b70517b1a patch 8.1.0492: "Edit with existing Vim" list can get long
Bram Moolenaar <Bram@vim.org>
parents: 12626
diff changeset
758 {
013b70517b1a patch 8.1.0492: "Edit with existing Vim" list can get long
Bram Moolenaar <Bram@vim.org>
parents: 12626
diff changeset
759 hmenu = hSubMenu;
013b70517b1a patch 8.1.0492: "Edit with existing Vim" list can get long
Bram Moolenaar <Bram@vim.org>
parents: 12626
diff changeset
760 index = i;
013b70517b1a patch 8.1.0492: "Edit with existing Vim" list can get long
Bram Moolenaar <Bram@vim.org>
parents: 12626
diff changeset
761 }
013b70517b1a patch 8.1.0492: "Edit with existing Vim" list can get long
Bram Moolenaar <Bram@vim.org>
parents: 12626
diff changeset
762 else
013b70517b1a patch 8.1.0492: "Edit with existing Vim" list can get long
Bram Moolenaar <Bram@vim.org>
parents: 12626
diff changeset
763 {
013b70517b1a patch 8.1.0492: "Edit with existing Vim" list can get long
Bram Moolenaar <Bram@vim.org>
parents: 12626
diff changeset
764 hmenu = hMenu;
013b70517b1a patch 8.1.0492: "Edit with existing Vim" list can get long
Bram Moolenaar <Bram@vim.org>
parents: 12626
diff changeset
765 index = indexMenu++;
013b70517b1a patch 8.1.0492: "Edit with existing Vim" list can get long
Bram Moolenaar <Bram@vim.org>
parents: 12626
diff changeset
766 }
013b70517b1a patch 8.1.0492: "Edit with existing Vim" list can get long
Bram Moolenaar <Bram@vim.org>
parents: 12626
diff changeset
767 InsertMenuItem(hmenu, index, TRUE, &mii);
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
768 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
769 // InsertMenu(hMenu, indexMenu++, MF_SEPARATOR|MF_BYPOSITION, 0, NULL);
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
770
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
771 // Must return number of menu items we added.
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
772 return ResultFromShort(idCmd-idCmdFirst);
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
773 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
774
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
775 //
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
776 // FUNCTION: CShellExt::InvokeCommand(LPCMINVOKECOMMANDINFO)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
777 //
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
778 // PURPOSE: Called by the shell after the user has selected on of the
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
779 // menu items that was added in QueryContextMenu().
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
780 //
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
781 // PARAMETERS:
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
782 // lpcmi - Pointer to an CMINVOKECOMMANDINFO structure
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
783 //
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
784 // RETURN VALUE:
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
785 //
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
786 //
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
787 // COMMENTS:
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
788 //
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
789
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
790 STDMETHODIMP CShellExt::InvokeCommand(LPCMINVOKECOMMANDINFO lpcmi)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
791 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
792 HRESULT hr = E_INVALIDARG;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
793
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
794 // If HIWORD(lpcmi->lpVerb) then we have been called programmatically
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
795 // and lpVerb is a command that should be invoked. Otherwise, the shell
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
796 // has called us, and LOWORD(lpcmi->lpVerb) is the menu ID the user has
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
797 // selected. Actually, it's (menu ID - idCmdFirst) from QueryContextMenu().
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
798 if (!HIWORD(lpcmi->lpVerb))
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
799 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
800 UINT idCmd = LOWORD(lpcmi->lpVerb);
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
801
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
802 if (idCmd >= m_edit_existing_off)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
803 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
804 // Existing with vim instance
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
805 hr = PushToWindow(lpcmi->hwnd,
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
806 lpcmi->lpDirectory,
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
807 lpcmi->lpVerb,
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
808 lpcmi->lpParameters,
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
809 lpcmi->nShow,
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
810 idCmd - m_edit_existing_off);
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
811 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
812 else
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
813 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
814 switch (idCmd)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
815 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
816 case 0:
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
817 hr = InvokeGvim(lpcmi->hwnd,
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
818 lpcmi->lpDirectory,
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
819 lpcmi->lpVerb,
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
820 lpcmi->lpParameters,
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
821 lpcmi->nShow);
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
822 break;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
823 case 1:
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
824 hr = InvokeSingleGvim(lpcmi->hwnd,
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
825 lpcmi->lpDirectory,
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
826 lpcmi->lpVerb,
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
827 lpcmi->lpParameters,
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
828 lpcmi->nShow,
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
829 0);
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
830 break;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
831 case 2:
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
832 hr = InvokeSingleGvim(lpcmi->hwnd,
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
833 lpcmi->lpDirectory,
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
834 lpcmi->lpVerb,
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
835 lpcmi->lpParameters,
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
836 lpcmi->nShow,
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
837 1);
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
838 break;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
839 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
840 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
841 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
842 return hr;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
843 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
844
1686
c7c53db66b55 updated for version 7.2b-019
vimboss
parents: 1366
diff changeset
845 STDMETHODIMP CShellExt::PushToWindow(HWND /* hParent */,
c7c53db66b55 updated for version 7.2b-019
vimboss
parents: 1366
diff changeset
846 LPCSTR /* pszWorkingDir */,
c7c53db66b55 updated for version 7.2b-019
vimboss
parents: 1366
diff changeset
847 LPCSTR /* pszCmd */,
c7c53db66b55 updated for version 7.2b-019
vimboss
parents: 1366
diff changeset
848 LPCSTR /* pszParam */,
c7c53db66b55 updated for version 7.2b-019
vimboss
parents: 1366
diff changeset
849 int /* iShowCmd */,
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
850 int idHWnd)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
851 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
852 HWND hWnd = m_hWnd[idHWnd];
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
853
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
854 // Show and bring vim instance to foreground
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
855 if (IsIconic(hWnd) != 0)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
856 ShowWindow(hWnd, SW_RESTORE);
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
857 else
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
858 ShowWindow(hWnd, SW_SHOW);
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
859 SetForegroundWindow(hWnd);
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
860
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
861 // Post the selected files to the vim instance
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
862 PostMessage(hWnd, WM_DROPFILES, (WPARAM)medium.hGlobal, 0);
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
863
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
864 return NOERROR;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
865 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
866
1686
c7c53db66b55 updated for version 7.2b-019
vimboss
parents: 1366
diff changeset
867 STDMETHODIMP CShellExt::GetCommandString(UINT_PTR /* idCmd */,
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
868 UINT uFlags,
1686
c7c53db66b55 updated for version 7.2b-019
vimboss
parents: 1366
diff changeset
869 UINT FAR * /* reserved */,
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
870 LPSTR pszName,
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
871 UINT cchMax)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
872 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
873 if (uFlags == GCS_HELPTEXT && cchMax > 35)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
874 lstrcpy(pszName, _("Edits the selected file(s) with Vim"));
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
875
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
876 return NOERROR;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
877 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
878
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
879 BOOL CALLBACK CShellExt::EnumWindowsProc(HWND hWnd, LPARAM lParam)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
880 {
415
165c628aa9fc updated for version 7.0108
vimboss
parents: 26
diff changeset
881 char temp[BUFSIZE];
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
882
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
883 // First do a bunch of check
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
884 // No invisible window
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
885 if (!IsWindowVisible(hWnd)) return TRUE;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
886 // No child window ???
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
887 // if (GetParent(hWnd)) return TRUE;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
888 // Class name should be Vim, if failed to get class name, return
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
889 if (GetClassName(hWnd, temp, sizeof(temp)) == 0)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
890 return TRUE;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
891 // Compare class name to that of vim, if not, return
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
892 if (_strnicmp(temp, "vim", sizeof("vim")) != 0)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
893 return TRUE;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
894 // First check if the number of vim instance exceeds MAX_HWND
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
895 CShellExt *cs = (CShellExt*) lParam;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
896 if (cs->m_cntOfHWnd >= MAX_HWND) return TRUE;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
897 // Now we get the vim window, put it into some kind of array
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
898 cs->m_hWnd[cs->m_cntOfHWnd] = hWnd;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
899 cs->m_cntOfHWnd ++;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
900
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
901 return TRUE; // continue enumeration (otherwise this would be false)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
902 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
903
6805
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
904 BOOL CShellExt::LoadMenuIcon()
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
905 {
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
906 char vimExeFile[BUFSIZE];
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
907 getGvimName(vimExeFile, 1);
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
908 if (vimExeFile[0] == '\0')
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
909 return FALSE;
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
910 HICON hVimIcon;
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
911 if (ExtractIconEx(vimExeFile, 0, NULL, &hVimIcon, 1) == 0)
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
912 return FALSE;
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
913 m_hVimIconBitmap = IconToBitmap(hVimIcon,
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
914 GetSysColorBrush(COLOR_MENU),
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
915 GetSystemMetrics(SM_CXSMICON),
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
916 GetSystemMetrics(SM_CYSMICON));
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
917 return TRUE;
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
918 }
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
919
12626
aca41efd888c patch 8.0.1191: MS-Windows: missing 32 and 64 bit files in installer
Christian Brabandt <cb@256bit.org>
parents: 8180
diff changeset
920 #ifndef __BORLANDC__
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
921 static char *
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
922 searchpath(char *name)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
923 {
415
165c628aa9fc updated for version 7.0108
vimboss
parents: 26
diff changeset
924 static char widename[2 * BUFSIZE];
165c628aa9fc updated for version 7.0108
vimboss
parents: 26
diff changeset
925 static char location[2 * BUFSIZE + 2];
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
926
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
927 // There appears to be a bug in FindExecutableA() on Windows NT.
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
928 // Use FindExecutableW() instead...
12626
aca41efd888c patch 8.0.1191: MS-Windows: missing 32 and 64 bit files in installer
Christian Brabandt <cb@256bit.org>
parents: 8180
diff changeset
929 MultiByteToWideChar(CP_ACP, 0, (LPCSTR)name, -1,
aca41efd888c patch 8.0.1191: MS-Windows: missing 32 and 64 bit files in installer
Christian Brabandt <cb@256bit.org>
parents: 8180
diff changeset
930 (LPWSTR)widename, BUFSIZE);
aca41efd888c patch 8.0.1191: MS-Windows: missing 32 and 64 bit files in installer
Christian Brabandt <cb@256bit.org>
parents: 8180
diff changeset
931 if (FindExecutableW((LPCWSTR)widename, (LPCWSTR)"",
aca41efd888c patch 8.0.1191: MS-Windows: missing 32 and 64 bit files in installer
Christian Brabandt <cb@256bit.org>
parents: 8180
diff changeset
932 (LPWSTR)location) > (HINSTANCE)32)
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
933 {
12626
aca41efd888c patch 8.0.1191: MS-Windows: missing 32 and 64 bit files in installer
Christian Brabandt <cb@256bit.org>
parents: 8180
diff changeset
934 WideCharToMultiByte(CP_ACP, 0, (LPWSTR)location, -1,
aca41efd888c patch 8.0.1191: MS-Windows: missing 32 and 64 bit files in installer
Christian Brabandt <cb@256bit.org>
parents: 8180
diff changeset
935 (LPSTR)widename, 2 * BUFSIZE, NULL, NULL);
aca41efd888c patch 8.0.1191: MS-Windows: missing 32 and 64 bit files in installer
Christian Brabandt <cb@256bit.org>
parents: 8180
diff changeset
936 return widename;
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
937 }
1366
7e7da11555d2 updated for version 7.1-080
vimboss
parents: 1226
diff changeset
938 return (char *)"";
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
939 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
940 #endif
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
941
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
942 STDMETHODIMP CShellExt::InvokeGvim(HWND hParent,
1686
c7c53db66b55 updated for version 7.2b-019
vimboss
parents: 1366
diff changeset
943 LPCSTR /* pszWorkingDir */,
c7c53db66b55 updated for version 7.2b-019
vimboss
parents: 1366
diff changeset
944 LPCSTR /* pszCmd */,
c7c53db66b55 updated for version 7.2b-019
vimboss
parents: 1366
diff changeset
945 LPCSTR /* pszParam */,
c7c53db66b55 updated for version 7.2b-019
vimboss
parents: 1366
diff changeset
946 int /* iShowCmd */)
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
947 {
2295
b9bc9c5df131 Support wide file names in gvimext. (Szabolcs Horvat)
Bram Moolenaar <bram@vim.org>
parents: 1953
diff changeset
948 wchar_t m_szFileUserClickedOn[BUFSIZE];
b9bc9c5df131 Support wide file names in gvimext. (Szabolcs Horvat)
Bram Moolenaar <bram@vim.org>
parents: 1953
diff changeset
949 wchar_t cmdStrW[BUFSIZE];
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
950 UINT i;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
951
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
952 for (i = 0; i < cbFiles; i++)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
953 {
2295
b9bc9c5df131 Support wide file names in gvimext. (Szabolcs Horvat)
Bram Moolenaar <bram@vim.org>
parents: 1953
diff changeset
954 DragQueryFileW((HDROP)medium.hGlobal,
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
955 i,
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
956 m_szFileUserClickedOn,
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
957 sizeof(m_szFileUserClickedOn));
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
958
6805
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
959 getGvimInvocationW(cmdStrW);
2295
b9bc9c5df131 Support wide file names in gvimext. (Szabolcs Horvat)
Bram Moolenaar <bram@vim.org>
parents: 1953
diff changeset
960 wcscat(cmdStrW, L" \"");
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
961
2295
b9bc9c5df131 Support wide file names in gvimext. (Szabolcs Horvat)
Bram Moolenaar <bram@vim.org>
parents: 1953
diff changeset
962 if ((wcslen(cmdStrW) + wcslen(m_szFileUserClickedOn) + 2) < BUFSIZE)
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
963 {
2295
b9bc9c5df131 Support wide file names in gvimext. (Szabolcs Horvat)
Bram Moolenaar <bram@vim.org>
parents: 1953
diff changeset
964 wcscat(cmdStrW, m_szFileUserClickedOn);
b9bc9c5df131 Support wide file names in gvimext. (Szabolcs Horvat)
Bram Moolenaar <bram@vim.org>
parents: 1953
diff changeset
965 wcscat(cmdStrW, L"\"");
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
966
2295
b9bc9c5df131 Support wide file names in gvimext. (Szabolcs Horvat)
Bram Moolenaar <bram@vim.org>
parents: 1953
diff changeset
967 STARTUPINFOW si;
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
968 PROCESS_INFORMATION pi;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
969
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
970 ZeroMemory(&si, sizeof(si));
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
971 si.cb = sizeof(si);
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
972
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
973 // Start the child process.
2295
b9bc9c5df131 Support wide file names in gvimext. (Szabolcs Horvat)
Bram Moolenaar <bram@vim.org>
parents: 1953
diff changeset
974 if (!CreateProcessW(NULL, // No module name (use command line).
b9bc9c5df131 Support wide file names in gvimext. (Szabolcs Horvat)
Bram Moolenaar <bram@vim.org>
parents: 1953
diff changeset
975 cmdStrW, // Command line.
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
976 NULL, // Process handle not inheritable.
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
977 NULL, // Thread handle not inheritable.
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
978 FALSE, // Set handle inheritance to FALSE.
3008
37a54a85413e updated for version 7.3.276
Bram Moolenaar <bram@vim.org>
parents: 2972
diff changeset
979 oldenv == NULL ? 0 : CREATE_UNICODE_ENVIRONMENT,
37a54a85413e updated for version 7.3.276
Bram Moolenaar <bram@vim.org>
parents: 2972
diff changeset
980 oldenv, // Use unmodified environment block.
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
981 NULL, // Use parent's starting directory.
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
982 &si, // Pointer to STARTUPINFO structure.
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
983 &pi) // Pointer to PROCESS_INFORMATION structure.
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
984 )
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
985 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
986 MessageBox(
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
987 hParent,
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
988 _("Error creating process: Check if gvim is in your path!"),
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
989 _("gvimext.dll error"),
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
990 MB_OK);
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
991 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
992 else
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
993 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
994 CloseHandle( pi.hProcess );
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
995 CloseHandle( pi.hThread );
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
996 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
997 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
998 else
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
999 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1000 MessageBox(
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1001 hParent,
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1002 _("Path length too long!"),
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1003 _("gvimext.dll error"),
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1004 MB_OK);
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1005 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1006 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1007
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1008 return NOERROR;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1009 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1010
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1011
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1012 STDMETHODIMP CShellExt::InvokeSingleGvim(HWND hParent,
1686
c7c53db66b55 updated for version 7.2b-019
vimboss
parents: 1366
diff changeset
1013 LPCSTR /* pszWorkingDir */,
c7c53db66b55 updated for version 7.2b-019
vimboss
parents: 1366
diff changeset
1014 LPCSTR /* pszCmd */,
c7c53db66b55 updated for version 7.2b-019
vimboss
parents: 1366
diff changeset
1015 LPCSTR /* pszParam */,
c7c53db66b55 updated for version 7.2b-019
vimboss
parents: 1366
diff changeset
1016 int /* iShowCmd */,
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1017 int useDiff)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1018 {
2295
b9bc9c5df131 Support wide file names in gvimext. (Szabolcs Horvat)
Bram Moolenaar <bram@vim.org>
parents: 1953
diff changeset
1019 wchar_t m_szFileUserClickedOn[BUFSIZE];
b9bc9c5df131 Support wide file names in gvimext. (Szabolcs Horvat)
Bram Moolenaar <bram@vim.org>
parents: 1953
diff changeset
1020 wchar_t *cmdStrW;
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1021 size_t cmdlen;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1022 size_t len;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1023 UINT i;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1024
415
165c628aa9fc updated for version 7.0108
vimboss
parents: 26
diff changeset
1025 cmdlen = BUFSIZE;
2295
b9bc9c5df131 Support wide file names in gvimext. (Szabolcs Horvat)
Bram Moolenaar <bram@vim.org>
parents: 1953
diff changeset
1026 cmdStrW = (wchar_t *) malloc(cmdlen * sizeof(wchar_t));
15154
eb0d8065d3f8 patch 8.1.0587: GvimExt: realloc() failing is not handled properly
Bram Moolenaar <Bram@vim.org>
parents: 14962
diff changeset
1027 if (cmdStrW == NULL)
15158
a9340baa872f patch 8.1.0589: compilation error in gvimext.cpp
Bram Moolenaar <Bram@vim.org>
parents: 15154
diff changeset
1028 return E_FAIL;
6805
81cb471657e0 patch 7.4.724
Bram Moolenaar <bram@vim.org>
parents: 4352
diff changeset
1029 getGvimInvocationW(cmdStrW);
2295
b9bc9c5df131 Support wide file names in gvimext. (Szabolcs Horvat)
Bram Moolenaar <bram@vim.org>
parents: 1953
diff changeset
1030
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1031 if (useDiff)
2295
b9bc9c5df131 Support wide file names in gvimext. (Szabolcs Horvat)
Bram Moolenaar <bram@vim.org>
parents: 1953
diff changeset
1032 wcscat(cmdStrW, L" -d");
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1033 for (i = 0; i < cbFiles; i++)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1034 {
2295
b9bc9c5df131 Support wide file names in gvimext. (Szabolcs Horvat)
Bram Moolenaar <bram@vim.org>
parents: 1953
diff changeset
1035 DragQueryFileW((HDROP)medium.hGlobal,
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1036 i,
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1037 m_szFileUserClickedOn,
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1038 sizeof(m_szFileUserClickedOn));
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1039
2295
b9bc9c5df131 Support wide file names in gvimext. (Szabolcs Horvat)
Bram Moolenaar <bram@vim.org>
parents: 1953
diff changeset
1040 len = wcslen(cmdStrW) + wcslen(m_szFileUserClickedOn) + 4;
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1041 if (len > cmdlen)
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1042 {
415
165c628aa9fc updated for version 7.0108
vimboss
parents: 26
diff changeset
1043 cmdlen = len + BUFSIZE;
15154
eb0d8065d3f8 patch 8.1.0587: GvimExt: realloc() failing is not handled properly
Bram Moolenaar <Bram@vim.org>
parents: 14962
diff changeset
1044 wchar_t *cmdStrW_new = (wchar_t *)realloc(cmdStrW, cmdlen * sizeof(wchar_t));
eb0d8065d3f8 patch 8.1.0587: GvimExt: realloc() failing is not handled properly
Bram Moolenaar <Bram@vim.org>
parents: 14962
diff changeset
1045 if (cmdStrW_new == NULL)
15158
a9340baa872f patch 8.1.0589: compilation error in gvimext.cpp
Bram Moolenaar <Bram@vim.org>
parents: 15154
diff changeset
1046 {
a9340baa872f patch 8.1.0589: compilation error in gvimext.cpp
Bram Moolenaar <Bram@vim.org>
parents: 15154
diff changeset
1047 free(cmdStrW);
a9340baa872f patch 8.1.0589: compilation error in gvimext.cpp
Bram Moolenaar <Bram@vim.org>
parents: 15154
diff changeset
1048 return E_FAIL;
a9340baa872f patch 8.1.0589: compilation error in gvimext.cpp
Bram Moolenaar <Bram@vim.org>
parents: 15154
diff changeset
1049 }
15154
eb0d8065d3f8 patch 8.1.0587: GvimExt: realloc() failing is not handled properly
Bram Moolenaar <Bram@vim.org>
parents: 14962
diff changeset
1050 cmdStrW = cmdStrW_new;
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1051 }
2295
b9bc9c5df131 Support wide file names in gvimext. (Szabolcs Horvat)
Bram Moolenaar <bram@vim.org>
parents: 1953
diff changeset
1052 wcscat(cmdStrW, L" \"");
b9bc9c5df131 Support wide file names in gvimext. (Szabolcs Horvat)
Bram Moolenaar <bram@vim.org>
parents: 1953
diff changeset
1053 wcscat(cmdStrW, m_szFileUserClickedOn);
b9bc9c5df131 Support wide file names in gvimext. (Szabolcs Horvat)
Bram Moolenaar <bram@vim.org>
parents: 1953
diff changeset
1054 wcscat(cmdStrW, L"\"");
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1055 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1056
2295
b9bc9c5df131 Support wide file names in gvimext. (Szabolcs Horvat)
Bram Moolenaar <bram@vim.org>
parents: 1953
diff changeset
1057 STARTUPINFOW si;
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1058 PROCESS_INFORMATION pi;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1059
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1060 ZeroMemory(&si, sizeof(si));
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1061 si.cb = sizeof(si);
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1062
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1063 // Start the child process.
2295
b9bc9c5df131 Support wide file names in gvimext. (Szabolcs Horvat)
Bram Moolenaar <bram@vim.org>
parents: 1953
diff changeset
1064 if (!CreateProcessW(NULL, // No module name (use command line).
b9bc9c5df131 Support wide file names in gvimext. (Szabolcs Horvat)
Bram Moolenaar <bram@vim.org>
parents: 1953
diff changeset
1065 cmdStrW, // Command line.
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1066 NULL, // Process handle not inheritable.
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1067 NULL, // Thread handle not inheritable.
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1068 FALSE, // Set handle inheritance to FALSE.
3008
37a54a85413e updated for version 7.3.276
Bram Moolenaar <bram@vim.org>
parents: 2972
diff changeset
1069 oldenv == NULL ? 0 : CREATE_UNICODE_ENVIRONMENT,
37a54a85413e updated for version 7.3.276
Bram Moolenaar <bram@vim.org>
parents: 2972
diff changeset
1070 oldenv, // Use unmodified environment block.
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1071 NULL, // Use parent's starting directory.
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1072 &si, // Pointer to STARTUPINFO structure.
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1073 &pi) // Pointer to PROCESS_INFORMATION structure.
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1074 )
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1075 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1076 MessageBox(
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1077 hParent,
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1078 _("Error creating process: Check if gvim is in your path!"),
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1079 _("gvimext.dll error"),
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1080 MB_OK);
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1081 }
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1082 else
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1083 {
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1084 CloseHandle(pi.hProcess);
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1085 CloseHandle(pi.hThread);
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1086 }
2295
b9bc9c5df131 Support wide file names in gvimext. (Szabolcs Horvat)
Bram Moolenaar <bram@vim.org>
parents: 1953
diff changeset
1087 free(cmdStrW);
10
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1088
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1089 return NOERROR;
4e2284e71352 updated for version 7.0002
vimboss
parents:
diff changeset
1090 }