annotate src/GvimExt/gvimext.cpp @ 19729:bc91817dda84

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