annotate src/os_win32.c @ 7833:c079097365f3 v7.4.1213

commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Author: Bram Moolenaar <Bram@vim.org> Date: Sat Jan 30 20:31:25 2016 +0100 patch 7.4.1213 Problem: Using old style function declarations. Solution: Change to new style function declarations. (script by Hirohito Higashi)
author Christian Brabandt <cb@256bit.org>
date Sat, 30 Jan 2016 20:45:04 +0100
parents 0d46cea25641
children 30a9f5fc3508
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1 /* vi:set ts=8 sts=4 sw=4:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2 *
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3 * VIM - Vi IMproved by Bram Moolenaar
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4 *
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5 * Do ":help uganda" in Vim to read copying and usage conditions.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6 * Do ":help credits" in Vim to see a list of people who contributed.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
7 * See README.txt for an overview of the Vim source code.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
8 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
9 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
10 * os_win32.c
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
11 *
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
12 * Used for both the console version and the Win32 GUI. A lot of code is for
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
13 * the console version only, so there is a lot of "#ifndef FEAT_GUI_W32".
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
14 *
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
15 * Win32 (Windows NT and Windows 95) system-dependent routines.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
16 * Portions lifted from the Win32 SDK samples, the MSDOS-dependent code,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
17 * NetHack 3.1.3, GNU Emacs 19.30, and Vile 5.5.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
18 *
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
19 * George V. Reilly <george@reilly.org> wrote most of this.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
20 * Roger Knobbe <rogerk@wonderware.com> did the initial port of Vim 3.0.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
21 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
22
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
23 #include "vim.h"
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
24
14
946da5994c01 updated for version 7.0006
vimboss
parents: 10
diff changeset
25 #ifdef FEAT_MZSCHEME
946da5994c01 updated for version 7.0006
vimboss
parents: 10
diff changeset
26 # include "if_mzsch.h"
946da5994c01 updated for version 7.0006
vimboss
parents: 10
diff changeset
27 #endif
946da5994c01 updated for version 7.0006
vimboss
parents: 10
diff changeset
28
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
29 #include <sys/types.h>
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
30 #include <signal.h>
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
31 #include <limits.h>
3927
e6d8b44065bc updated for version 7.3.719
Bram Moolenaar <bram@vim.org>
parents: 3902
diff changeset
32
e6d8b44065bc updated for version 7.3.719
Bram Moolenaar <bram@vim.org>
parents: 3902
diff changeset
33 /* cproto fails on missing include files */
e6d8b44065bc updated for version 7.3.719
Bram Moolenaar <bram@vim.org>
parents: 3902
diff changeset
34 #ifndef PROTO
e6d8b44065bc updated for version 7.3.719
Bram Moolenaar <bram@vim.org>
parents: 3902
diff changeset
35 # include <process.h>
e6d8b44065bc updated for version 7.3.719
Bram Moolenaar <bram@vim.org>
parents: 3902
diff changeset
36 #endif
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
37
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
38 #undef chdir
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
39 #ifdef __GNUC__
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
40 # ifndef __MINGW32__
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
41 # include <dirent.h>
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
42 # endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
43 #else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
44 # include <direct.h>
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
45 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
46
3927
e6d8b44065bc updated for version 7.3.719
Bram Moolenaar <bram@vim.org>
parents: 3902
diff changeset
47 #ifndef PROTO
e6d8b44065bc updated for version 7.3.719
Bram Moolenaar <bram@vim.org>
parents: 3902
diff changeset
48 # if defined(FEAT_TITLE) && !defined(FEAT_GUI_W32)
e6d8b44065bc updated for version 7.3.719
Bram Moolenaar <bram@vim.org>
parents: 3902
diff changeset
49 # include <shellapi.h>
e6d8b44065bc updated for version 7.3.719
Bram Moolenaar <bram@vim.org>
parents: 3902
diff changeset
50 # endif
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
51 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
52
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
53 #ifdef __MINGW32__
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
54 # ifndef FROM_LEFT_1ST_BUTTON_PRESSED
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
55 # define FROM_LEFT_1ST_BUTTON_PRESSED 0x0001
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
56 # endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
57 # ifndef RIGHTMOST_BUTTON_PRESSED
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
58 # define RIGHTMOST_BUTTON_PRESSED 0x0002
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
59 # endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
60 # ifndef FROM_LEFT_2ND_BUTTON_PRESSED
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
61 # define FROM_LEFT_2ND_BUTTON_PRESSED 0x0004
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
62 # endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
63 # ifndef FROM_LEFT_3RD_BUTTON_PRESSED
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
64 # define FROM_LEFT_3RD_BUTTON_PRESSED 0x0008
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
65 # endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
66 # ifndef FROM_LEFT_4TH_BUTTON_PRESSED
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
67 # define FROM_LEFT_4TH_BUTTON_PRESSED 0x0010
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
68 # endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
69
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
70 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
71 * EventFlags
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
72 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
73 # ifndef MOUSE_MOVED
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
74 # define MOUSE_MOVED 0x0001
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
75 # endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
76 # ifndef DOUBLE_CLICK
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
77 # define DOUBLE_CLICK 0x0002
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
78 # endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
79 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
80
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
81 /* Record all output and all keyboard & mouse input */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
82 /* #define MCH_WRITE_DUMP */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
83
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
84 #ifdef MCH_WRITE_DUMP
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
85 FILE* fdDump = NULL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
86 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
87
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
88 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
89 * When generating prototypes for Win32 on Unix, these lines make the syntax
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
90 * errors disappear. They do not need to be correct.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
91 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
92 #ifdef PROTO
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
93 #define WINAPI
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
94 #define WINBASEAPI
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
95 typedef char * LPCSTR;
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
96 typedef char * LPWSTR;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
97 typedef int ACCESS_MASK;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
98 typedef int BOOL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
99 typedef int COLORREF;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
100 typedef int CONSOLE_CURSOR_INFO;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
101 typedef int COORD;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
102 typedef int DWORD;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
103 typedef int HANDLE;
7668
21b0a39d13ed commit https://github.com/vim/vim/commit/ef26954a35207c3f17d6ed35d9a40c918d974892
Christian Brabandt <cb@256bit.org>
parents: 7657
diff changeset
104 typedef int LPHANDLE;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
105 typedef int HDC;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
106 typedef int HFONT;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
107 typedef int HICON;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
108 typedef int HINSTANCE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
109 typedef int HWND;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
110 typedef int INPUT_RECORD;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
111 typedef int KEY_EVENT_RECORD;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
112 typedef int LOGFONT;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
113 typedef int LPBOOL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
114 typedef int LPCTSTR;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
115 typedef int LPDWORD;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
116 typedef int LPSTR;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
117 typedef int LPTSTR;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
118 typedef int LPVOID;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
119 typedef int MOUSE_EVENT_RECORD;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
120 typedef int PACL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
121 typedef int PDWORD;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
122 typedef int PHANDLE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
123 typedef int PRINTDLG;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
124 typedef int PSECURITY_DESCRIPTOR;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
125 typedef int PSID;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
126 typedef int SECURITY_INFORMATION;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
127 typedef int SHORT;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
128 typedef int SMALL_RECT;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
129 typedef int TEXTMETRIC;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
130 typedef int TOKEN_INFORMATION_CLASS;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
131 typedef int TRUSTEE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
132 typedef int WORD;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
133 typedef int WCHAR;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
134 typedef void VOID;
3927
e6d8b44065bc updated for version 7.3.719
Bram Moolenaar <bram@vim.org>
parents: 3902
diff changeset
135 typedef int BY_HANDLE_FILE_INFORMATION;
5112
f063be86b632 updated for version 7.3.1299
Bram Moolenaar <bram@vim.org>
parents: 5049
diff changeset
136 typedef int SE_OBJECT_TYPE;
f063be86b632 updated for version 7.3.1299
Bram Moolenaar <bram@vim.org>
parents: 5049
diff changeset
137 typedef int PSNSECINFO;
f063be86b632 updated for version 7.3.1299
Bram Moolenaar <bram@vim.org>
parents: 5049
diff changeset
138 typedef int PSNSECINFOW;
6359
9f9058aeba0d updated for version 7.4.512
Bram Moolenaar <bram@vim.org>
parents: 6345
diff changeset
139 typedef int STARTUPINFO;
9f9058aeba0d updated for version 7.4.512
Bram Moolenaar <bram@vim.org>
parents: 6345
diff changeset
140 typedef int PROCESS_INFORMATION;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
141 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
142
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
143 #ifndef FEAT_GUI_W32
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
144 /* Undocumented API in kernel32.dll needed to work around dead key bug in
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
145 * console-mode applications in NT 4.0. If you switch keyboard layouts
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
146 * in a console app to a layout that includes dead keys and then hit a
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
147 * dead key, a call to ToAscii will trash the stack. My thanks to Ian James
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
148 * and Michael Dietrich for helping me figure out this workaround.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
149 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
150
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
151 /* WINBASEAPI BOOL WINAPI GetConsoleKeyboardLayoutNameA(LPSTR); */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
152 #ifndef WINBASEAPI
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
153 # define WINBASEAPI __stdcall
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
154 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
155 #if defined(__BORLANDC__)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
156 typedef BOOL (__stdcall *PFNGCKLN)(LPSTR);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
157 #else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
158 typedef WINBASEAPI BOOL (WINAPI *PFNGCKLN)(LPSTR);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
159 #endif
297
9a1c2a8186b7 updated for version 7.0078
vimboss
parents: 292
diff changeset
160 static PFNGCKLN s_pfnGetConsoleKeyboardLayoutName = NULL;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
161 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
162
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
163 #if defined(__BORLANDC__)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
164 /* Strangely Borland uses a non-standard name. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
165 # define wcsicmp(a, b) wcscmpi((a), (b))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
166 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
167
3927
e6d8b44065bc updated for version 7.3.719
Bram Moolenaar <bram@vim.org>
parents: 3902
diff changeset
168 #ifndef PROTO
e6d8b44065bc updated for version 7.3.719
Bram Moolenaar <bram@vim.org>
parents: 3902
diff changeset
169
4352
04736b4030ec updated for version 7.3.925
Bram Moolenaar <bram@vim.org>
parents: 4238
diff changeset
170 /* Enable common dialogs input unicode from IME if possible. */
3010
e5b17a5f6516 updated for version 7.3.277
Bram Moolenaar <bram@vim.org>
parents: 2935
diff changeset
171 #ifdef FEAT_MBYTE
4238
26e59a39fdd9 updated for version 7.3.870
Bram Moolenaar <bram@vim.org>
parents: 4168
diff changeset
172 LRESULT (WINAPI *pDispatchMessage)(CONST MSG *) = DispatchMessage;
3010
e5b17a5f6516 updated for version 7.3.277
Bram Moolenaar <bram@vim.org>
parents: 2935
diff changeset
173 BOOL (WINAPI *pGetMessage)(LPMSG, HWND, UINT, UINT) = GetMessage;
e5b17a5f6516 updated for version 7.3.277
Bram Moolenaar <bram@vim.org>
parents: 2935
diff changeset
174 BOOL (WINAPI *pIsDialogMessage)(HWND, LPMSG) = IsDialogMessage;
e5b17a5f6516 updated for version 7.3.277
Bram Moolenaar <bram@vim.org>
parents: 2935
diff changeset
175 BOOL (WINAPI *pPeekMessage)(LPMSG, HWND, UINT, UINT, UINT) = PeekMessage;
e5b17a5f6516 updated for version 7.3.277
Bram Moolenaar <bram@vim.org>
parents: 2935
diff changeset
176 #endif
e5b17a5f6516 updated for version 7.3.277
Bram Moolenaar <bram@vim.org>
parents: 2935
diff changeset
177
3927
e6d8b44065bc updated for version 7.3.719
Bram Moolenaar <bram@vim.org>
parents: 3902
diff changeset
178 #endif /* PROTO */
e6d8b44065bc updated for version 7.3.719
Bram Moolenaar <bram@vim.org>
parents: 3902
diff changeset
179
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
180 #ifndef FEAT_GUI_W32
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
181 /* Win32 Console handles for input and output */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
182 static HANDLE g_hConIn = INVALID_HANDLE_VALUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
183 static HANDLE g_hConOut = INVALID_HANDLE_VALUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
184
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
185 /* Win32 Screen buffer,coordinate,console I/O information */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
186 static SMALL_RECT g_srScrollRegion;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
187 static COORD g_coord; /* 0-based, but external coords are 1-based */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
188
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
189 /* The attribute of the screen when the editor was started */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
190 static WORD g_attrDefault = 7; /* lightgray text on black background */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
191 static WORD g_attrCurrent;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
192
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
193 static int g_fCBrkPressed = FALSE; /* set by ctrl-break interrupt */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
194 static int g_fCtrlCPressed = FALSE; /* set when ctrl-C or ctrl-break detected */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
195 static int g_fForceExit = FALSE; /* set when forcefully exiting */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
196
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
197 static void termcap_mode_start(void);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
198 static void termcap_mode_end(void);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
199 static void clear_chars(COORD coord, DWORD n);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
200 static void clear_screen(void);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
201 static void clear_to_end_of_display(void);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
202 static void clear_to_end_of_line(void);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
203 static void scroll(unsigned cLines);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
204 static void set_scroll_region(unsigned left, unsigned top,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
205 unsigned right, unsigned bottom);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
206 static void insert_lines(unsigned cLines);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
207 static void delete_lines(unsigned cLines);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
208 static void gotoxy(unsigned x, unsigned y);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
209 static void normvideo(void);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
210 static void textattr(WORD wAttr);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
211 static void textcolor(WORD wAttr);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
212 static void textbackground(WORD wAttr);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
213 static void standout(void);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
214 static void standend(void);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
215 static void visual_bell(void);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
216 static void cursor_visible(BOOL fVisible);
7080
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
217 static DWORD write_chars(char_u *pchBuf, DWORD cbToWrite);
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
218 static WCHAR tgetch(int *pmodifiers, WCHAR *pch2);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
219 static void create_conin(void);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
220 static int s_cursor_visible = TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
221 static int did_create_conin = FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
222 #else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
223 static int s_dont_use_vimrun = TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
224 static int need_vimrun_warning = FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
225 static char *vimrun_path = "vimrun ";
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
226 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
227
4872
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
228 static int win32_getattrs(char_u *name);
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
229 static int win32_setattrs(char_u *name, int attrs);
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
230 static int win32_set_archive(char_u *name);
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
231
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
232 #ifndef FEAT_GUI_W32
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
233 static int suppress_winsize = 1; /* don't fiddle with console */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
234 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
235
2612
fa5dee44df3f updated for version 7.3.034
Bram Moolenaar <bram@vim.org>
parents: 2604
diff changeset
236 static char_u *exe_path = NULL;
fa5dee44df3f updated for version 7.3.034
Bram Moolenaar <bram@vim.org>
parents: 2604
diff changeset
237
5633
7db84aadd37a updated for version 7.4.163
Bram Moolenaar <bram@vim.org>
parents: 5627
diff changeset
238 static BOOL win8_or_later = FALSE;
7db84aadd37a updated for version 7.4.163
Bram Moolenaar <bram@vim.org>
parents: 5627
diff changeset
239
5580
6fdb1d6646b6 updated for version 7.4.137
Bram Moolenaar <bram@vim.org>
parents: 5578
diff changeset
240 /*
6fdb1d6646b6 updated for version 7.4.137
Bram Moolenaar <bram@vim.org>
parents: 5578
diff changeset
241 * Version of ReadConsoleInput() that works with IME.
5590
735b70faac4a updated for version 7.4.142
Bram Moolenaar <bram@vim.org>
parents: 5588
diff changeset
242 * Works around problems on Windows 8.
5580
6fdb1d6646b6 updated for version 7.4.137
Bram Moolenaar <bram@vim.org>
parents: 5578
diff changeset
243 */
6fdb1d6646b6 updated for version 7.4.137
Bram Moolenaar <bram@vim.org>
parents: 5578
diff changeset
244 static BOOL
6fdb1d6646b6 updated for version 7.4.137
Bram Moolenaar <bram@vim.org>
parents: 5578
diff changeset
245 read_console_input(
5590
735b70faac4a updated for version 7.4.142
Bram Moolenaar <bram@vim.org>
parents: 5588
diff changeset
246 HANDLE hInput,
735b70faac4a updated for version 7.4.142
Bram Moolenaar <bram@vim.org>
parents: 5588
diff changeset
247 INPUT_RECORD *lpBuffer,
735b70faac4a updated for version 7.4.142
Bram Moolenaar <bram@vim.org>
parents: 5588
diff changeset
248 DWORD nLength,
735b70faac4a updated for version 7.4.142
Bram Moolenaar <bram@vim.org>
parents: 5588
diff changeset
249 LPDWORD lpEvents)
5580
6fdb1d6646b6 updated for version 7.4.137
Bram Moolenaar <bram@vim.org>
parents: 5578
diff changeset
250 {
6fdb1d6646b6 updated for version 7.4.137
Bram Moolenaar <bram@vim.org>
parents: 5578
diff changeset
251 enum
6fdb1d6646b6 updated for version 7.4.137
Bram Moolenaar <bram@vim.org>
parents: 5578
diff changeset
252 {
5590
735b70faac4a updated for version 7.4.142
Bram Moolenaar <bram@vim.org>
parents: 5588
diff changeset
253 IRSIZE = 10
5580
6fdb1d6646b6 updated for version 7.4.137
Bram Moolenaar <bram@vim.org>
parents: 5578
diff changeset
254 };
5590
735b70faac4a updated for version 7.4.142
Bram Moolenaar <bram@vim.org>
parents: 5588
diff changeset
255 static INPUT_RECORD s_irCache[IRSIZE];
5580
6fdb1d6646b6 updated for version 7.4.137
Bram Moolenaar <bram@vim.org>
parents: 5578
diff changeset
256 static DWORD s_dwIndex = 0;
6fdb1d6646b6 updated for version 7.4.137
Bram Moolenaar <bram@vim.org>
parents: 5578
diff changeset
257 static DWORD s_dwMax = 0;
5590
735b70faac4a updated for version 7.4.142
Bram Moolenaar <bram@vim.org>
parents: 5588
diff changeset
258 DWORD dwEvents;
5635
a01819fb6e2b updated for version 7.4.164
Bram Moolenaar <bram@vim.org>
parents: 5633
diff changeset
259 int head;
a01819fb6e2b updated for version 7.4.164
Bram Moolenaar <bram@vim.org>
parents: 5633
diff changeset
260 int tail;
a01819fb6e2b updated for version 7.4.164
Bram Moolenaar <bram@vim.org>
parents: 5633
diff changeset
261 int i;
5580
6fdb1d6646b6 updated for version 7.4.137
Bram Moolenaar <bram@vim.org>
parents: 5578
diff changeset
262
6981
f77d1f32c357 patch 7.4.808
Bram Moolenaar <bram@vim.org>
parents: 6933
diff changeset
263 if (nLength == -2)
f77d1f32c357 patch 7.4.808
Bram Moolenaar <bram@vim.org>
parents: 6933
diff changeset
264 return (s_dwMax > 0) ? TRUE : FALSE;
f77d1f32c357 patch 7.4.808
Bram Moolenaar <bram@vim.org>
parents: 6933
diff changeset
265
5633
7db84aadd37a updated for version 7.4.163
Bram Moolenaar <bram@vim.org>
parents: 5627
diff changeset
266 if (!win8_or_later)
7db84aadd37a updated for version 7.4.163
Bram Moolenaar <bram@vim.org>
parents: 5627
diff changeset
267 {
7db84aadd37a updated for version 7.4.163
Bram Moolenaar <bram@vim.org>
parents: 5627
diff changeset
268 if (nLength == -1)
7080
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
269 return PeekConsoleInputW(hInput, lpBuffer, 1, lpEvents);
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
270 return ReadConsoleInputW(hInput, lpBuffer, 1, &dwEvents);
5633
7db84aadd37a updated for version 7.4.163
Bram Moolenaar <bram@vim.org>
parents: 5627
diff changeset
271 }
7db84aadd37a updated for version 7.4.163
Bram Moolenaar <bram@vim.org>
parents: 5627
diff changeset
272
5580
6fdb1d6646b6 updated for version 7.4.137
Bram Moolenaar <bram@vim.org>
parents: 5578
diff changeset
273 if (s_dwMax == 0)
6fdb1d6646b6 updated for version 7.4.137
Bram Moolenaar <bram@vim.org>
parents: 5578
diff changeset
274 {
5590
735b70faac4a updated for version 7.4.142
Bram Moolenaar <bram@vim.org>
parents: 5588
diff changeset
275 if (nLength == -1)
7080
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
276 return PeekConsoleInputW(hInput, lpBuffer, 1, lpEvents);
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
277 if (!ReadConsoleInputW(hInput, s_irCache, IRSIZE, &dwEvents))
5590
735b70faac4a updated for version 7.4.142
Bram Moolenaar <bram@vim.org>
parents: 5588
diff changeset
278 return FALSE;
5580
6fdb1d6646b6 updated for version 7.4.137
Bram Moolenaar <bram@vim.org>
parents: 5578
diff changeset
279 s_dwIndex = 0;
5590
735b70faac4a updated for version 7.4.142
Bram Moolenaar <bram@vim.org>
parents: 5588
diff changeset
280 s_dwMax = dwEvents;
735b70faac4a updated for version 7.4.142
Bram Moolenaar <bram@vim.org>
parents: 5588
diff changeset
281 if (dwEvents == 0)
5580
6fdb1d6646b6 updated for version 7.4.137
Bram Moolenaar <bram@vim.org>
parents: 5578
diff changeset
282 {
5590
735b70faac4a updated for version 7.4.142
Bram Moolenaar <bram@vim.org>
parents: 5588
diff changeset
283 *lpEvents = 0;
735b70faac4a updated for version 7.4.142
Bram Moolenaar <bram@vim.org>
parents: 5588
diff changeset
284 return TRUE;
5580
6fdb1d6646b6 updated for version 7.4.137
Bram Moolenaar <bram@vim.org>
parents: 5578
diff changeset
285 }
5635
a01819fb6e2b updated for version 7.4.164
Bram Moolenaar <bram@vim.org>
parents: 5633
diff changeset
286
a01819fb6e2b updated for version 7.4.164
Bram Moolenaar <bram@vim.org>
parents: 5633
diff changeset
287 if (s_dwMax > 1)
a01819fb6e2b updated for version 7.4.164
Bram Moolenaar <bram@vim.org>
parents: 5633
diff changeset
288 {
a01819fb6e2b updated for version 7.4.164
Bram Moolenaar <bram@vim.org>
parents: 5633
diff changeset
289 head = 0;
a01819fb6e2b updated for version 7.4.164
Bram Moolenaar <bram@vim.org>
parents: 5633
diff changeset
290 tail = s_dwMax - 1;
a01819fb6e2b updated for version 7.4.164
Bram Moolenaar <bram@vim.org>
parents: 5633
diff changeset
291 while (head != tail)
a01819fb6e2b updated for version 7.4.164
Bram Moolenaar <bram@vim.org>
parents: 5633
diff changeset
292 {
a01819fb6e2b updated for version 7.4.164
Bram Moolenaar <bram@vim.org>
parents: 5633
diff changeset
293 if (s_irCache[head].EventType == WINDOW_BUFFER_SIZE_EVENT
a01819fb6e2b updated for version 7.4.164
Bram Moolenaar <bram@vim.org>
parents: 5633
diff changeset
294 && s_irCache[head + 1].EventType
a01819fb6e2b updated for version 7.4.164
Bram Moolenaar <bram@vim.org>
parents: 5633
diff changeset
295 == WINDOW_BUFFER_SIZE_EVENT)
a01819fb6e2b updated for version 7.4.164
Bram Moolenaar <bram@vim.org>
parents: 5633
diff changeset
296 {
a01819fb6e2b updated for version 7.4.164
Bram Moolenaar <bram@vim.org>
parents: 5633
diff changeset
297 /* Remove duplicate event to avoid flicker. */
a01819fb6e2b updated for version 7.4.164
Bram Moolenaar <bram@vim.org>
parents: 5633
diff changeset
298 for (i = head; i < tail; ++i)
a01819fb6e2b updated for version 7.4.164
Bram Moolenaar <bram@vim.org>
parents: 5633
diff changeset
299 s_irCache[i] = s_irCache[i + 1];
a01819fb6e2b updated for version 7.4.164
Bram Moolenaar <bram@vim.org>
parents: 5633
diff changeset
300 --tail;
a01819fb6e2b updated for version 7.4.164
Bram Moolenaar <bram@vim.org>
parents: 5633
diff changeset
301 continue;
a01819fb6e2b updated for version 7.4.164
Bram Moolenaar <bram@vim.org>
parents: 5633
diff changeset
302 }
a01819fb6e2b updated for version 7.4.164
Bram Moolenaar <bram@vim.org>
parents: 5633
diff changeset
303 head++;
a01819fb6e2b updated for version 7.4.164
Bram Moolenaar <bram@vim.org>
parents: 5633
diff changeset
304 }
a01819fb6e2b updated for version 7.4.164
Bram Moolenaar <bram@vim.org>
parents: 5633
diff changeset
305 s_dwMax = tail + 1;
a01819fb6e2b updated for version 7.4.164
Bram Moolenaar <bram@vim.org>
parents: 5633
diff changeset
306 }
5580
6fdb1d6646b6 updated for version 7.4.137
Bram Moolenaar <bram@vim.org>
parents: 5578
diff changeset
307 }
5635
a01819fb6e2b updated for version 7.4.164
Bram Moolenaar <bram@vim.org>
parents: 5633
diff changeset
308
5590
735b70faac4a updated for version 7.4.142
Bram Moolenaar <bram@vim.org>
parents: 5588
diff changeset
309 *lpBuffer = s_irCache[s_dwIndex];
6981
f77d1f32c357 patch 7.4.808
Bram Moolenaar <bram@vim.org>
parents: 6933
diff changeset
310 if (!(nLength == -1 || nLength == -2) && ++s_dwIndex >= s_dwMax)
5580
6fdb1d6646b6 updated for version 7.4.137
Bram Moolenaar <bram@vim.org>
parents: 5578
diff changeset
311 s_dwMax = 0;
5590
735b70faac4a updated for version 7.4.142
Bram Moolenaar <bram@vim.org>
parents: 5588
diff changeset
312 *lpEvents = 1;
5580
6fdb1d6646b6 updated for version 7.4.137
Bram Moolenaar <bram@vim.org>
parents: 5578
diff changeset
313 return TRUE;
6fdb1d6646b6 updated for version 7.4.137
Bram Moolenaar <bram@vim.org>
parents: 5578
diff changeset
314 }
6fdb1d6646b6 updated for version 7.4.137
Bram Moolenaar <bram@vim.org>
parents: 5578
diff changeset
315
6fdb1d6646b6 updated for version 7.4.137
Bram Moolenaar <bram@vim.org>
parents: 5578
diff changeset
316 /*
6fdb1d6646b6 updated for version 7.4.137
Bram Moolenaar <bram@vim.org>
parents: 5578
diff changeset
317 * Version of PeekConsoleInput() that works with IME.
6fdb1d6646b6 updated for version 7.4.137
Bram Moolenaar <bram@vim.org>
parents: 5578
diff changeset
318 */
6fdb1d6646b6 updated for version 7.4.137
Bram Moolenaar <bram@vim.org>
parents: 5578
diff changeset
319 static BOOL
6fdb1d6646b6 updated for version 7.4.137
Bram Moolenaar <bram@vim.org>
parents: 5578
diff changeset
320 peek_console_input(
5590
735b70faac4a updated for version 7.4.142
Bram Moolenaar <bram@vim.org>
parents: 5588
diff changeset
321 HANDLE hInput,
735b70faac4a updated for version 7.4.142
Bram Moolenaar <bram@vim.org>
parents: 5588
diff changeset
322 INPUT_RECORD *lpBuffer,
735b70faac4a updated for version 7.4.142
Bram Moolenaar <bram@vim.org>
parents: 5588
diff changeset
323 DWORD nLength,
735b70faac4a updated for version 7.4.142
Bram Moolenaar <bram@vim.org>
parents: 5588
diff changeset
324 LPDWORD lpEvents)
5580
6fdb1d6646b6 updated for version 7.4.137
Bram Moolenaar <bram@vim.org>
parents: 5578
diff changeset
325 {
5590
735b70faac4a updated for version 7.4.142
Bram Moolenaar <bram@vim.org>
parents: 5588
diff changeset
326 return read_console_input(hInput, lpBuffer, -1, lpEvents);
5580
6fdb1d6646b6 updated for version 7.4.137
Bram Moolenaar <bram@vim.org>
parents: 5578
diff changeset
327 }
6fdb1d6646b6 updated for version 7.4.137
Bram Moolenaar <bram@vim.org>
parents: 5578
diff changeset
328
6981
f77d1f32c357 patch 7.4.808
Bram Moolenaar <bram@vim.org>
parents: 6933
diff changeset
329 static DWORD
f77d1f32c357 patch 7.4.808
Bram Moolenaar <bram@vim.org>
parents: 6933
diff changeset
330 msg_wait_for_multiple_objects(
f77d1f32c357 patch 7.4.808
Bram Moolenaar <bram@vim.org>
parents: 6933
diff changeset
331 DWORD nCount,
f77d1f32c357 patch 7.4.808
Bram Moolenaar <bram@vim.org>
parents: 6933
diff changeset
332 LPHANDLE pHandles,
f77d1f32c357 patch 7.4.808
Bram Moolenaar <bram@vim.org>
parents: 6933
diff changeset
333 BOOL fWaitAll,
f77d1f32c357 patch 7.4.808
Bram Moolenaar <bram@vim.org>
parents: 6933
diff changeset
334 DWORD dwMilliseconds,
f77d1f32c357 patch 7.4.808
Bram Moolenaar <bram@vim.org>
parents: 6933
diff changeset
335 DWORD dwWakeMask)
f77d1f32c357 patch 7.4.808
Bram Moolenaar <bram@vim.org>
parents: 6933
diff changeset
336 {
f77d1f32c357 patch 7.4.808
Bram Moolenaar <bram@vim.org>
parents: 6933
diff changeset
337 if (read_console_input(NULL, NULL, -2, NULL))
f77d1f32c357 patch 7.4.808
Bram Moolenaar <bram@vim.org>
parents: 6933
diff changeset
338 return WAIT_OBJECT_0;
f77d1f32c357 patch 7.4.808
Bram Moolenaar <bram@vim.org>
parents: 6933
diff changeset
339 return MsgWaitForMultipleObjects(nCount, pHandles, fWaitAll,
f77d1f32c357 patch 7.4.808
Bram Moolenaar <bram@vim.org>
parents: 6933
diff changeset
340 dwMilliseconds, dwWakeMask);
f77d1f32c357 patch 7.4.808
Bram Moolenaar <bram@vim.org>
parents: 6933
diff changeset
341 }
f77d1f32c357 patch 7.4.808
Bram Moolenaar <bram@vim.org>
parents: 6933
diff changeset
342
f77d1f32c357 patch 7.4.808
Bram Moolenaar <bram@vim.org>
parents: 6933
diff changeset
343 static DWORD
f77d1f32c357 patch 7.4.808
Bram Moolenaar <bram@vim.org>
parents: 6933
diff changeset
344 wait_for_single_object(
f77d1f32c357 patch 7.4.808
Bram Moolenaar <bram@vim.org>
parents: 6933
diff changeset
345 HANDLE hHandle,
f77d1f32c357 patch 7.4.808
Bram Moolenaar <bram@vim.org>
parents: 6933
diff changeset
346 DWORD dwMilliseconds)
f77d1f32c357 patch 7.4.808
Bram Moolenaar <bram@vim.org>
parents: 6933
diff changeset
347 {
f77d1f32c357 patch 7.4.808
Bram Moolenaar <bram@vim.org>
parents: 6933
diff changeset
348 if (read_console_input(NULL, NULL, -2, NULL))
f77d1f32c357 patch 7.4.808
Bram Moolenaar <bram@vim.org>
parents: 6933
diff changeset
349 return WAIT_OBJECT_0;
f77d1f32c357 patch 7.4.808
Bram Moolenaar <bram@vim.org>
parents: 6933
diff changeset
350 return WaitForSingleObject(hHandle, dwMilliseconds);
f77d1f32c357 patch 7.4.808
Bram Moolenaar <bram@vim.org>
parents: 6933
diff changeset
351 }
f77d1f32c357 patch 7.4.808
Bram Moolenaar <bram@vim.org>
parents: 6933
diff changeset
352
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
353 static void
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
354 get_exe_name(void)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
355 {
2630
0de47f0d731e updated for version 7.3.051
Bram Moolenaar <bram@vim.org>
parents: 2615
diff changeset
356 /* Maximum length of $PATH is more than MAXPATHL. 8191 is often mentioned
0de47f0d731e updated for version 7.3.051
Bram Moolenaar <bram@vim.org>
parents: 2615
diff changeset
357 * as the maximum length that works (plus a NUL byte). */
0de47f0d731e updated for version 7.3.051
Bram Moolenaar <bram@vim.org>
parents: 2615
diff changeset
358 #define MAX_ENV_PATH_LEN 8192
0de47f0d731e updated for version 7.3.051
Bram Moolenaar <bram@vim.org>
parents: 2615
diff changeset
359 char temp[MAX_ENV_PATH_LEN];
2612
fa5dee44df3f updated for version 7.3.034
Bram Moolenaar <bram@vim.org>
parents: 2604
diff changeset
360 char_u *p;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
361
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
362 if (exe_name == NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
363 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
364 /* store the name of the executable, may be used for $VIM */
2630
0de47f0d731e updated for version 7.3.051
Bram Moolenaar <bram@vim.org>
parents: 2615
diff changeset
365 GetModuleFileName(NULL, temp, MAX_ENV_PATH_LEN - 1);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
366 if (*temp != NUL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
367 exe_name = FullName_save((char_u *)temp, FALSE);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
368 }
819
23f82b5d2814 updated for version 7.0c10
vimboss
parents: 797
diff changeset
369
2612
fa5dee44df3f updated for version 7.3.034
Bram Moolenaar <bram@vim.org>
parents: 2604
diff changeset
370 if (exe_path == NULL && exe_name != NULL)
819
23f82b5d2814 updated for version 7.0c10
vimboss
parents: 797
diff changeset
371 {
2615
c6fe65c000d2 updated for version 7.3.037
Bram Moolenaar <bram@vim.org>
parents: 2613
diff changeset
372 exe_path = vim_strnsave(exe_name,
c6fe65c000d2 updated for version 7.3.037
Bram Moolenaar <bram@vim.org>
parents: 2613
diff changeset
373 (int)(gettail_sep(exe_name) - exe_name));
2612
fa5dee44df3f updated for version 7.3.034
Bram Moolenaar <bram@vim.org>
parents: 2604
diff changeset
374 if (exe_path != NULL)
819
23f82b5d2814 updated for version 7.0c10
vimboss
parents: 797
diff changeset
375 {
2612
fa5dee44df3f updated for version 7.3.034
Bram Moolenaar <bram@vim.org>
parents: 2604
diff changeset
376 /* Append our starting directory to $PATH, so that when doing
fa5dee44df3f updated for version 7.3.034
Bram Moolenaar <bram@vim.org>
parents: 2604
diff changeset
377 * "!xxd" it's found in our starting directory. Needed because
fa5dee44df3f updated for version 7.3.034
Bram Moolenaar <bram@vim.org>
parents: 2604
diff changeset
378 * SearchPath() also looks there. */
fa5dee44df3f updated for version 7.3.034
Bram Moolenaar <bram@vim.org>
parents: 2604
diff changeset
379 p = mch_getenv("PATH");
2630
0de47f0d731e updated for version 7.3.051
Bram Moolenaar <bram@vim.org>
parents: 2615
diff changeset
380 if (p == NULL
0de47f0d731e updated for version 7.3.051
Bram Moolenaar <bram@vim.org>
parents: 2615
diff changeset
381 || STRLEN(p) + STRLEN(exe_path) + 2 < MAX_ENV_PATH_LEN)
2612
fa5dee44df3f updated for version 7.3.034
Bram Moolenaar <bram@vim.org>
parents: 2604
diff changeset
382 {
2630
0de47f0d731e updated for version 7.3.051
Bram Moolenaar <bram@vim.org>
parents: 2615
diff changeset
383 if (p == NULL || *p == NUL)
0de47f0d731e updated for version 7.3.051
Bram Moolenaar <bram@vim.org>
parents: 2615
diff changeset
384 temp[0] = NUL;
0de47f0d731e updated for version 7.3.051
Bram Moolenaar <bram@vim.org>
parents: 2615
diff changeset
385 else
0de47f0d731e updated for version 7.3.051
Bram Moolenaar <bram@vim.org>
parents: 2615
diff changeset
386 {
0de47f0d731e updated for version 7.3.051
Bram Moolenaar <bram@vim.org>
parents: 2615
diff changeset
387 STRCPY(temp, p);
0de47f0d731e updated for version 7.3.051
Bram Moolenaar <bram@vim.org>
parents: 2615
diff changeset
388 STRCAT(temp, ";");
0de47f0d731e updated for version 7.3.051
Bram Moolenaar <bram@vim.org>
parents: 2615
diff changeset
389 }
2612
fa5dee44df3f updated for version 7.3.034
Bram Moolenaar <bram@vim.org>
parents: 2604
diff changeset
390 STRCAT(temp, exe_path);
fa5dee44df3f updated for version 7.3.034
Bram Moolenaar <bram@vim.org>
parents: 2604
diff changeset
391 vim_setenv((char_u *)"PATH", temp);
fa5dee44df3f updated for version 7.3.034
Bram Moolenaar <bram@vim.org>
parents: 2604
diff changeset
392 }
819
23f82b5d2814 updated for version 7.0c10
vimboss
parents: 797
diff changeset
393 }
23f82b5d2814 updated for version 7.0c10
vimboss
parents: 797
diff changeset
394 }
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
395 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
396
2612
fa5dee44df3f updated for version 7.3.034
Bram Moolenaar <bram@vim.org>
parents: 2604
diff changeset
397 /*
3361
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
398 * Unescape characters in "p" that appear in "escaped".
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
399 */
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
400 static void
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
401 unescape_shellxquote(char_u *p, char_u *escaped)
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
402 {
3386
cb2ae92ce106 updated for version 7.3.459
Bram Moolenaar <bram@vim.org>
parents: 3367
diff changeset
403 int l = (int)STRLEN(p);
3361
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
404 int n;
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
405
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
406 while (*p != NUL)
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
407 {
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
408 if (*p == '^' && vim_strchr(escaped, p[1]) != NULL)
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
409 mch_memmove(p, p + 1, l--);
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
410 #ifdef FEAT_MBYTE
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
411 n = (*mb_ptr2len)(p);
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
412 #else
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
413 n = 1;
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
414 #endif
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
415 p += n;
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
416 l -= n;
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
417 }
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
418 }
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
419
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
420 /*
2612
fa5dee44df3f updated for version 7.3.034
Bram Moolenaar <bram@vim.org>
parents: 2604
diff changeset
421 * Load library "name".
fa5dee44df3f updated for version 7.3.034
Bram Moolenaar <bram@vim.org>
parents: 2604
diff changeset
422 */
fa5dee44df3f updated for version 7.3.034
Bram Moolenaar <bram@vim.org>
parents: 2604
diff changeset
423 HINSTANCE
fa5dee44df3f updated for version 7.3.034
Bram Moolenaar <bram@vim.org>
parents: 2604
diff changeset
424 vimLoadLib(char *name)
fa5dee44df3f updated for version 7.3.034
Bram Moolenaar <bram@vim.org>
parents: 2604
diff changeset
425 {
3902
d24d309c365f updated for version 7.3.707
Bram Moolenaar <bram@vim.org>
parents: 3889
diff changeset
426 HINSTANCE dll = NULL;
d24d309c365f updated for version 7.3.707
Bram Moolenaar <bram@vim.org>
parents: 3889
diff changeset
427 char old_dir[MAXPATHL];
3889
48af86560945 updated for version 7.3.701
Bram Moolenaar <bram@vim.org>
parents: 3720
diff changeset
428
48af86560945 updated for version 7.3.701
Bram Moolenaar <bram@vim.org>
parents: 3720
diff changeset
429 /* NOTE: Do not use mch_dirname() and mch_chdir() here, they may call
48af86560945 updated for version 7.3.701
Bram Moolenaar <bram@vim.org>
parents: 3720
diff changeset
430 * vimLoadLib() recursively, which causes a stack overflow. */
2612
fa5dee44df3f updated for version 7.3.034
Bram Moolenaar <bram@vim.org>
parents: 2604
diff changeset
431 if (exe_path == NULL)
fa5dee44df3f updated for version 7.3.034
Bram Moolenaar <bram@vim.org>
parents: 2604
diff changeset
432 get_exe_name();
3902
d24d309c365f updated for version 7.3.707
Bram Moolenaar <bram@vim.org>
parents: 3889
diff changeset
433 if (exe_path != NULL)
2612
fa5dee44df3f updated for version 7.3.034
Bram Moolenaar <bram@vim.org>
parents: 2604
diff changeset
434 {
3902
d24d309c365f updated for version 7.3.707
Bram Moolenaar <bram@vim.org>
parents: 3889
diff changeset
435 #ifdef FEAT_MBYTE
d24d309c365f updated for version 7.3.707
Bram Moolenaar <bram@vim.org>
parents: 3889
diff changeset
436 WCHAR old_dirw[MAXPATHL];
d24d309c365f updated for version 7.3.707
Bram Moolenaar <bram@vim.org>
parents: 3889
diff changeset
437
d24d309c365f updated for version 7.3.707
Bram Moolenaar <bram@vim.org>
parents: 3889
diff changeset
438 if (GetCurrentDirectoryW(MAXPATHL, old_dirw) != 0)
d24d309c365f updated for version 7.3.707
Bram Moolenaar <bram@vim.org>
parents: 3889
diff changeset
439 {
d24d309c365f updated for version 7.3.707
Bram Moolenaar <bram@vim.org>
parents: 3889
diff changeset
440 /* Change directory to where the executable is, both to make
d24d309c365f updated for version 7.3.707
Bram Moolenaar <bram@vim.org>
parents: 3889
diff changeset
441 * sure we find a .dll there and to avoid looking for a .dll
d24d309c365f updated for version 7.3.707
Bram Moolenaar <bram@vim.org>
parents: 3889
diff changeset
442 * in the current directory. */
d24d309c365f updated for version 7.3.707
Bram Moolenaar <bram@vim.org>
parents: 3889
diff changeset
443 SetCurrentDirectory(exe_path);
d24d309c365f updated for version 7.3.707
Bram Moolenaar <bram@vim.org>
parents: 3889
diff changeset
444 dll = LoadLibrary(name);
d24d309c365f updated for version 7.3.707
Bram Moolenaar <bram@vim.org>
parents: 3889
diff changeset
445 SetCurrentDirectoryW(old_dirw);
d24d309c365f updated for version 7.3.707
Bram Moolenaar <bram@vim.org>
parents: 3889
diff changeset
446 return dll;
d24d309c365f updated for version 7.3.707
Bram Moolenaar <bram@vim.org>
parents: 3889
diff changeset
447 }
d24d309c365f updated for version 7.3.707
Bram Moolenaar <bram@vim.org>
parents: 3889
diff changeset
448 /* Retry with non-wide function (for Windows 98). */
d24d309c365f updated for version 7.3.707
Bram Moolenaar <bram@vim.org>
parents: 3889
diff changeset
449 if (GetLastError() == ERROR_CALL_NOT_IMPLEMENTED)
d24d309c365f updated for version 7.3.707
Bram Moolenaar <bram@vim.org>
parents: 3889
diff changeset
450 #endif
d24d309c365f updated for version 7.3.707
Bram Moolenaar <bram@vim.org>
parents: 3889
diff changeset
451 if (GetCurrentDirectory(MAXPATHL, old_dir) != 0)
d24d309c365f updated for version 7.3.707
Bram Moolenaar <bram@vim.org>
parents: 3889
diff changeset
452 {
d24d309c365f updated for version 7.3.707
Bram Moolenaar <bram@vim.org>
parents: 3889
diff changeset
453 /* Change directory to where the executable is, both to make
d24d309c365f updated for version 7.3.707
Bram Moolenaar <bram@vim.org>
parents: 3889
diff changeset
454 * sure we find a .dll there and to avoid looking for a .dll
d24d309c365f updated for version 7.3.707
Bram Moolenaar <bram@vim.org>
parents: 3889
diff changeset
455 * in the current directory. */
d24d309c365f updated for version 7.3.707
Bram Moolenaar <bram@vim.org>
parents: 3889
diff changeset
456 SetCurrentDirectory(exe_path);
d24d309c365f updated for version 7.3.707
Bram Moolenaar <bram@vim.org>
parents: 3889
diff changeset
457 dll = LoadLibrary(name);
d24d309c365f updated for version 7.3.707
Bram Moolenaar <bram@vim.org>
parents: 3889
diff changeset
458 SetCurrentDirectory(old_dir);
d24d309c365f updated for version 7.3.707
Bram Moolenaar <bram@vim.org>
parents: 3889
diff changeset
459 }
2612
fa5dee44df3f updated for version 7.3.034
Bram Moolenaar <bram@vim.org>
parents: 2604
diff changeset
460 }
fa5dee44df3f updated for version 7.3.034
Bram Moolenaar <bram@vim.org>
parents: 2604
diff changeset
461 return dll;
fa5dee44df3f updated for version 7.3.034
Bram Moolenaar <bram@vim.org>
parents: 2604
diff changeset
462 }
fa5dee44df3f updated for version 7.3.034
Bram Moolenaar <bram@vim.org>
parents: 2604
diff changeset
463
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
464 #if defined(DYNAMIC_GETTEXT) || defined(PROTO)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
465 # ifndef GETTEXT_DLL
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
466 # define GETTEXT_DLL "libintl.dll"
7613
4456fa2d22e8 commit https://github.com/vim/vim/commit/286eacd3f6631e985089176fb1dff1bcf1a1d6b5
Christian Brabandt <cb@256bit.org>
parents: 7460
diff changeset
467 # define GETTEXT_DLL_ALT "libintl-8.dll"
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
468 # endif
3622
43fd3896fab7 updated for version 7.3.571
Bram Moolenaar <bram@vim.org>
parents: 3386
diff changeset
469 /* Dummy functions */
36
125e80798a85 updated for version 7.0021
vimboss
parents: 26
diff changeset
470 static char *null_libintl_gettext(const char *);
125e80798a85 updated for version 7.0021
vimboss
parents: 26
diff changeset
471 static char *null_libintl_textdomain(const char *);
125e80798a85 updated for version 7.0021
vimboss
parents: 26
diff changeset
472 static char *null_libintl_bindtextdomain(const char *, const char *);
125e80798a85 updated for version 7.0021
vimboss
parents: 26
diff changeset
473 static char *null_libintl_bind_textdomain_codeset(const char *, const char *);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
474
2612
fa5dee44df3f updated for version 7.3.034
Bram Moolenaar <bram@vim.org>
parents: 2604
diff changeset
475 static HINSTANCE hLibintlDLL = NULL;
36
125e80798a85 updated for version 7.0021
vimboss
parents: 26
diff changeset
476 char *(*dyn_libintl_gettext)(const char *) = null_libintl_gettext;
125e80798a85 updated for version 7.0021
vimboss
parents: 26
diff changeset
477 char *(*dyn_libintl_textdomain)(const char *) = null_libintl_textdomain;
125e80798a85 updated for version 7.0021
vimboss
parents: 26
diff changeset
478 char *(*dyn_libintl_bindtextdomain)(const char *, const char *)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
479 = null_libintl_bindtextdomain;
36
125e80798a85 updated for version 7.0021
vimboss
parents: 26
diff changeset
480 char *(*dyn_libintl_bind_textdomain_codeset)(const char *, const char *)
125e80798a85 updated for version 7.0021
vimboss
parents: 26
diff changeset
481 = null_libintl_bind_textdomain_codeset;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
482
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
483 int
7833
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f
Christian Brabandt <cb@256bit.org>
parents: 7797
diff changeset
484 dyn_libintl_init(void)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
485 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
486 int i;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
487 static struct
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
488 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
489 char *name;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
490 FARPROC *ptr;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
491 } libintl_entry[] =
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
492 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
493 {"gettext", (FARPROC*)&dyn_libintl_gettext},
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
494 {"textdomain", (FARPROC*)&dyn_libintl_textdomain},
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
495 {"bindtextdomain", (FARPROC*)&dyn_libintl_bindtextdomain},
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
496 {NULL, NULL}
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
497 };
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
498
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
499 /* No need to initialize twice. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
500 if (hLibintlDLL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
501 return 1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
502 /* Load gettext library (libintl.dll) */
7784
29d4ee3f009a commit https://github.com/vim/vim/commit/923e43b837ca4c8edb7998743f142823eaeaf588
Christian Brabandt <cb@256bit.org>
parents: 7734
diff changeset
503 hLibintlDLL = vimLoadLib(GETTEXT_DLL);
7734
616769d423fc commit https://github.com/vim/vim/commit/938ee834d345062cd94f8fdfd54fad0019432a83
Christian Brabandt <cb@256bit.org>
parents: 7668
diff changeset
504 #ifdef GETTEXT_DLL_ALT
7613
4456fa2d22e8 commit https://github.com/vim/vim/commit/286eacd3f6631e985089176fb1dff1bcf1a1d6b5
Christian Brabandt <cb@256bit.org>
parents: 7460
diff changeset
505 if (!hLibintlDLL)
4456fa2d22e8 commit https://github.com/vim/vim/commit/286eacd3f6631e985089176fb1dff1bcf1a1d6b5
Christian Brabandt <cb@256bit.org>
parents: 7460
diff changeset
506 hLibintlDLL = vimLoadLib(GETTEXT_DLL_ALT);
7734
616769d423fc commit https://github.com/vim/vim/commit/938ee834d345062cd94f8fdfd54fad0019432a83
Christian Brabandt <cb@256bit.org>
parents: 7668
diff changeset
507 #endif
616769d423fc commit https://github.com/vim/vim/commit/938ee834d345062cd94f8fdfd54fad0019432a83
Christian Brabandt <cb@256bit.org>
parents: 7668
diff changeset
508 if (!hLibintlDLL)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
509 {
2612
fa5dee44df3f updated for version 7.3.034
Bram Moolenaar <bram@vim.org>
parents: 2604
diff changeset
510 if (p_verbose > 0)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
511 {
2612
fa5dee44df3f updated for version 7.3.034
Bram Moolenaar <bram@vim.org>
parents: 2604
diff changeset
512 verbose_enter();
fa5dee44df3f updated for version 7.3.034
Bram Moolenaar <bram@vim.org>
parents: 2604
diff changeset
513 EMSG2(_(e_loadlib), GETTEXT_DLL);
fa5dee44df3f updated for version 7.3.034
Bram Moolenaar <bram@vim.org>
parents: 2604
diff changeset
514 verbose_leave();
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
515 }
2612
fa5dee44df3f updated for version 7.3.034
Bram Moolenaar <bram@vim.org>
parents: 2604
diff changeset
516 return 0;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
517 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
518 for (i = 0; libintl_entry[i].name != NULL
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
519 && libintl_entry[i].ptr != NULL; ++i)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
520 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
521 if ((*libintl_entry[i].ptr = (FARPROC)GetProcAddress(hLibintlDLL,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
522 libintl_entry[i].name)) == NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
523 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
524 dyn_libintl_end();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
525 if (p_verbose > 0)
292
bf6ee000a80c updated for version 7.0077
vimboss
parents: 203
diff changeset
526 {
bf6ee000a80c updated for version 7.0077
vimboss
parents: 203
diff changeset
527 verbose_enter();
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
528 EMSG2(_(e_loadfunc), libintl_entry[i].name);
292
bf6ee000a80c updated for version 7.0077
vimboss
parents: 203
diff changeset
529 verbose_leave();
bf6ee000a80c updated for version 7.0077
vimboss
parents: 203
diff changeset
530 }
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
531 return 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
532 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
533 }
36
125e80798a85 updated for version 7.0021
vimboss
parents: 26
diff changeset
534
125e80798a85 updated for version 7.0021
vimboss
parents: 26
diff changeset
535 /* The bind_textdomain_codeset() function is optional. */
323
03b3684919e3 updated for version 7.0084
vimboss
parents: 297
diff changeset
536 dyn_libintl_bind_textdomain_codeset = (void *)GetProcAddress(hLibintlDLL,
36
125e80798a85 updated for version 7.0021
vimboss
parents: 26
diff changeset
537 "bind_textdomain_codeset");
125e80798a85 updated for version 7.0021
vimboss
parents: 26
diff changeset
538 if (dyn_libintl_bind_textdomain_codeset == NULL)
125e80798a85 updated for version 7.0021
vimboss
parents: 26
diff changeset
539 dyn_libintl_bind_textdomain_codeset =
125e80798a85 updated for version 7.0021
vimboss
parents: 26
diff changeset
540 null_libintl_bind_textdomain_codeset;
125e80798a85 updated for version 7.0021
vimboss
parents: 26
diff changeset
541
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
542 return 1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
543 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
544
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
545 void
7833
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f
Christian Brabandt <cb@256bit.org>
parents: 7797
diff changeset
546 dyn_libintl_end(void)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
547 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
548 if (hLibintlDLL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
549 FreeLibrary(hLibintlDLL);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
550 hLibintlDLL = NULL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
551 dyn_libintl_gettext = null_libintl_gettext;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
552 dyn_libintl_textdomain = null_libintl_textdomain;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
553 dyn_libintl_bindtextdomain = null_libintl_bindtextdomain;
36
125e80798a85 updated for version 7.0021
vimboss
parents: 26
diff changeset
554 dyn_libintl_bind_textdomain_codeset = null_libintl_bind_textdomain_codeset;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
555 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
556
323
03b3684919e3 updated for version 7.0084
vimboss
parents: 297
diff changeset
557 /*ARGSUSED*/
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
558 static char *
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
559 null_libintl_gettext(const char *msgid)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
560 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
561 return (char*)msgid;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
562 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
563
323
03b3684919e3 updated for version 7.0084
vimboss
parents: 297
diff changeset
564 /*ARGSUSED*/
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
565 static char *
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
566 null_libintl_bindtextdomain(const char *domainname, const char *dirname)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
567 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
568 return NULL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
569 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
570
323
03b3684919e3 updated for version 7.0084
vimboss
parents: 297
diff changeset
571 /*ARGSUSED*/
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
572 static char *
36
125e80798a85 updated for version 7.0021
vimboss
parents: 26
diff changeset
573 null_libintl_bind_textdomain_codeset(const char *domainname,
125e80798a85 updated for version 7.0021
vimboss
parents: 26
diff changeset
574 const char *codeset)
125e80798a85 updated for version 7.0021
vimboss
parents: 26
diff changeset
575 {
125e80798a85 updated for version 7.0021
vimboss
parents: 26
diff changeset
576 return NULL;
125e80798a85 updated for version 7.0021
vimboss
parents: 26
diff changeset
577 }
125e80798a85 updated for version 7.0021
vimboss
parents: 26
diff changeset
578
323
03b3684919e3 updated for version 7.0084
vimboss
parents: 297
diff changeset
579 /*ARGSUSED*/
36
125e80798a85 updated for version 7.0021
vimboss
parents: 26
diff changeset
580 static char *
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
581 null_libintl_textdomain(const char *domainname)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
582 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
583 return NULL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
584 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
585
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
586 #endif /* DYNAMIC_GETTEXT */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
587
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
588 /* This symbol is not defined in older versions of the SDK or Visual C++ */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
589
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
590 #ifndef VER_PLATFORM_WIN32_WINDOWS
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
591 # define VER_PLATFORM_WIN32_WINDOWS 1
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
592 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
593
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
594 DWORD g_PlatformId;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
595
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
596 #ifdef HAVE_ACL
3927
e6d8b44065bc updated for version 7.3.719
Bram Moolenaar <bram@vim.org>
parents: 3902
diff changeset
597 # ifndef PROTO
e6d8b44065bc updated for version 7.3.719
Bram Moolenaar <bram@vim.org>
parents: 3902
diff changeset
598 # include <aclapi.h>
e6d8b44065bc updated for version 7.3.719
Bram Moolenaar <bram@vim.org>
parents: 3902
diff changeset
599 # endif
5047
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
600 # ifndef PROTECTED_DACL_SECURITY_INFORMATION
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
601 # define PROTECTED_DACL_SECURITY_INFORMATION 0x80000000L
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
602 # endif
3927
e6d8b44065bc updated for version 7.3.719
Bram Moolenaar <bram@vim.org>
parents: 3902
diff changeset
603
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
604 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
605 * These are needed to dynamically load the ADVAPI DLL, which is not
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
606 * implemented under Windows 95 (and causes VIM to crash)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
607 */
5049
72fcf674e545 updated for version 7.3.1268
Bram Moolenaar <bram@vim.org>
parents: 5047
diff changeset
608 typedef DWORD (WINAPI *PSNSECINFO) (LPSTR, SE_OBJECT_TYPE,
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
609 SECURITY_INFORMATION, PSID, PSID, PACL, PACL);
5049
72fcf674e545 updated for version 7.3.1268
Bram Moolenaar <bram@vim.org>
parents: 5047
diff changeset
610 typedef DWORD (WINAPI *PGNSECINFO) (LPSTR, SE_OBJECT_TYPE,
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
611 SECURITY_INFORMATION, PSID *, PSID *, PACL *, PACL *,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
612 PSECURITY_DESCRIPTOR *);
5047
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
613 # ifdef FEAT_MBYTE
5049
72fcf674e545 updated for version 7.3.1268
Bram Moolenaar <bram@vim.org>
parents: 5047
diff changeset
614 typedef DWORD (WINAPI *PSNSECINFOW) (LPWSTR, SE_OBJECT_TYPE,
5047
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
615 SECURITY_INFORMATION, PSID, PSID, PACL, PACL);
5049
72fcf674e545 updated for version 7.3.1268
Bram Moolenaar <bram@vim.org>
parents: 5047
diff changeset
616 typedef DWORD (WINAPI *PGNSECINFOW) (LPWSTR, SE_OBJECT_TYPE,
5047
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
617 SECURITY_INFORMATION, PSID *, PSID *, PACL *, PACL *,
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
618 PSECURITY_DESCRIPTOR *);
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
619 # endif
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
620
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
621 static HANDLE advapi_lib = NULL; /* Handle for ADVAPI library */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
622 static PSNSECINFO pSetNamedSecurityInfo;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
623 static PGNSECINFO pGetNamedSecurityInfo;
5047
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
624 # ifdef FEAT_MBYTE
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
625 static PSNSECINFOW pSetNamedSecurityInfoW;
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
626 static PGNSECINFOW pGetNamedSecurityInfoW;
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
627 # endif
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
628 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
629
2935
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
630 typedef BOOL (WINAPI *PSETHANDLEINFORMATION)(HANDLE, DWORD, DWORD);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
631
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
632 static BOOL allowPiping = FALSE;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
633 static PSETHANDLEINFORMATION pSetHandleInformation;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
634
5047
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
635 #ifdef HAVE_ACL
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
636 /*
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
637 * Enables or disables the specified privilege.
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
638 */
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
639 static BOOL
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
640 win32_enable_privilege(LPTSTR lpszPrivilege, BOOL bEnable)
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
641 {
5590
735b70faac4a updated for version 7.4.142
Bram Moolenaar <bram@vim.org>
parents: 5588
diff changeset
642 BOOL bResult;
735b70faac4a updated for version 7.4.142
Bram Moolenaar <bram@vim.org>
parents: 5588
diff changeset
643 LUID luid;
735b70faac4a updated for version 7.4.142
Bram Moolenaar <bram@vim.org>
parents: 5588
diff changeset
644 HANDLE hToken;
735b70faac4a updated for version 7.4.142
Bram Moolenaar <bram@vim.org>
parents: 5588
diff changeset
645 TOKEN_PRIVILEGES tokenPrivileges;
5047
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
646
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
647 if (!OpenProcessToken(GetCurrentProcess(),
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
648 TOKEN_ADJUST_PRIVILEGES | TOKEN_QUERY, &hToken))
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
649 return FALSE;
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
650
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
651 if (!LookupPrivilegeValue(NULL, lpszPrivilege, &luid))
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
652 {
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
653 CloseHandle(hToken);
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
654 return FALSE;
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
655 }
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
656
6047
ff3816167b73 updated for version 7.4.363
Bram Moolenaar <bram@vim.org>
parents: 5782
diff changeset
657 tokenPrivileges.PrivilegeCount = 1;
5047
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
658 tokenPrivileges.Privileges[0].Luid = luid;
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
659 tokenPrivileges.Privileges[0].Attributes = bEnable ?
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
660 SE_PRIVILEGE_ENABLED : 0;
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
661
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
662 bResult = AdjustTokenPrivileges(hToken, FALSE, &tokenPrivileges,
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
663 sizeof(TOKEN_PRIVILEGES), NULL, NULL);
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
664
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
665 CloseHandle(hToken);
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
666
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
667 return bResult && GetLastError() == ERROR_SUCCESS;
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
668 }
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
669 #endif
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
670
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
671 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
672 * Set g_PlatformId to VER_PLATFORM_WIN32_NT (NT) or
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
673 * VER_PLATFORM_WIN32_WINDOWS (Win95).
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
674 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
675 void
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
676 PlatformId(void)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
677 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
678 static int done = FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
679
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
680 if (!done)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
681 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
682 OSVERSIONINFO ovi;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
683
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
684 ovi.dwOSVersionInfoSize = sizeof(ovi);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
685 GetVersionEx(&ovi);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
686
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
687 g_PlatformId = ovi.dwPlatformId;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
688
5633
7db84aadd37a updated for version 7.4.163
Bram Moolenaar <bram@vim.org>
parents: 5627
diff changeset
689 if ((ovi.dwMajorVersion == 6 && ovi.dwMinorVersion >= 2)
7db84aadd37a updated for version 7.4.163
Bram Moolenaar <bram@vim.org>
parents: 5627
diff changeset
690 || ovi.dwMajorVersion > 6)
7db84aadd37a updated for version 7.4.163
Bram Moolenaar <bram@vim.org>
parents: 5627
diff changeset
691 win8_or_later = TRUE;
7db84aadd37a updated for version 7.4.163
Bram Moolenaar <bram@vim.org>
parents: 5627
diff changeset
692
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
693 #ifdef HAVE_ACL
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
694 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
695 * Load the ADVAPI runtime if we are on anything
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
696 * other than Windows 95
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
697 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
698 if (g_PlatformId == VER_PLATFORM_WIN32_NT)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
699 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
700 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
701 * do this load. Problems: Doesn't unload at end of run (this is
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
702 * theoretically okay, since Windows should unload it when VIM
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
703 * terminates). Should we be using the 'mch_libcall' routines?
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
704 * Seems like a lot of overhead to load/unload ADVAPI32.DLL each
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
705 * time we verify security...
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
706 */
2612
fa5dee44df3f updated for version 7.3.034
Bram Moolenaar <bram@vim.org>
parents: 2604
diff changeset
707 advapi_lib = vimLoadLib("ADVAPI32.DLL");
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
708 if (advapi_lib != NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
709 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
710 pSetNamedSecurityInfo = (PSNSECINFO)GetProcAddress(advapi_lib,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
711 "SetNamedSecurityInfoA");
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
712 pGetNamedSecurityInfo = (PGNSECINFO)GetProcAddress(advapi_lib,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
713 "GetNamedSecurityInfoA");
5047
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
714 # ifdef FEAT_MBYTE
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
715 pSetNamedSecurityInfoW = (PSNSECINFOW)GetProcAddress(advapi_lib,
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
716 "SetNamedSecurityInfoW");
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
717 pGetNamedSecurityInfoW = (PGNSECINFOW)GetProcAddress(advapi_lib,
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
718 "GetNamedSecurityInfoW");
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
719 # endif
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
720 if (pSetNamedSecurityInfo == NULL
5047
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
721 || pGetNamedSecurityInfo == NULL
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
722 # ifdef FEAT_MBYTE
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
723 || pSetNamedSecurityInfoW == NULL
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
724 || pGetNamedSecurityInfoW == NULL
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
725 # endif
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
726 )
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
727 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
728 /* If we can't get the function addresses, set advapi_lib
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
729 * to NULL so that we don't use them. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
730 FreeLibrary(advapi_lib);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
731 advapi_lib = NULL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
732 }
5047
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
733 /* Enable privilege for getting or setting SACLs. */
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
734 win32_enable_privilege(SE_SECURITY_NAME, TRUE);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
735 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
736 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
737 #endif
2935
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
738 /*
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
739 * If we are on windows NT, try to load the pipe functions, only
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
740 * available from Win2K.
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
741 */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
742 if (g_PlatformId == VER_PLATFORM_WIN32_NT)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
743 {
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
744 HANDLE kernel32 = GetModuleHandle("kernel32");
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
745 pSetHandleInformation = (PSETHANDLEINFORMATION)GetProcAddress(
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
746 kernel32, "SetHandleInformation");
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
747
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
748 allowPiping = pSetHandleInformation != NULL;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
749 }
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
750 done = TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
751 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
752 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
753
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
754 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
755 * Return TRUE when running on Windows 95 (or 98 or ME).
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
756 * Only to be used after mch_init().
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
757 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
758 int
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
759 mch_windows95(void)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
760 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
761 return g_PlatformId == VER_PLATFORM_WIN32_WINDOWS;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
762 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
763
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
764 #ifdef FEAT_GUI_W32
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
765 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
766 * Used to work around the "can't do synchronous spawn"
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
767 * problem on Win32s, without resorting to Universal Thunk.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
768 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
769 static int old_num_windows;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
770 static int num_windows;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
771
323
03b3684919e3 updated for version 7.0084
vimboss
parents: 297
diff changeset
772 /*ARGSUSED*/
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
773 static BOOL CALLBACK
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
774 win32ssynch_cb(HWND hwnd, LPARAM lparam)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
775 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
776 num_windows++;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
777 return TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
778 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
779 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
780
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
781 #ifndef FEAT_GUI_W32
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
782
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
783 #define SHIFT (SHIFT_PRESSED)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
784 #define CTRL (RIGHT_CTRL_PRESSED | LEFT_CTRL_PRESSED)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
785 #define ALT (RIGHT_ALT_PRESSED | LEFT_ALT_PRESSED)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
786 #define ALT_GR (RIGHT_ALT_PRESSED | LEFT_CTRL_PRESSED)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
787
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
788
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
789 /* When uChar.AsciiChar is 0, then we need to look at wVirtualKeyCode.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
790 * We map function keys to their ANSI terminal equivalents, as produced
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
791 * by ANSI.SYS, for compatibility with the MS-DOS version of Vim. Any
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
792 * ANSI key with a value >= '\300' is nonstandard, but provided anyway
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
793 * so that the user can have access to all SHIFT-, CTRL-, and ALT-
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
794 * combinations of function/arrow/etc keys.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
795 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
796
297
9a1c2a8186b7 updated for version 7.0078
vimboss
parents: 292
diff changeset
797 static const struct
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
798 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
799 WORD wVirtKey;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
800 BOOL fAnsiKey;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
801 int chAlone;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
802 int chShift;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
803 int chCtrl;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
804 int chAlt;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
805 } VirtKeyMap[] =
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
806 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
807
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
808 /* Key ANSI alone shift ctrl alt */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
809 { VK_ESCAPE,FALSE, ESC, ESC, ESC, ESC, },
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
810
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
811 { VK_F1, TRUE, ';', 'T', '^', 'h', },
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
812 { VK_F2, TRUE, '<', 'U', '_', 'i', },
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
813 { VK_F3, TRUE, '=', 'V', '`', 'j', },
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
814 { VK_F4, TRUE, '>', 'W', 'a', 'k', },
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
815 { VK_F5, TRUE, '?', 'X', 'b', 'l', },
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
816 { VK_F6, TRUE, '@', 'Y', 'c', 'm', },
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
817 { VK_F7, TRUE, 'A', 'Z', 'd', 'n', },
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
818 { VK_F8, TRUE, 'B', '[', 'e', 'o', },
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
819 { VK_F9, TRUE, 'C', '\\', 'f', 'p', },
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
820 { VK_F10, TRUE, 'D', ']', 'g', 'q', },
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
821 { VK_F11, TRUE, '\205', '\207', '\211', '\213', },
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
822 { VK_F12, TRUE, '\206', '\210', '\212', '\214', },
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
823
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
824 { VK_HOME, TRUE, 'G', '\302', 'w', '\303', },
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
825 { VK_UP, TRUE, 'H', '\304', '\305', '\306', },
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
826 { VK_PRIOR, TRUE, 'I', '\307', '\204', '\310', }, /*PgUp*/
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
827 { VK_LEFT, TRUE, 'K', '\311', 's', '\312', },
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
828 { VK_RIGHT, TRUE, 'M', '\313', 't', '\314', },
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
829 { VK_END, TRUE, 'O', '\315', 'u', '\316', },
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
830 { VK_DOWN, TRUE, 'P', '\317', '\320', '\321', },
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
831 { VK_NEXT, TRUE, 'Q', '\322', 'v', '\323', }, /*PgDn*/
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
832 { VK_INSERT,TRUE, 'R', '\324', '\325', '\326', },
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
833 { VK_DELETE,TRUE, 'S', '\327', '\330', '\331', },
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
834
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
835 { VK_SNAPSHOT,TRUE, 0, 0, 0, 'r', }, /*PrtScrn*/
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
836
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
837 #if 0
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
838 /* Most people don't have F13-F20, but what the hell... */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
839 { VK_F13, TRUE, '\332', '\333', '\334', '\335', },
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
840 { VK_F14, TRUE, '\336', '\337', '\340', '\341', },
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
841 { VK_F15, TRUE, '\342', '\343', '\344', '\345', },
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
842 { VK_F16, TRUE, '\346', '\347', '\350', '\351', },
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
843 { VK_F17, TRUE, '\352', '\353', '\354', '\355', },
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
844 { VK_F18, TRUE, '\356', '\357', '\360', '\361', },
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
845 { VK_F19, TRUE, '\362', '\363', '\364', '\365', },
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
846 { VK_F20, TRUE, '\366', '\367', '\370', '\371', },
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
847 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
848 { VK_ADD, TRUE, 'N', 'N', 'N', 'N', }, /* keyp '+' */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
849 { VK_SUBTRACT, TRUE,'J', 'J', 'J', 'J', }, /* keyp '-' */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
850 /* { VK_DIVIDE, TRUE,'N', 'N', 'N', 'N', }, keyp '/' */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
851 { VK_MULTIPLY, TRUE,'7', '7', '7', '7', }, /* keyp '*' */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
852
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
853 { VK_NUMPAD0,TRUE, '\332', '\333', '\334', '\335', },
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
854 { VK_NUMPAD1,TRUE, '\336', '\337', '\340', '\341', },
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
855 { VK_NUMPAD2,TRUE, '\342', '\343', '\344', '\345', },
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
856 { VK_NUMPAD3,TRUE, '\346', '\347', '\350', '\351', },
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
857 { VK_NUMPAD4,TRUE, '\352', '\353', '\354', '\355', },
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
858 { VK_NUMPAD5,TRUE, '\356', '\357', '\360', '\361', },
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
859 { VK_NUMPAD6,TRUE, '\362', '\363', '\364', '\365', },
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
860 { VK_NUMPAD7,TRUE, '\366', '\367', '\370', '\371', },
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
861 { VK_NUMPAD8,TRUE, '\372', '\373', '\374', '\375', },
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
862 /* Sorry, out of number space! <negri>*/
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
863 { VK_NUMPAD9,TRUE, '\376', '\377', '\377', '\367', },
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
864
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
865 };
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
866
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
867
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
868 #ifdef _MSC_VER
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
869 // The ToAscii bug destroys several registers. Need to turn off optimization
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
870 // or the GetConsoleKeyboardLayoutName hack will fail in non-debug versions
797
a1a08851eac8 updated for version 7.0232
vimboss
parents: 715
diff changeset
871 # pragma warning(push)
a1a08851eac8 updated for version 7.0232
vimboss
parents: 715
diff changeset
872 # pragma warning(disable: 4748)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
873 # pragma optimize("", off)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
874 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
875
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
876 #if defined(__GNUC__) && !defined(__MINGW32__) && !defined(__CYGWIN__)
7080
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
877 # define UChar UnicodeChar
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
878 #else
7080
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
879 # define UChar uChar.UnicodeChar
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
880 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
881
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
882 /* The return code indicates key code size. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
883 static int
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
884 #ifdef __BORLANDC__
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
885 __stdcall
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
886 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
887 win32_kbd_patch_key(
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
888 KEY_EVENT_RECORD *pker)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
889 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
890 UINT uMods = pker->dwControlKeyState;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
891 static int s_iIsDead = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
892 static WORD awAnsiCode[2];
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
893 static BYTE abKeystate[256];
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
894
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
895
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
896 if (s_iIsDead == 2)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
897 {
7080
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
898 pker->UChar = (WCHAR) awAnsiCode[1];
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
899 s_iIsDead = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
900 return 1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
901 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
902
7080
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
903 if (pker->UChar != 0)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
904 return 1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
905
2215
cccb71c2c5c1 Fix uninit memory read in undo code. Fix uint32_t in proto file.
Bram Moolenaar <bram@vim.org>
parents: 1752
diff changeset
906 vim_memset(abKeystate, 0, sizeof (abKeystate));
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
907
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
908 // Should only be non-NULL on NT 4.0
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
909 if (s_pfnGetConsoleKeyboardLayoutName != NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
910 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
911 CHAR szKLID[KL_NAMELENGTH];
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
912
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
913 if ((*s_pfnGetConsoleKeyboardLayoutName)(szKLID))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
914 (void)LoadKeyboardLayout(szKLID, KLF_ACTIVATE);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
915 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
916
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
917 /* Clear any pending dead keys */
7080
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
918 ToUnicode(VK_SPACE, MapVirtualKey(VK_SPACE, 0), abKeystate, awAnsiCode, 2, 0);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
919
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
920 if (uMods & SHIFT_PRESSED)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
921 abKeystate[VK_SHIFT] = 0x80;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
922 if (uMods & CAPSLOCK_ON)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
923 abKeystate[VK_CAPITAL] = 1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
924
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
925 if ((uMods & ALT_GR) == ALT_GR)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
926 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
927 abKeystate[VK_CONTROL] = abKeystate[VK_LCONTROL] =
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
928 abKeystate[VK_MENU] = abKeystate[VK_RMENU] = 0x80;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
929 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
930
7080
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
931 s_iIsDead = ToUnicode(pker->wVirtualKeyCode, pker->wVirtualScanCode,
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
932 abKeystate, awAnsiCode, 2, 0);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
933
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
934 if (s_iIsDead > 0)
7080
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
935 pker->UChar = (WCHAR) awAnsiCode[0];
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
936
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
937 return s_iIsDead;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
938 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
939
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
940 #ifdef _MSC_VER
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
941 /* MUST switch optimization on again here, otherwise a call to
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
942 * decode_key_event() may crash (e.g. when hitting caps-lock) */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
943 # pragma optimize("", on)
797
a1a08851eac8 updated for version 7.0232
vimboss
parents: 715
diff changeset
944 # pragma warning(pop)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
945
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
946 # if (_MSC_VER < 1100)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
947 /* MUST turn off global optimisation for this next function, or
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
948 * pressing ctrl-minus in insert mode crashes Vim when built with
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
949 * VC4.1. -- negri. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
950 # pragma optimize("g", off)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
951 # endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
952 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
953
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
954 static BOOL g_fJustGotFocus = FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
955
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
956 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
957 * Decode a KEY_EVENT into one or two keystrokes
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
958 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
959 static BOOL
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
960 decode_key_event(
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
961 KEY_EVENT_RECORD *pker,
7080
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
962 WCHAR *pch,
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
963 WCHAR *pch2,
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
964 int *pmodifiers,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
965 BOOL fDoPost)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
966 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
967 int i;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
968 const int nModifs = pker->dwControlKeyState & (SHIFT | ALT | CTRL);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
969
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
970 *pch = *pch2 = NUL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
971 g_fJustGotFocus = FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
972
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
973 /* ignore key up events */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
974 if (!pker->bKeyDown)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
975 return FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
976
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
977 /* ignore some keystrokes */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
978 switch (pker->wVirtualKeyCode)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
979 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
980 /* modifiers */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
981 case VK_SHIFT:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
982 case VK_CONTROL:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
983 case VK_MENU: /* Alt key */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
984 return FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
985
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
986 default:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
987 break;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
988 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
989
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
990 /* special cases */
7080
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
991 if ((nModifs & CTRL) != 0 && (nModifs & ~CTRL) == 0 && pker->UChar == NUL)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
992 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
993 /* Ctrl-6 is Ctrl-^ */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
994 if (pker->wVirtualKeyCode == '6')
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
995 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
996 *pch = Ctrl_HAT;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
997 return TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
998 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
999 /* Ctrl-2 is Ctrl-@ */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1000 else if (pker->wVirtualKeyCode == '2')
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1001 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1002 *pch = NUL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1003 return TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1004 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1005 /* Ctrl-- is Ctrl-_ */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1006 else if (pker->wVirtualKeyCode == 0xBD)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1007 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1008 *pch = Ctrl__;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1009 return TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1010 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1011 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1012
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1013 /* Shift-TAB */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1014 if (pker->wVirtualKeyCode == VK_TAB && (nModifs & SHIFT_PRESSED))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1015 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1016 *pch = K_NUL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1017 *pch2 = '\017';
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1018 return TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1019 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1020
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1021 for (i = sizeof(VirtKeyMap) / sizeof(VirtKeyMap[0]); --i >= 0; )
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1022 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1023 if (VirtKeyMap[i].wVirtKey == pker->wVirtualKeyCode)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1024 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1025 if (nModifs == 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1026 *pch = VirtKeyMap[i].chAlone;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1027 else if ((nModifs & SHIFT) != 0 && (nModifs & ~SHIFT) == 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1028 *pch = VirtKeyMap[i].chShift;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1029 else if ((nModifs & CTRL) != 0 && (nModifs & ~CTRL) == 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1030 *pch = VirtKeyMap[i].chCtrl;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1031 else if ((nModifs & ALT) != 0 && (nModifs & ~ALT) == 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1032 *pch = VirtKeyMap[i].chAlt;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1033
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1034 if (*pch != 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1035 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1036 if (VirtKeyMap[i].fAnsiKey)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1037 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1038 *pch2 = *pch;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1039 *pch = K_NUL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1040 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1041
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1042 return TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1043 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1044 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1045 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1046
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1047 i = win32_kbd_patch_key(pker);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1048
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1049 if (i < 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1050 *pch = NUL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1051 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1052 {
7080
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
1053 *pch = (i > 0) ? pker->UChar : NUL;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1054
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1055 if (pmodifiers != NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1056 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1057 /* Pass on the ALT key as a modifier, but only when not combined
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1058 * with CTRL (which is ALTGR). */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1059 if ((nModifs & ALT) != 0 && (nModifs & CTRL) == 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1060 *pmodifiers |= MOD_MASK_ALT;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1061
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1062 /* Pass on SHIFT only for special keys, because we don't know when
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1063 * it's already included with the character. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1064 if ((nModifs & SHIFT) != 0 && *pch <= 0x20)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1065 *pmodifiers |= MOD_MASK_SHIFT;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1066
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1067 /* Pass on CTRL only for non-special keys, because we don't know
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1068 * when it's already included with the character. And not when
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1069 * combined with ALT (which is ALTGR). */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1070 if ((nModifs & CTRL) != 0 && (nModifs & ALT) == 0
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1071 && *pch >= 0x20 && *pch < 0x80)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1072 *pmodifiers |= MOD_MASK_CTRL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1073 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1074 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1075
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1076 return (*pch != NUL);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1077 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1078
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1079 #ifdef _MSC_VER
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1080 # pragma optimize("", on)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1081 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1082
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1083 #endif /* FEAT_GUI_W32 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1084
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1085
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1086 #ifdef FEAT_MOUSE
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1087
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1088 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1089 * For the GUI the mouse handling is in gui_w32.c.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1090 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1091 # ifdef FEAT_GUI_W32
323
03b3684919e3 updated for version 7.0084
vimboss
parents: 297
diff changeset
1092 /*ARGSUSED*/
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1093 void
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
1094 mch_setmouse(int on)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1095 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1096 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1097 # else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1098 static int g_fMouseAvail = FALSE; /* mouse present */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1099 static int g_fMouseActive = FALSE; /* mouse enabled */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1100 static int g_nMouseClick = -1; /* mouse status */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1101 static int g_xMouse; /* mouse x coordinate */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1102 static int g_yMouse; /* mouse y coordinate */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1103
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1104 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1105 * Enable or disable mouse input
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1106 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1107 void
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
1108 mch_setmouse(int on)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1109 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1110 DWORD cmodein;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1111
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1112 if (!g_fMouseAvail)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1113 return;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1114
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1115 g_fMouseActive = on;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1116 GetConsoleMode(g_hConIn, &cmodein);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1117
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1118 if (g_fMouseActive)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1119 cmodein |= ENABLE_MOUSE_INPUT;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1120 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1121 cmodein &= ~ENABLE_MOUSE_INPUT;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1122
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1123 SetConsoleMode(g_hConIn, cmodein);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1124 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1125
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1126
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1127 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1128 * Decode a MOUSE_EVENT. If it's a valid event, return MOUSE_LEFT,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1129 * MOUSE_MIDDLE, or MOUSE_RIGHT for a click; MOUSE_DRAG for a mouse
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1130 * move with a button held down; and MOUSE_RELEASE after a MOUSE_DRAG
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1131 * or a MOUSE_LEFT, _MIDDLE, or _RIGHT. We encode the button type,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1132 * the number of clicks, and the Shift/Ctrl/Alt modifiers in g_nMouseClick,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1133 * and we return the mouse position in g_xMouse and g_yMouse.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1134 *
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1135 * Every MOUSE_LEFT, _MIDDLE, or _RIGHT will be followed by zero or more
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1136 * MOUSE_DRAGs and one MOUSE_RELEASE. MOUSE_RELEASE will be followed only
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1137 * by MOUSE_LEFT, _MIDDLE, or _RIGHT.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1138 *
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1139 * For multiple clicks, we send, say, MOUSE_LEFT/1 click, MOUSE_RELEASE,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1140 * MOUSE_LEFT/2 clicks, MOUSE_RELEASE, MOUSE_LEFT/3 clicks, MOUSE_RELEASE, ....
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1141 *
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1142 * Windows will send us MOUSE_MOVED notifications whenever the mouse
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1143 * moves, even if it stays within the same character cell. We ignore
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1144 * all MOUSE_MOVED messages if the position hasn't really changed, and
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1145 * we ignore all MOUSE_MOVED messages where no button is held down (i.e.,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1146 * we're only interested in MOUSE_DRAG).
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1147 *
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1148 * All of this is complicated by the code that fakes MOUSE_MIDDLE on
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1149 * 2-button mouses by pressing the left & right buttons simultaneously.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1150 * In practice, it's almost impossible to click both at the same time,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1151 * so we need to delay a little. Also, we tend not to get MOUSE_RELEASE
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1152 * in such cases, if the user is clicking quickly.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1153 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1154 static BOOL
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1155 decode_mouse_event(
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
1156 MOUSE_EVENT_RECORD *pmer)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1157 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1158 static int s_nOldButton = -1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1159 static int s_nOldMouseClick = -1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1160 static int s_xOldMouse = -1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1161 static int s_yOldMouse = -1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1162 static linenr_T s_old_topline = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1163 #ifdef FEAT_DIFF
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1164 static int s_old_topfill = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1165 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1166 static int s_cClicks = 1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1167 static BOOL s_fReleased = TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1168 static DWORD s_dwLastClickTime = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1169 static BOOL s_fNextIsMiddle = FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1170
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1171 static DWORD cButtons = 0; /* number of buttons supported */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1172
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1173 const DWORD LEFT = FROM_LEFT_1ST_BUTTON_PRESSED;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1174 const DWORD MIDDLE = FROM_LEFT_2ND_BUTTON_PRESSED;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1175 const DWORD RIGHT = RIGHTMOST_BUTTON_PRESSED;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1176 const DWORD LEFT_RIGHT = LEFT | RIGHT;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1177
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1178 int nButton;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1179
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1180 if (cButtons == 0 && !GetNumberOfConsoleMouseButtons(&cButtons))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1181 cButtons = 2;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1182
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1183 if (!g_fMouseAvail || !g_fMouseActive)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1184 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1185 g_nMouseClick = -1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1186 return FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1187 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1188
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1189 /* get a spurious MOUSE_EVENT immediately after receiving focus; ignore */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1190 if (g_fJustGotFocus)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1191 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1192 g_fJustGotFocus = FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1193 return FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1194 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1195
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1196 /* unprocessed mouse click? */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1197 if (g_nMouseClick != -1)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1198 return TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1199
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1200 nButton = -1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1201 g_xMouse = pmer->dwMousePosition.X;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1202 g_yMouse = pmer->dwMousePosition.Y;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1203
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1204 if (pmer->dwEventFlags == MOUSE_MOVED)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1205 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1206 /* ignore MOUSE_MOVED events if (x, y) hasn't changed. (We get these
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1207 * events even when the mouse moves only within a char cell.) */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1208 if (s_xOldMouse == g_xMouse && s_yOldMouse == g_yMouse)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1209 return FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1210 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1211
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1212 /* If no buttons are pressed... */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1213 if ((pmer->dwButtonState & ((1 << cButtons) - 1)) == 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1214 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1215 /* If the last thing returned was MOUSE_RELEASE, ignore this */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1216 if (s_fReleased)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1217 return FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1218
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1219 nButton = MOUSE_RELEASE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1220 s_fReleased = TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1221 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1222 else /* one or more buttons pressed */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1223 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1224 /* on a 2-button mouse, hold down left and right buttons
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1225 * simultaneously to get MIDDLE. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1226
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1227 if (cButtons == 2 && s_nOldButton != MOUSE_DRAG)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1228 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1229 DWORD dwLR = (pmer->dwButtonState & LEFT_RIGHT);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1230
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1231 /* if either left or right button only is pressed, see if the
4352
04736b4030ec updated for version 7.3.925
Bram Moolenaar <bram@vim.org>
parents: 4238
diff changeset
1232 * next mouse event has both of them pressed */
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1233 if (dwLR == LEFT || dwLR == RIGHT)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1234 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1235 for (;;)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1236 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1237 /* wait a short time for next input event */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1238 if (WaitForSingleObject(g_hConIn, p_mouset / 3)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1239 != WAIT_OBJECT_0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1240 break;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1241 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1242 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1243 DWORD cRecords = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1244 INPUT_RECORD ir;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1245 MOUSE_EVENT_RECORD* pmer2 = &ir.Event.MouseEvent;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1246
5580
6fdb1d6646b6 updated for version 7.4.137
Bram Moolenaar <bram@vim.org>
parents: 5578
diff changeset
1247 peek_console_input(g_hConIn, &ir, 1, &cRecords);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1248
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1249 if (cRecords == 0 || ir.EventType != MOUSE_EVENT
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1250 || !(pmer2->dwButtonState & LEFT_RIGHT))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1251 break;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1252 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1253 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1254 if (pmer2->dwEventFlags != MOUSE_MOVED)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1255 {
5580
6fdb1d6646b6 updated for version 7.4.137
Bram Moolenaar <bram@vim.org>
parents: 5578
diff changeset
1256 read_console_input(g_hConIn, &ir, 1, &cRecords);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1257
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1258 return decode_mouse_event(pmer2);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1259 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1260 else if (s_xOldMouse == pmer2->dwMousePosition.X &&
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1261 s_yOldMouse == pmer2->dwMousePosition.Y)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1262 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1263 /* throw away spurious mouse move */
5580
6fdb1d6646b6 updated for version 7.4.137
Bram Moolenaar <bram@vim.org>
parents: 5578
diff changeset
1264 read_console_input(g_hConIn, &ir, 1, &cRecords);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1265
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1266 /* are there any more mouse events in queue? */
5580
6fdb1d6646b6 updated for version 7.4.137
Bram Moolenaar <bram@vim.org>
parents: 5578
diff changeset
1267 peek_console_input(g_hConIn, &ir, 1, &cRecords);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1268
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1269 if (cRecords==0 || ir.EventType != MOUSE_EVENT)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1270 break;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1271 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1272 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1273 break;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1274 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1275 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1276 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1277 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1278 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1279
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1280 if (s_fNextIsMiddle)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1281 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1282 nButton = (pmer->dwEventFlags == MOUSE_MOVED)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1283 ? MOUSE_DRAG : MOUSE_MIDDLE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1284 s_fNextIsMiddle = FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1285 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1286 else if (cButtons == 2 &&
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1287 ((pmer->dwButtonState & LEFT_RIGHT) == LEFT_RIGHT))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1288 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1289 nButton = MOUSE_MIDDLE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1290
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1291 if (! s_fReleased && pmer->dwEventFlags != MOUSE_MOVED)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1292 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1293 s_fNextIsMiddle = TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1294 nButton = MOUSE_RELEASE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1295 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1296 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1297 else if ((pmer->dwButtonState & LEFT) == LEFT)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1298 nButton = MOUSE_LEFT;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1299 else if ((pmer->dwButtonState & MIDDLE) == MIDDLE)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1300 nButton = MOUSE_MIDDLE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1301 else if ((pmer->dwButtonState & RIGHT) == RIGHT)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1302 nButton = MOUSE_RIGHT;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1303
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1304 if (! s_fReleased && ! s_fNextIsMiddle
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1305 && nButton != s_nOldButton && s_nOldButton != MOUSE_DRAG)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1306 return FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1307
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1308 s_fReleased = s_fNextIsMiddle;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1309 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1310
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1311 if (pmer->dwEventFlags == 0 || pmer->dwEventFlags == DOUBLE_CLICK)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1312 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1313 /* button pressed or released, without mouse moving */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1314 if (nButton != -1 && nButton != MOUSE_RELEASE)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1315 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1316 DWORD dwCurrentTime = GetTickCount();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1317
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1318 if (s_xOldMouse != g_xMouse
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1319 || s_yOldMouse != g_yMouse
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1320 || s_nOldButton != nButton
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1321 || s_old_topline != curwin->w_topline
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1322 #ifdef FEAT_DIFF
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1323 || s_old_topfill != curwin->w_topfill
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1324 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1325 || (int)(dwCurrentTime - s_dwLastClickTime) > p_mouset)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1326 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1327 s_cClicks = 1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1328 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1329 else if (++s_cClicks > 4)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1330 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1331 s_cClicks = 1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1332 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1333
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1334 s_dwLastClickTime = dwCurrentTime;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1335 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1336 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1337 else if (pmer->dwEventFlags == MOUSE_MOVED)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1338 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1339 if (nButton != -1 && nButton != MOUSE_RELEASE)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1340 nButton = MOUSE_DRAG;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1341
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1342 s_cClicks = 1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1343 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1344
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1345 if (nButton == -1)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1346 return FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1347
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1348 if (nButton != MOUSE_RELEASE)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1349 s_nOldButton = nButton;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1350
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1351 g_nMouseClick = nButton;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1352
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1353 if (pmer->dwControlKeyState & SHIFT_PRESSED)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1354 g_nMouseClick |= MOUSE_SHIFT;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1355 if (pmer->dwControlKeyState & (RIGHT_CTRL_PRESSED | LEFT_CTRL_PRESSED))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1356 g_nMouseClick |= MOUSE_CTRL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1357 if (pmer->dwControlKeyState & (RIGHT_ALT_PRESSED | LEFT_ALT_PRESSED))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1358 g_nMouseClick |= MOUSE_ALT;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1359
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1360 if (nButton != MOUSE_DRAG && nButton != MOUSE_RELEASE)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1361 SET_NUM_MOUSE_CLICKS(g_nMouseClick, s_cClicks);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1362
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1363 /* only pass on interesting (i.e., different) mouse events */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1364 if (s_xOldMouse == g_xMouse
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1365 && s_yOldMouse == g_yMouse
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1366 && s_nOldMouseClick == g_nMouseClick)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1367 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1368 g_nMouseClick = -1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1369 return FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1370 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1371
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1372 s_xOldMouse = g_xMouse;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1373 s_yOldMouse = g_yMouse;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1374 s_old_topline = curwin->w_topline;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1375 #ifdef FEAT_DIFF
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1376 s_old_topfill = curwin->w_topfill;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1377 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1378 s_nOldMouseClick = g_nMouseClick;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1379
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1380 return TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1381 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1382
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1383 # endif /* FEAT_GUI_W32 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1384 #endif /* FEAT_MOUSE */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1385
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1386
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1387 #ifdef MCH_CURSOR_SHAPE
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1388 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1389 * Set the shape of the cursor.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1390 * 'thickness' can be from 1 (thin) to 99 (block)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1391 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1392 static void
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1393 mch_set_cursor_shape(int thickness)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1394 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1395 CONSOLE_CURSOR_INFO ConsoleCursorInfo;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1396 ConsoleCursorInfo.dwSize = thickness;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1397 ConsoleCursorInfo.bVisible = s_cursor_visible;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1398
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1399 SetConsoleCursorInfo(g_hConOut, &ConsoleCursorInfo);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1400 if (s_cursor_visible)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1401 SetConsoleCursorPosition(g_hConOut, g_coord);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1402 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1403
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1404 void
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1405 mch_update_cursor(void)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1406 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1407 int idx;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1408 int thickness;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1409
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1410 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1411 * How the cursor is drawn depends on the current mode.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1412 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1413 idx = get_shape_idx(FALSE);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1414
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1415 if (shape_table[idx].shape == SHAPE_BLOCK)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1416 thickness = 99; /* 100 doesn't work on W95 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1417 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1418 thickness = shape_table[idx].percentage;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1419 mch_set_cursor_shape(thickness);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1420 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1421 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1422
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1423 #ifndef FEAT_GUI_W32 /* this isn't used for the GUI */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1424 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1425 * Handle FOCUS_EVENT.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1426 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1427 static void
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1428 handle_focus_event(INPUT_RECORD ir)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1429 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1430 g_fJustGotFocus = ir.Event.FocusEvent.bSetFocus;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1431 ui_focus_change((int)g_fJustGotFocus);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1432 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1433
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1434 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1435 * Wait until console input from keyboard or mouse is available,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1436 * or the time is up.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1437 * Return TRUE if something is available FALSE if not.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1438 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1439 static int
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1440 WaitForChar(long msec)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1441 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1442 DWORD dwNow = 0, dwEndTime = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1443 INPUT_RECORD ir;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1444 DWORD cRecords;
7080
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
1445 WCHAR ch, ch2;
7797
0d46cea25641 commit https://github.com/vim/vim/commit/f12d983deab06b0408781d7a6c2f8970d765b723
Christian Brabandt <cb@256bit.org>
parents: 7784
diff changeset
1446 #ifdef FEAT_CHANNEL
0d46cea25641 commit https://github.com/vim/vim/commit/f12d983deab06b0408781d7a6c2f8970d765b723
Christian Brabandt <cb@256bit.org>
parents: 7784
diff changeset
1447 int ret;
0d46cea25641 commit https://github.com/vim/vim/commit/f12d983deab06b0408781d7a6c2f8970d765b723
Christian Brabandt <cb@256bit.org>
parents: 7784
diff changeset
1448 fd_set rfds;
0d46cea25641 commit https://github.com/vim/vim/commit/f12d983deab06b0408781d7a6c2f8970d765b723
Christian Brabandt <cb@256bit.org>
parents: 7784
diff changeset
1449 int maxfd;
0d46cea25641 commit https://github.com/vim/vim/commit/f12d983deab06b0408781d7a6c2f8970d765b723
Christian Brabandt <cb@256bit.org>
parents: 7784
diff changeset
1450 #endif
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1451
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1452 if (msec > 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1453 /* Wait until the specified time has elapsed. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1454 dwEndTime = GetTickCount() + msec;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1455 else if (msec < 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1456 /* Wait forever. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1457 dwEndTime = INFINITE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1458
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1459 /* We need to loop until the end of the time period, because
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1460 * we might get multiple unusable mouse events in that time.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1461 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1462 for (;;)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1463 {
14
946da5994c01 updated for version 7.0006
vimboss
parents: 10
diff changeset
1464 #ifdef FEAT_MZSCHEME
946da5994c01 updated for version 7.0006
vimboss
parents: 10
diff changeset
1465 mzvim_check_threads();
946da5994c01 updated for version 7.0006
vimboss
parents: 10
diff changeset
1466 #endif
7797
0d46cea25641 commit https://github.com/vim/vim/commit/f12d983deab06b0408781d7a6c2f8970d765b723
Christian Brabandt <cb@256bit.org>
parents: 7784
diff changeset
1467
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1468 #ifdef FEAT_CLIENTSERVER
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1469 serverProcessPendingMessages();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1470 #endif
7797
0d46cea25641 commit https://github.com/vim/vim/commit/f12d983deab06b0408781d7a6c2f8970d765b723
Christian Brabandt <cb@256bit.org>
parents: 7784
diff changeset
1471
0d46cea25641 commit https://github.com/vim/vim/commit/f12d983deab06b0408781d7a6c2f8970d765b723
Christian Brabandt <cb@256bit.org>
parents: 7784
diff changeset
1472 #ifdef FEAT_CHANNEL
0d46cea25641 commit https://github.com/vim/vim/commit/f12d983deab06b0408781d7a6c2f8970d765b723
Christian Brabandt <cb@256bit.org>
parents: 7784
diff changeset
1473 FD_ZERO(&rfds);
0d46cea25641 commit https://github.com/vim/vim/commit/f12d983deab06b0408781d7a6c2f8970d765b723
Christian Brabandt <cb@256bit.org>
parents: 7784
diff changeset
1474 maxfd = channel_select_setup(-1, &rfds);
0d46cea25641 commit https://github.com/vim/vim/commit/f12d983deab06b0408781d7a6c2f8970d765b723
Christian Brabandt <cb@256bit.org>
parents: 7784
diff changeset
1475 if (maxfd >= 0)
0d46cea25641 commit https://github.com/vim/vim/commit/f12d983deab06b0408781d7a6c2f8970d765b723
Christian Brabandt <cb@256bit.org>
parents: 7784
diff changeset
1476 {
0d46cea25641 commit https://github.com/vim/vim/commit/f12d983deab06b0408781d7a6c2f8970d765b723
Christian Brabandt <cb@256bit.org>
parents: 7784
diff changeset
1477 ret = select(maxfd + 1, &rfds, NULL, NULL, NULL);
0d46cea25641 commit https://github.com/vim/vim/commit/f12d983deab06b0408781d7a6c2f8970d765b723
Christian Brabandt <cb@256bit.org>
parents: 7784
diff changeset
1478 if (ret > 0 && channel_select_check(ret, &rfds) > 0)
0d46cea25641 commit https://github.com/vim/vim/commit/f12d983deab06b0408781d7a6c2f8970d765b723
Christian Brabandt <cb@256bit.org>
parents: 7784
diff changeset
1479 return TRUE;
0d46cea25641 commit https://github.com/vim/vim/commit/f12d983deab06b0408781d7a6c2f8970d765b723
Christian Brabandt <cb@256bit.org>
parents: 7784
diff changeset
1480 }
0d46cea25641 commit https://github.com/vim/vim/commit/f12d983deab06b0408781d7a6c2f8970d765b723
Christian Brabandt <cb@256bit.org>
parents: 7784
diff changeset
1481 #endif
0d46cea25641 commit https://github.com/vim/vim/commit/f12d983deab06b0408781d7a6c2f8970d765b723
Christian Brabandt <cb@256bit.org>
parents: 7784
diff changeset
1482
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1483 if (0
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1484 #ifdef FEAT_MOUSE
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1485 || g_nMouseClick != -1
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1486 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1487 #ifdef FEAT_CLIENTSERVER
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1488 || input_available()
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1489 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1490 )
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1491 return TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1492
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1493 if (msec > 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1494 {
5292
d5d6b78cff09 updated for version 7.4b.022
Bram Moolenaar <bram@vim.org>
parents: 5229
diff changeset
1495 /* If the specified wait time has passed, return. Beware that
d5d6b78cff09 updated for version 7.4b.022
Bram Moolenaar <bram@vim.org>
parents: 5229
diff changeset
1496 * GetTickCount() may wrap around (overflow). */
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1497 dwNow = GetTickCount();
5292
d5d6b78cff09 updated for version 7.4b.022
Bram Moolenaar <bram@vim.org>
parents: 5229
diff changeset
1498 if ((int)(dwNow - dwEndTime) >= 0)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1499 break;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1500 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1501 if (msec != 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1502 {
14
946da5994c01 updated for version 7.0006
vimboss
parents: 10
diff changeset
1503 DWORD dwWaitTime = dwEndTime - dwNow;
946da5994c01 updated for version 7.0006
vimboss
parents: 10
diff changeset
1504
946da5994c01 updated for version 7.0006
vimboss
parents: 10
diff changeset
1505 #ifdef FEAT_MZSCHEME
946da5994c01 updated for version 7.0006
vimboss
parents: 10
diff changeset
1506 if (mzthreads_allowed() && p_mzq > 0
946da5994c01 updated for version 7.0006
vimboss
parents: 10
diff changeset
1507 && (msec < 0 || (long)dwWaitTime > p_mzq))
946da5994c01 updated for version 7.0006
vimboss
parents: 10
diff changeset
1508 dwWaitTime = p_mzq; /* don't wait longer than 'mzquantum' */
946da5994c01 updated for version 7.0006
vimboss
parents: 10
diff changeset
1509 #endif
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1510 #ifdef FEAT_CLIENTSERVER
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1511 /* Wait for either an event on the console input or a message in
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1512 * the client-server window. */
6981
f77d1f32c357 patch 7.4.808
Bram Moolenaar <bram@vim.org>
parents: 6933
diff changeset
1513 if (msg_wait_for_multiple_objects(1, &g_hConIn, FALSE,
14
946da5994c01 updated for version 7.0006
vimboss
parents: 10
diff changeset
1514 dwWaitTime, QS_SENDMESSAGE) != WAIT_OBJECT_0)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1515 #else
6981
f77d1f32c357 patch 7.4.808
Bram Moolenaar <bram@vim.org>
parents: 6933
diff changeset
1516 if (wait_for_single_object(g_hConIn, dwWaitTime) != WAIT_OBJECT_0)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1517 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1518 continue;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1519 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1520
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1521 cRecords = 0;
5580
6fdb1d6646b6 updated for version 7.4.137
Bram Moolenaar <bram@vim.org>
parents: 5578
diff changeset
1522 peek_console_input(g_hConIn, &ir, 1, &cRecords);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1523
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1524 #ifdef FEAT_MBYTE_IME
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1525 if (State & CMDLINE && msg_row == Rows - 1)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1526 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1527 CONSOLE_SCREEN_BUFFER_INFO csbi;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1528
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1529 if (GetConsoleScreenBufferInfo(g_hConOut, &csbi))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1530 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1531 if (csbi.dwCursorPosition.Y != msg_row)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1532 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1533 /* The screen is now messed up, must redraw the
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1534 * command line and later all the windows. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1535 redraw_all_later(CLEAR);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1536 cmdline_row -= (msg_row - csbi.dwCursorPosition.Y);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1537 redrawcmd();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1538 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1539 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1540 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1541 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1542
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1543 if (cRecords > 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1544 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1545 if (ir.EventType == KEY_EVENT && ir.Event.KeyEvent.bKeyDown)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1546 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1547 #ifdef FEAT_MBYTE_IME
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1548 /* Windows IME sends two '\n's with only one 'ENTER'. First:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1549 * wVirtualKeyCode == 13. second: wVirtualKeyCode == 0 */
7080
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
1550 if (ir.Event.KeyEvent.UChar == 0
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1551 && ir.Event.KeyEvent.wVirtualKeyCode == 13)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1552 {
5580
6fdb1d6646b6 updated for version 7.4.137
Bram Moolenaar <bram@vim.org>
parents: 5578
diff changeset
1553 read_console_input(g_hConIn, &ir, 1, &cRecords);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1554 continue;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1555 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1556 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1557 if (decode_key_event(&ir.Event.KeyEvent, &ch, &ch2,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1558 NULL, FALSE))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1559 return TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1560 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1561
5580
6fdb1d6646b6 updated for version 7.4.137
Bram Moolenaar <bram@vim.org>
parents: 5578
diff changeset
1562 read_console_input(g_hConIn, &ir, 1, &cRecords);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1563
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1564 if (ir.EventType == FOCUS_EVENT)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1565 handle_focus_event(ir);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1566 else if (ir.EventType == WINDOW_BUFFER_SIZE_EVENT)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1567 shell_resized();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1568 #ifdef FEAT_MOUSE
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1569 else if (ir.EventType == MOUSE_EVENT
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1570 && decode_mouse_event(&ir.Event.MouseEvent))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1571 return TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1572 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1573 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1574 else if (msec == 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1575 break;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1576 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1577
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1578 #ifdef FEAT_CLIENTSERVER
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1579 /* Something might have been received while we were waiting. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1580 if (input_available())
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1581 return TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1582 #endif
7797
0d46cea25641 commit https://github.com/vim/vim/commit/f12d983deab06b0408781d7a6c2f8970d765b723
Christian Brabandt <cb@256bit.org>
parents: 7784
diff changeset
1583
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1584 return FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1585 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1586
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1587 #ifndef FEAT_GUI_MSWIN
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1588 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1589 * return non-zero if a character is available
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1590 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1591 int
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
1592 mch_char_avail(void)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1593 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1594 return WaitForChar(0L);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1595 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1596 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1597
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1598 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1599 * Create the console input. Used when reading stdin doesn't work.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1600 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1601 static void
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1602 create_conin(void)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1603 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1604 g_hConIn = CreateFile("CONIN$", GENERIC_READ|GENERIC_WRITE,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1605 FILE_SHARE_READ|FILE_SHARE_WRITE,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1606 (LPSECURITY_ATTRIBUTES) NULL,
840
2c885fab04e3 updated for version 7.0e06
vimboss
parents: 835
diff changeset
1607 OPEN_EXISTING, 0, (HANDLE)NULL);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1608 did_create_conin = TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1609 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1610
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1611 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1612 * Get a keystroke or a mouse event
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1613 */
7080
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
1614 static WCHAR
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
1615 tgetch(int *pmodifiers, WCHAR *pch2)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1616 {
7080
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
1617 WCHAR ch;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1618
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1619 for (;;)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1620 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1621 INPUT_RECORD ir;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1622 DWORD cRecords = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1623
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1624 #ifdef FEAT_CLIENTSERVER
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1625 (void)WaitForChar(-1L);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1626 if (input_available())
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1627 return 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1628 # ifdef FEAT_MOUSE
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1629 if (g_nMouseClick != -1)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1630 return 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1631 # endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1632 #endif
5580
6fdb1d6646b6 updated for version 7.4.137
Bram Moolenaar <bram@vim.org>
parents: 5578
diff changeset
1633 if (read_console_input(g_hConIn, &ir, 1, &cRecords) == 0)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1634 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1635 if (did_create_conin)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1636 read_error_exit();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1637 create_conin();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1638 continue;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1639 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1640
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1641 if (ir.EventType == KEY_EVENT)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1642 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1643 if (decode_key_event(&ir.Event.KeyEvent, &ch, pch2,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1644 pmodifiers, TRUE))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1645 return ch;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1646 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1647 else if (ir.EventType == FOCUS_EVENT)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1648 handle_focus_event(ir);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1649 else if (ir.EventType == WINDOW_BUFFER_SIZE_EVENT)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1650 shell_resized();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1651 #ifdef FEAT_MOUSE
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1652 else if (ir.EventType == MOUSE_EVENT)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1653 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1654 if (decode_mouse_event(&ir.Event.MouseEvent))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1655 return 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1656 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1657 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1658 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1659 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1660 #endif /* !FEAT_GUI_W32 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1661
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1662
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1663 /*
3622
43fd3896fab7 updated for version 7.3.571
Bram Moolenaar <bram@vim.org>
parents: 3386
diff changeset
1664 * mch_inchar(): low-level input function.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1665 * Get one or more characters from the keyboard or the mouse.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1666 * If time == 0, do not wait for characters.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1667 * If time == n, wait a short time for characters.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1668 * If time == -1, wait forever for characters.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1669 * Returns the number of characters read into buf.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1670 */
344
7033303ea0c0 updated for version 7.0089
vimboss
parents: 323
diff changeset
1671 /*ARGSUSED*/
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1672 int
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1673 mch_inchar(
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1674 char_u *buf,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1675 int maxlen,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1676 long time,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1677 int tb_change_cnt)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1678 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1679 #ifndef FEAT_GUI_W32 /* this isn't used for the GUI */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1680
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1681 int len;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1682 int c;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1683 #define TYPEAHEADLEN 20
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1684 static char_u typeahead[TYPEAHEADLEN]; /* previously typed bytes. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1685 static int typeaheadlen = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1686
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1687 /* First use any typeahead that was kept because "buf" was too small. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1688 if (typeaheadlen > 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1689 goto theend;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1690
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1691 #ifdef FEAT_SNIFF
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1692 if (want_sniff_request)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1693 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1694 if (sniff_request_waiting)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1695 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1696 /* return K_SNIFF */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1697 typeahead[typeaheadlen++] = CSI;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1698 typeahead[typeaheadlen++] = (char_u)KS_EXTRA;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1699 typeahead[typeaheadlen++] = (char_u)KE_SNIFF;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1700 sniff_request_waiting = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1701 want_sniff_request = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1702 goto theend;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1703 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1704 else if (time < 0 || time > 250)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1705 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1706 /* don't wait too long, a request might be pending */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1707 time = 250;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1708 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1709 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1710 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1711
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1712 if (time >= 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1713 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1714 if (!WaitForChar(time)) /* no character available */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1715 return 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1716 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1717 else /* time == -1, wait forever */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1718 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1719 mch_set_winsize_now(); /* Allow winsize changes from now on */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1720
203
80000fb16feb updated for version 7.0060
vimboss
parents: 41
diff changeset
1721 /*
80000fb16feb updated for version 7.0060
vimboss
parents: 41
diff changeset
1722 * If there is no character available within 2 seconds (default)
80000fb16feb updated for version 7.0060
vimboss
parents: 41
diff changeset
1723 * write the autoscript file to disk. Or cause the CursorHold event
80000fb16feb updated for version 7.0060
vimboss
parents: 41
diff changeset
1724 * to be triggered.
80000fb16feb updated for version 7.0060
vimboss
parents: 41
diff changeset
1725 */
80000fb16feb updated for version 7.0060
vimboss
parents: 41
diff changeset
1726 if (!WaitForChar(p_ut))
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1727 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1728 #ifdef FEAT_AUTOCMD
609
ba54311bc43e updated for version 7.0173
vimboss
parents: 474
diff changeset
1729 if (trigger_cursorhold() && maxlen >= 3)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1730 {
203
80000fb16feb updated for version 7.0060
vimboss
parents: 41
diff changeset
1731 buf[0] = K_SPECIAL;
80000fb16feb updated for version 7.0060
vimboss
parents: 41
diff changeset
1732 buf[1] = KS_EXTRA;
80000fb16feb updated for version 7.0060
vimboss
parents: 41
diff changeset
1733 buf[2] = (int)KE_CURSORHOLD;
80000fb16feb updated for version 7.0060
vimboss
parents: 41
diff changeset
1734 return 3;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1735 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1736 #endif
368
a7d1d61e5417 updated for version 7.0095
vimboss
parents: 344
diff changeset
1737 before_blocking();
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1738 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1739 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1740
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1741 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1742 * Try to read as many characters as there are, until the buffer is full.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1743 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1744
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1745 /* we will get at least one key. Get more if they are available. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1746 g_fCBrkPressed = FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1747
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1748 #ifdef MCH_WRITE_DUMP
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1749 if (fdDump)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1750 fputc('[', fdDump);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1751 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1752
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1753 /* Keep looping until there is something in the typeahead buffer and more
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1754 * to get and still room in the buffer (up to two bytes for a char and
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1755 * three bytes for a modifier). */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1756 while ((typeaheadlen == 0 || WaitForChar(0L))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1757 && typeaheadlen + 5 <= TYPEAHEADLEN)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1758 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1759 if (typebuf_changed(tb_change_cnt))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1760 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1761 /* "buf" may be invalid now if a client put something in the
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1762 * typeahead buffer and "buf" is in the typeahead buffer. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1763 typeaheadlen = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1764 break;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1765 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1766 #ifdef FEAT_MOUSE
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1767 if (g_nMouseClick != -1)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1768 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1769 # ifdef MCH_WRITE_DUMP
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1770 if (fdDump)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1771 fprintf(fdDump, "{%02x @ %d, %d}",
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1772 g_nMouseClick, g_xMouse, g_yMouse);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1773 # endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1774 typeahead[typeaheadlen++] = ESC + 128;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1775 typeahead[typeaheadlen++] = 'M';
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1776 typeahead[typeaheadlen++] = g_nMouseClick;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1777 typeahead[typeaheadlen++] = g_xMouse + '!';
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1778 typeahead[typeaheadlen++] = g_yMouse + '!';
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1779 g_nMouseClick = -1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1780 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1781 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1782 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1783 {
7080
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
1784 WCHAR ch2 = NUL;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1785 int modifiers = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1786
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1787 c = tgetch(&modifiers, &ch2);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1788
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1789 if (typebuf_changed(tb_change_cnt))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1790 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1791 /* "buf" may be invalid now if a client put something in the
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1792 * typeahead buffer and "buf" is in the typeahead buffer. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1793 typeaheadlen = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1794 break;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1795 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1796
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1797 if (c == Ctrl_C && ctrl_c_interrupts)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1798 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1799 #if defined(FEAT_CLIENTSERVER)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1800 trash_input_buf();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1801 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1802 got_int = TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1803 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1804
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1805 #ifdef FEAT_MOUSE
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1806 if (g_nMouseClick == -1)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1807 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1808 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1809 int n = 1;
6047
ff3816167b73 updated for version 7.4.363
Bram Moolenaar <bram@vim.org>
parents: 5782
diff changeset
1810 int conv = FALSE;
ff3816167b73 updated for version 7.4.363
Bram Moolenaar <bram@vim.org>
parents: 5782
diff changeset
1811
7080
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
1812 #ifdef FEAT_MBYTE
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
1813 if (ch2 == NUL)
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
1814 {
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
1815 int i;
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
1816 char_u *p;
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
1817 WCHAR ch[2];
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
1818
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
1819 ch[0] = c;
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
1820 if (c >= 0xD800 && c <= 0xDBFF) /* High surrogate */
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
1821 {
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
1822 ch[1] = tgetch(&modifiers, &ch2);
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
1823 n++;
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
1824 }
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
1825 p = utf16_to_enc(ch, &n);
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
1826 if (p != NULL)
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
1827 {
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
1828 for (i = 0; i < n; i++)
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
1829 typeahead[typeaheadlen + i] = p[i];
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
1830 vim_free(p);
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
1831 }
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
1832 }
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
1833 else
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
1834 #endif
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
1835 typeahead[typeaheadlen] = c;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1836 if (ch2 != NUL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1837 {
7080
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
1838 typeahead[typeaheadlen + n] = 3;
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
1839 typeahead[typeaheadlen + n + 1] = (char_u)ch2;
6047
ff3816167b73 updated for version 7.4.363
Bram Moolenaar <bram@vim.org>
parents: 5782
diff changeset
1840 n += 2;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1841 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1842
6047
ff3816167b73 updated for version 7.4.363
Bram Moolenaar <bram@vim.org>
parents: 5782
diff changeset
1843 if (conv)
ff3816167b73 updated for version 7.4.363
Bram Moolenaar <bram@vim.org>
parents: 5782
diff changeset
1844 {
ff3816167b73 updated for version 7.4.363
Bram Moolenaar <bram@vim.org>
parents: 5782
diff changeset
1845 char_u *p = typeahead + typeaheadlen;
6524
8ff2d1b611bf updated for version 7.4.589
Bram Moolenaar <bram@vim.org>
parents: 6359
diff changeset
1846
8ff2d1b611bf updated for version 7.4.589
Bram Moolenaar <bram@vim.org>
parents: 6359
diff changeset
1847 if (*p != K_NUL)
6047
ff3816167b73 updated for version 7.4.363
Bram Moolenaar <bram@vim.org>
parents: 5782
diff changeset
1848 {
6524
8ff2d1b611bf updated for version 7.4.589
Bram Moolenaar <bram@vim.org>
parents: 6359
diff changeset
1849 char_u *e = typeahead + TYPEAHEADLEN;
8ff2d1b611bf updated for version 7.4.589
Bram Moolenaar <bram@vim.org>
parents: 6359
diff changeset
1850
8ff2d1b611bf updated for version 7.4.589
Bram Moolenaar <bram@vim.org>
parents: 6359
diff changeset
1851 while (*p && p < e)
6047
ff3816167b73 updated for version 7.4.363
Bram Moolenaar <bram@vim.org>
parents: 5782
diff changeset
1852 {
6524
8ff2d1b611bf updated for version 7.4.589
Bram Moolenaar <bram@vim.org>
parents: 6359
diff changeset
1853 if (*p == K_NUL)
8ff2d1b611bf updated for version 7.4.589
Bram Moolenaar <bram@vim.org>
parents: 6359
diff changeset
1854 {
8ff2d1b611bf updated for version 7.4.589
Bram Moolenaar <bram@vim.org>
parents: 6359
diff changeset
1855 ++p;
8ff2d1b611bf updated for version 7.4.589
Bram Moolenaar <bram@vim.org>
parents: 6359
diff changeset
1856 mch_memmove(p + 1, p, ((size_t)(e - p)) - 1);
8ff2d1b611bf updated for version 7.4.589
Bram Moolenaar <bram@vim.org>
parents: 6359
diff changeset
1857 *p = 3;
8ff2d1b611bf updated for version 7.4.589
Bram Moolenaar <bram@vim.org>
parents: 6359
diff changeset
1858 ++n;
8ff2d1b611bf updated for version 7.4.589
Bram Moolenaar <bram@vim.org>
parents: 6359
diff changeset
1859 }
6047
ff3816167b73 updated for version 7.4.363
Bram Moolenaar <bram@vim.org>
parents: 5782
diff changeset
1860 ++p;
ff3816167b73 updated for version 7.4.363
Bram Moolenaar <bram@vim.org>
parents: 5782
diff changeset
1861 }
ff3816167b73 updated for version 7.4.363
Bram Moolenaar <bram@vim.org>
parents: 5782
diff changeset
1862 }
ff3816167b73 updated for version 7.4.363
Bram Moolenaar <bram@vim.org>
parents: 5782
diff changeset
1863 }
ff3816167b73 updated for version 7.4.363
Bram Moolenaar <bram@vim.org>
parents: 5782
diff changeset
1864
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1865 /* Use the ALT key to set the 8th bit of the character
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1866 * when it's one byte, the 8th bit isn't set yet and not
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1867 * using a double-byte encoding (would become a lead
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1868 * byte). */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1869 if ((modifiers & MOD_MASK_ALT)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1870 && n == 1
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1871 && (typeahead[typeaheadlen] & 0x80) == 0
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1872 #ifdef FEAT_MBYTE
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1873 && !enc_dbcs
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1874 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1875 )
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1876 {
1443
69bcc0c891d7 updated for version 7.1-158
vimboss
parents: 1414
diff changeset
1877 #ifdef FEAT_MBYTE
69bcc0c891d7 updated for version 7.1-158
vimboss
parents: 1414
diff changeset
1878 n = (*mb_char2bytes)(typeahead[typeaheadlen] | 0x80,
69bcc0c891d7 updated for version 7.1-158
vimboss
parents: 1414
diff changeset
1879 typeahead + typeaheadlen);
69bcc0c891d7 updated for version 7.1-158
vimboss
parents: 1414
diff changeset
1880 #else
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1881 typeahead[typeaheadlen] |= 0x80;
1443
69bcc0c891d7 updated for version 7.1-158
vimboss
parents: 1414
diff changeset
1882 #endif
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1883 modifiers &= ~MOD_MASK_ALT;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1884 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1885
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1886 if (modifiers != 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1887 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1888 /* Prepend modifiers to the character. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1889 mch_memmove(typeahead + typeaheadlen + 3,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1890 typeahead + typeaheadlen, n);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1891 typeahead[typeaheadlen++] = K_SPECIAL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1892 typeahead[typeaheadlen++] = (char_u)KS_MODIFIER;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1893 typeahead[typeaheadlen++] = modifiers;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1894 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1895
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1896 typeaheadlen += n;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1897
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1898 #ifdef MCH_WRITE_DUMP
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1899 if (fdDump)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1900 fputc(c, fdDump);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1901 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1902 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1903 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1904 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1905
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1906 #ifdef MCH_WRITE_DUMP
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1907 if (fdDump)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1908 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1909 fputs("]\n", fdDump);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1910 fflush(fdDump);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1911 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1912 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1913
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1914 theend:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1915 /* Move typeahead to "buf", as much as fits. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1916 len = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1917 while (len < maxlen && typeaheadlen > 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1918 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1919 buf[len++] = typeahead[0];
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1920 mch_memmove(typeahead, typeahead + 1, --typeaheadlen);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1921 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1922 return len;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1923
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1924 #else /* FEAT_GUI_W32 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1925 return 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1926 #endif /* FEAT_GUI_W32 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1927 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1928
3927
e6d8b44065bc updated for version 7.3.719
Bram Moolenaar <bram@vim.org>
parents: 3902
diff changeset
1929 #ifndef PROTO
e6d8b44065bc updated for version 7.3.719
Bram Moolenaar <bram@vim.org>
parents: 3902
diff changeset
1930 # ifndef __MINGW32__
e6d8b44065bc updated for version 7.3.719
Bram Moolenaar <bram@vim.org>
parents: 3902
diff changeset
1931 # include <shellapi.h> /* required for FindExecutable() */
e6d8b44065bc updated for version 7.3.719
Bram Moolenaar <bram@vim.org>
parents: 3902
diff changeset
1932 # endif
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1933 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1934
9
4102fb4ea781 updated for version 7.0002
vimboss
parents: 7
diff changeset
1935 /*
4102fb4ea781 updated for version 7.0002
vimboss
parents: 7
diff changeset
1936 * Return TRUE if "name" is in $PATH.
10
4e2284e71352 updated for version 7.0002
vimboss
parents: 9
diff changeset
1937 * TODO: Should somehow check if it's really executable.
9
4102fb4ea781 updated for version 7.0002
vimboss
parents: 7
diff changeset
1938 */
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1939 static int
5782
5ab2946f7ce5 updated for version 7.4.235
Bram Moolenaar <bram@vim.org>
parents: 5657
diff changeset
1940 executable_exists(char *name, char_u **path)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1941 {
9
4102fb4ea781 updated for version 7.0002
vimboss
parents: 7
diff changeset
1942 char *dum;
4102fb4ea781 updated for version 7.0002
vimboss
parents: 7
diff changeset
1943 char fname[_MAX_PATH];
6185
1fe61f6d5207 updated for version 7.4.428
Bram Moolenaar <bram@vim.org>
parents: 6047
diff changeset
1944 char *curpath, *newpath;
1fe61f6d5207 updated for version 7.4.428
Bram Moolenaar <bram@vim.org>
parents: 6047
diff changeset
1945 long n;
9
4102fb4ea781 updated for version 7.0002
vimboss
parents: 7
diff changeset
1946
4102fb4ea781 updated for version 7.0002
vimboss
parents: 7
diff changeset
1947 #ifdef FEAT_MBYTE
4102fb4ea781 updated for version 7.0002
vimboss
parents: 7
diff changeset
1948 if (enc_codepage >= 0 && (int)GetACP() != enc_codepage)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1949 {
1752
a8aae2e1d2ae updated for version 7.2-049
vimboss
parents: 1686
diff changeset
1950 WCHAR *p = enc_to_utf16(name, NULL);
9
4102fb4ea781 updated for version 7.0002
vimboss
parents: 7
diff changeset
1951 WCHAR fnamew[_MAX_PATH];
4102fb4ea781 updated for version 7.0002
vimboss
parents: 7
diff changeset
1952 WCHAR *dumw;
6185
1fe61f6d5207 updated for version 7.4.428
Bram Moolenaar <bram@vim.org>
parents: 6047
diff changeset
1953 WCHAR *wcurpath, *wnewpath;
9
4102fb4ea781 updated for version 7.0002
vimboss
parents: 7
diff changeset
1954
4102fb4ea781 updated for version 7.0002
vimboss
parents: 7
diff changeset
1955 if (p != NULL)
4102fb4ea781 updated for version 7.0002
vimboss
parents: 7
diff changeset
1956 {
6185
1fe61f6d5207 updated for version 7.4.428
Bram Moolenaar <bram@vim.org>
parents: 6047
diff changeset
1957 wcurpath = _wgetenv(L"PATH");
1fe61f6d5207 updated for version 7.4.428
Bram Moolenaar <bram@vim.org>
parents: 6047
diff changeset
1958 wnewpath = (WCHAR*)alloc((unsigned)(wcslen(wcurpath) + 3)
1fe61f6d5207 updated for version 7.4.428
Bram Moolenaar <bram@vim.org>
parents: 6047
diff changeset
1959 * sizeof(WCHAR));
1fe61f6d5207 updated for version 7.4.428
Bram Moolenaar <bram@vim.org>
parents: 6047
diff changeset
1960 if (wnewpath == NULL)
1fe61f6d5207 updated for version 7.4.428
Bram Moolenaar <bram@vim.org>
parents: 6047
diff changeset
1961 return FALSE;
1fe61f6d5207 updated for version 7.4.428
Bram Moolenaar <bram@vim.org>
parents: 6047
diff changeset
1962 wcscpy(wnewpath, L".;");
1fe61f6d5207 updated for version 7.4.428
Bram Moolenaar <bram@vim.org>
parents: 6047
diff changeset
1963 wcscat(wnewpath, wcurpath);
1fe61f6d5207 updated for version 7.4.428
Bram Moolenaar <bram@vim.org>
parents: 6047
diff changeset
1964 n = (long)SearchPathW(wnewpath, p, NULL, _MAX_PATH, fnamew, &dumw);
1fe61f6d5207 updated for version 7.4.428
Bram Moolenaar <bram@vim.org>
parents: 6047
diff changeset
1965 vim_free(wnewpath);
9
4102fb4ea781 updated for version 7.0002
vimboss
parents: 7
diff changeset
1966 vim_free(p);
4102fb4ea781 updated for version 7.0002
vimboss
parents: 7
diff changeset
1967 if (n > 0 || GetLastError() != ERROR_CALL_NOT_IMPLEMENTED)
4102fb4ea781 updated for version 7.0002
vimboss
parents: 7
diff changeset
1968 {
4102fb4ea781 updated for version 7.0002
vimboss
parents: 7
diff changeset
1969 if (n == 0)
4102fb4ea781 updated for version 7.0002
vimboss
parents: 7
diff changeset
1970 return FALSE;
4102fb4ea781 updated for version 7.0002
vimboss
parents: 7
diff changeset
1971 if (GetFileAttributesW(fnamew) & FILE_ATTRIBUTE_DIRECTORY)
4102fb4ea781 updated for version 7.0002
vimboss
parents: 7
diff changeset
1972 return FALSE;
5782
5ab2946f7ce5 updated for version 7.4.235
Bram Moolenaar <bram@vim.org>
parents: 5657
diff changeset
1973 if (path != NULL)
5ab2946f7ce5 updated for version 7.4.235
Bram Moolenaar <bram@vim.org>
parents: 5657
diff changeset
1974 *path = utf16_to_enc(fnamew, NULL);
9
4102fb4ea781 updated for version 7.0002
vimboss
parents: 7
diff changeset
1975 return TRUE;
4102fb4ea781 updated for version 7.0002
vimboss
parents: 7
diff changeset
1976 }
4102fb4ea781 updated for version 7.0002
vimboss
parents: 7
diff changeset
1977 /* Retry with non-wide function (for Windows 98). */
4102fb4ea781 updated for version 7.0002
vimboss
parents: 7
diff changeset
1978 }
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1979 }
9
4102fb4ea781 updated for version 7.0002
vimboss
parents: 7
diff changeset
1980 #endif
6185
1fe61f6d5207 updated for version 7.4.428
Bram Moolenaar <bram@vim.org>
parents: 6047
diff changeset
1981
1fe61f6d5207 updated for version 7.4.428
Bram Moolenaar <bram@vim.org>
parents: 6047
diff changeset
1982 curpath = getenv("PATH");
1fe61f6d5207 updated for version 7.4.428
Bram Moolenaar <bram@vim.org>
parents: 6047
diff changeset
1983 newpath = (char*)alloc((unsigned)(STRLEN(curpath) + 3));
1fe61f6d5207 updated for version 7.4.428
Bram Moolenaar <bram@vim.org>
parents: 6047
diff changeset
1984 if (newpath == NULL)
1fe61f6d5207 updated for version 7.4.428
Bram Moolenaar <bram@vim.org>
parents: 6047
diff changeset
1985 return FALSE;
1fe61f6d5207 updated for version 7.4.428
Bram Moolenaar <bram@vim.org>
parents: 6047
diff changeset
1986 STRCPY(newpath, ".;");
1fe61f6d5207 updated for version 7.4.428
Bram Moolenaar <bram@vim.org>
parents: 6047
diff changeset
1987 STRCAT(newpath, curpath);
1fe61f6d5207 updated for version 7.4.428
Bram Moolenaar <bram@vim.org>
parents: 6047
diff changeset
1988 n = (long)SearchPath(newpath, name, NULL, _MAX_PATH, fname, &dum);
1fe61f6d5207 updated for version 7.4.428
Bram Moolenaar <bram@vim.org>
parents: 6047
diff changeset
1989 vim_free(newpath);
1fe61f6d5207 updated for version 7.4.428
Bram Moolenaar <bram@vim.org>
parents: 6047
diff changeset
1990 if (n == 0)
9
4102fb4ea781 updated for version 7.0002
vimboss
parents: 7
diff changeset
1991 return FALSE;
4102fb4ea781 updated for version 7.0002
vimboss
parents: 7
diff changeset
1992 if (mch_isdir(fname))
4102fb4ea781 updated for version 7.0002
vimboss
parents: 7
diff changeset
1993 return FALSE;
5782
5ab2946f7ce5 updated for version 7.4.235
Bram Moolenaar <bram@vim.org>
parents: 5657
diff changeset
1994 if (path != NULL)
5ab2946f7ce5 updated for version 7.4.235
Bram Moolenaar <bram@vim.org>
parents: 5657
diff changeset
1995 *path = vim_strsave(fname);
9
4102fb4ea781 updated for version 7.0002
vimboss
parents: 7
diff changeset
1996 return TRUE;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1997 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1998
2584
f9bd6784f393 updated for version 7.3.009
Bram Moolenaar <bram@vim.org>
parents: 2311
diff changeset
1999 #if ((defined(__MINGW32__) || defined (__CYGWIN32__)) && \
2935
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
2000 __MSVCRT_VERSION__ >= 0x800) || (defined(_MSC_VER) && _MSC_VER >= 1400)
2584
f9bd6784f393 updated for version 7.3.009
Bram Moolenaar <bram@vim.org>
parents: 2311
diff changeset
2001 /*
f9bd6784f393 updated for version 7.3.009
Bram Moolenaar <bram@vim.org>
parents: 2311
diff changeset
2002 * Bad parameter handler.
f9bd6784f393 updated for version 7.3.009
Bram Moolenaar <bram@vim.org>
parents: 2311
diff changeset
2003 *
f9bd6784f393 updated for version 7.3.009
Bram Moolenaar <bram@vim.org>
parents: 2311
diff changeset
2004 * Certain MS CRT functions will intentionally crash when passed invalid
f9bd6784f393 updated for version 7.3.009
Bram Moolenaar <bram@vim.org>
parents: 2311
diff changeset
2005 * parameters to highlight possible security holes. Setting this function as
f9bd6784f393 updated for version 7.3.009
Bram Moolenaar <bram@vim.org>
parents: 2311
diff changeset
2006 * the bad parameter handler will prevent the crash.
f9bd6784f393 updated for version 7.3.009
Bram Moolenaar <bram@vim.org>
parents: 2311
diff changeset
2007 *
f9bd6784f393 updated for version 7.3.009
Bram Moolenaar <bram@vim.org>
parents: 2311
diff changeset
2008 * In debug builds the parameters contain CRT information that might help track
f9bd6784f393 updated for version 7.3.009
Bram Moolenaar <bram@vim.org>
parents: 2311
diff changeset
2009 * down the source of a problem, but in non-debug builds the arguments are all
f9bd6784f393 updated for version 7.3.009
Bram Moolenaar <bram@vim.org>
parents: 2311
diff changeset
2010 * NULL/0. Debug builds will also produce assert dialogs from the CRT, it is
f9bd6784f393 updated for version 7.3.009
Bram Moolenaar <bram@vim.org>
parents: 2311
diff changeset
2011 * worth allowing these to make debugging of issues easier.
f9bd6784f393 updated for version 7.3.009
Bram Moolenaar <bram@vim.org>
parents: 2311
diff changeset
2012 */
f9bd6784f393 updated for version 7.3.009
Bram Moolenaar <bram@vim.org>
parents: 2311
diff changeset
2013 static void
f9bd6784f393 updated for version 7.3.009
Bram Moolenaar <bram@vim.org>
parents: 2311
diff changeset
2014 bad_param_handler(const wchar_t *expression,
f9bd6784f393 updated for version 7.3.009
Bram Moolenaar <bram@vim.org>
parents: 2311
diff changeset
2015 const wchar_t *function,
f9bd6784f393 updated for version 7.3.009
Bram Moolenaar <bram@vim.org>
parents: 2311
diff changeset
2016 const wchar_t *file,
f9bd6784f393 updated for version 7.3.009
Bram Moolenaar <bram@vim.org>
parents: 2311
diff changeset
2017 unsigned int line,
f9bd6784f393 updated for version 7.3.009
Bram Moolenaar <bram@vim.org>
parents: 2311
diff changeset
2018 uintptr_t pReserved)
f9bd6784f393 updated for version 7.3.009
Bram Moolenaar <bram@vim.org>
parents: 2311
diff changeset
2019 {
f9bd6784f393 updated for version 7.3.009
Bram Moolenaar <bram@vim.org>
parents: 2311
diff changeset
2020 }
f9bd6784f393 updated for version 7.3.009
Bram Moolenaar <bram@vim.org>
parents: 2311
diff changeset
2021
f9bd6784f393 updated for version 7.3.009
Bram Moolenaar <bram@vim.org>
parents: 2311
diff changeset
2022 # define SET_INVALID_PARAM_HANDLER \
f9bd6784f393 updated for version 7.3.009
Bram Moolenaar <bram@vim.org>
parents: 2311
diff changeset
2023 ((void)_set_invalid_parameter_handler(bad_param_handler))
f9bd6784f393 updated for version 7.3.009
Bram Moolenaar <bram@vim.org>
parents: 2311
diff changeset
2024 #else
f9bd6784f393 updated for version 7.3.009
Bram Moolenaar <bram@vim.org>
parents: 2311
diff changeset
2025 # define SET_INVALID_PARAM_HANDLER
f9bd6784f393 updated for version 7.3.009
Bram Moolenaar <bram@vim.org>
parents: 2311
diff changeset
2026 #endif
f9bd6784f393 updated for version 7.3.009
Bram Moolenaar <bram@vim.org>
parents: 2311
diff changeset
2027
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2028 #ifdef FEAT_GUI_W32
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2029
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2030 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2031 * GUI version of mch_init().
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2032 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2033 void
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
2034 mch_init(void)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2035 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2036 #ifndef __MINGW32__
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2037 extern int _fmode;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2038 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2039
2584
f9bd6784f393 updated for version 7.3.009
Bram Moolenaar <bram@vim.org>
parents: 2311
diff changeset
2040 /* Silently handle invalid parameters to CRT functions */
f9bd6784f393 updated for version 7.3.009
Bram Moolenaar <bram@vim.org>
parents: 2311
diff changeset
2041 SET_INVALID_PARAM_HANDLER;
f9bd6784f393 updated for version 7.3.009
Bram Moolenaar <bram@vim.org>
parents: 2311
diff changeset
2042
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2043 /* Let critical errors result in a failure, not in a dialog box. Required
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2044 * for the timestamp test to work on removed floppies. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2045 SetErrorMode(SEM_FAILCRITICALERRORS);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2046
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2047 _fmode = O_BINARY; /* we do our own CR-LF translation */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2048
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2049 /* Specify window size. Is there a place to get the default from? */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2050 Rows = 25;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2051 Columns = 80;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2052
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2053 /* Look for 'vimrun' */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2054 if (!gui_is_win32s())
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2055 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2056 char_u vimrun_location[_MAX_PATH + 4];
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2057
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2058 /* First try in same directory as gvim.exe */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2059 STRCPY(vimrun_location, exe_name);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2060 STRCPY(gettail(vimrun_location), "vimrun.exe");
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2061 if (mch_getperm(vimrun_location) >= 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2062 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2063 if (*skiptowhite(vimrun_location) != NUL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2064 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2065 /* Enclose path with white space in double quotes. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2066 mch_memmove(vimrun_location + 1, vimrun_location,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2067 STRLEN(vimrun_location) + 1);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2068 *vimrun_location = '"';
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2069 STRCPY(gettail(vimrun_location), "vimrun\" ");
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2070 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2071 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2072 STRCPY(gettail(vimrun_location), "vimrun ");
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2073
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2074 vimrun_path = (char *)vim_strsave(vimrun_location);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2075 s_dont_use_vimrun = FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2076 }
5782
5ab2946f7ce5 updated for version 7.4.235
Bram Moolenaar <bram@vim.org>
parents: 5657
diff changeset
2077 else if (executable_exists("vimrun.exe", NULL))
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2078 s_dont_use_vimrun = FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2079
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2080 /* Don't give the warning for a missing vimrun.exe right now, but only
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2081 * when vimrun was supposed to be used. Don't bother people that do
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2082 * not need vimrun.exe. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2083 if (s_dont_use_vimrun)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2084 need_vimrun_warning = TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2085 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2086
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2087 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2088 * If "finstr.exe" doesn't exist, use "grep -n" for 'grepprg'.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2089 * Otherwise the default "findstr /n" is used.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2090 */
5782
5ab2946f7ce5 updated for version 7.4.235
Bram Moolenaar <bram@vim.org>
parents: 5657
diff changeset
2091 if (!executable_exists("findstr.exe", NULL))
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2092 set_option_value((char_u *)"grepprg", 0, (char_u *)"grep -n", 0);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2093
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2094 #ifdef FEAT_CLIPBOARD
4168
ff193256398a updated for version 7.3.836
Bram Moolenaar <bram@vim.org>
parents: 4122
diff changeset
2095 win_clip_init();
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2096 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2097 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2098
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2099
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2100 #else /* FEAT_GUI_W32 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2101
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2102 #define SRWIDTH(sr) ((sr).Right - (sr).Left + 1)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2103 #define SRHEIGHT(sr) ((sr).Bottom - (sr).Top + 1)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2104
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2105 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2106 * ClearConsoleBuffer()
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2107 * Description:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2108 * Clears the entire contents of the console screen buffer, using the
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2109 * specified attribute.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2110 * Returns:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2111 * TRUE on success
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2112 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2113 static BOOL
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2114 ClearConsoleBuffer(WORD wAttribute)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2115 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2116 CONSOLE_SCREEN_BUFFER_INFO csbi;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2117 COORD coord;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2118 DWORD NumCells, dummy;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2119
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2120 if (!GetConsoleScreenBufferInfo(g_hConOut, &csbi))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2121 return FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2122
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2123 NumCells = csbi.dwSize.X * csbi.dwSize.Y;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2124 coord.X = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2125 coord.Y = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2126 if (!FillConsoleOutputCharacter(g_hConOut, ' ', NumCells,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2127 coord, &dummy))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2128 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2129 return FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2130 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2131 if (!FillConsoleOutputAttribute(g_hConOut, wAttribute, NumCells,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2132 coord, &dummy))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2133 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2134 return FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2135 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2136
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2137 return TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2138 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2139
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2140 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2141 * FitConsoleWindow()
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2142 * Description:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2143 * Checks if the console window will fit within given buffer dimensions.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2144 * Also, if requested, will shrink the window to fit.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2145 * Returns:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2146 * TRUE on success
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2147 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2148 static BOOL
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2149 FitConsoleWindow(
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2150 COORD dwBufferSize,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2151 BOOL WantAdjust)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2152 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2153 CONSOLE_SCREEN_BUFFER_INFO csbi;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2154 COORD dwWindowSize;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2155 BOOL NeedAdjust = FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2156
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2157 if (GetConsoleScreenBufferInfo(g_hConOut, &csbi))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2158 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2159 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2160 * A buffer resize will fail if the current console window does
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2161 * not lie completely within that buffer. To avoid this, we might
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2162 * have to move and possibly shrink the window.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2163 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2164 if (csbi.srWindow.Right >= dwBufferSize.X)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2165 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2166 dwWindowSize.X = SRWIDTH(csbi.srWindow);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2167 if (dwWindowSize.X > dwBufferSize.X)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2168 dwWindowSize.X = dwBufferSize.X;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2169 csbi.srWindow.Right = dwBufferSize.X - 1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2170 csbi.srWindow.Left = dwBufferSize.X - dwWindowSize.X;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2171 NeedAdjust = TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2172 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2173 if (csbi.srWindow.Bottom >= dwBufferSize.Y)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2174 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2175 dwWindowSize.Y = SRHEIGHT(csbi.srWindow);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2176 if (dwWindowSize.Y > dwBufferSize.Y)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2177 dwWindowSize.Y = dwBufferSize.Y;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2178 csbi.srWindow.Bottom = dwBufferSize.Y - 1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2179 csbi.srWindow.Top = dwBufferSize.Y - dwWindowSize.Y;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2180 NeedAdjust = TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2181 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2182 if (NeedAdjust && WantAdjust)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2183 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2184 if (!SetConsoleWindowInfo(g_hConOut, TRUE, &csbi.srWindow))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2185 return FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2186 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2187 return TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2188 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2189
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2190 return FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2191 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2192
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2193 typedef struct ConsoleBufferStruct
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2194 {
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
2195 BOOL IsValid;
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
2196 CONSOLE_SCREEN_BUFFER_INFO Info;
7184
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2197 PCHAR_INFO Buffer;
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2198 COORD BufferSize;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2199 } ConsoleBuffer;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2200
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2201 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2202 * SaveConsoleBuffer()
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2203 * Description:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2204 * Saves important information about the console buffer, including the
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2205 * actual buffer contents. The saved information is suitable for later
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2206 * restoration by RestoreConsoleBuffer().
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2207 * Returns:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2208 * TRUE if all information was saved; FALSE otherwise
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2209 * If FALSE, still sets cb->IsValid if buffer characteristics were saved.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2210 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2211 static BOOL
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2212 SaveConsoleBuffer(
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2213 ConsoleBuffer *cb)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2214 {
7184
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2215 DWORD NumCells;
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2216 COORD BufferCoord;
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2217 SMALL_RECT ReadRegion;
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2218 WORD Y, Y_incr;
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2219
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2220 if (cb == NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2221 return FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2222
7184
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2223 if (!GetConsoleScreenBufferInfo(g_hConOut, &cb->Info))
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2224 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2225 cb->IsValid = FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2226 return FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2227 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2228 cb->IsValid = TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2229
7184
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2230 /*
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2231 * Allocate a buffer large enough to hold the entire console screen
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2232 * buffer. If this ConsoleBuffer structure has already been initialized
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2233 * with a buffer of the correct size, then just use that one.
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2234 */
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2235 if (!cb->IsValid || cb->Buffer == NULL ||
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2236 cb->BufferSize.X != cb->Info.dwSize.X ||
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2237 cb->BufferSize.Y != cb->Info.dwSize.Y)
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2238 {
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2239 cb->BufferSize.X = cb->Info.dwSize.X;
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2240 cb->BufferSize.Y = cb->Info.dwSize.Y;
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2241 NumCells = cb->BufferSize.X * cb->BufferSize.Y;
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2242 vim_free(cb->Buffer);
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2243 cb->Buffer = (PCHAR_INFO)alloc(NumCells * sizeof(CHAR_INFO));
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2244 if (cb->Buffer == NULL)
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2245 return FALSE;
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2246 }
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2247
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2248 /*
7184
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2249 * We will now copy the console screen buffer into our buffer.
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2250 * ReadConsoleOutput() seems to be limited as far as how much you
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2251 * can read at a time. Empirically, this number seems to be about
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2252 * 12000 cells (rows * columns). Start at position (0, 0) and copy
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2253 * in chunks until it is all copied. The chunks will all have the
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2254 * same horizontal characteristics, so initialize them now. The
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2255 * height of each chunk will be (12000 / width).
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2256 */
7078
383d6f39669b commit https://github.com/vim/vim/commit/615942452eb74eee7d8386fd3d76a1534181fa06
Christian Brabandt <cb@256bit.org>
parents: 6981
diff changeset
2257 BufferCoord.X = 0;
7184
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2258 ReadRegion.Left = 0;
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2259 ReadRegion.Right = cb->Info.dwSize.X - 1;
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2260 Y_incr = 12000 / cb->Info.dwSize.X;
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2261 for (Y = 0; Y < cb->BufferSize.Y; Y += Y_incr)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2262 {
7184
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2263 /*
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2264 * Read into position (0, Y) in our buffer.
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2265 */
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2266 BufferCoord.Y = Y;
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2267 /*
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2268 * Read the region whose top left corner is (0, Y) and whose bottom
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2269 * right corner is (width - 1, Y + Y_incr - 1). This should define
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2270 * a region of size width by Y_incr. Don't worry if this region is
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2271 * too large for the remaining buffer; it will be cropped.
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2272 */
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2273 ReadRegion.Top = Y;
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2274 ReadRegion.Bottom = Y + Y_incr - 1;
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2275 if (!ReadConsoleOutput(g_hConOut, /* output handle */
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2276 cb->Buffer, /* our buffer */
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2277 cb->BufferSize, /* dimensions of our buffer */
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2278 BufferCoord, /* offset in our buffer */
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2279 &ReadRegion)) /* region to save */
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2280 {
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2281 vim_free(cb->Buffer);
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2282 cb->Buffer = NULL;
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2283 return FALSE;
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2284 }
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2285 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2286
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2287 return TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2288 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2289
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2290 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2291 * RestoreConsoleBuffer()
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2292 * Description:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2293 * Restores important information about the console buffer, including the
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2294 * actual buffer contents, if desired. The information to restore is in
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2295 * the same format used by SaveConsoleBuffer().
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2296 * Returns:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2297 * TRUE on success
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2298 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2299 static BOOL
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2300 RestoreConsoleBuffer(
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
2301 ConsoleBuffer *cb,
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
2302 BOOL RestoreScreen)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2303 {
7184
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2304 COORD BufferCoord;
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2305 SMALL_RECT WriteRegion;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2306
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2307 if (cb == NULL || !cb->IsValid)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2308 return FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2309
7184
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2310 /*
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2311 * Before restoring the buffer contents, clear the current buffer, and
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2312 * restore the cursor position and window information. Doing this now
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2313 * prevents old buffer contents from "flashing" onto the screen.
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2314 */
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2315 if (RestoreScreen)
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2316 ClearConsoleBuffer(cb->Info.wAttributes);
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2317
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2318 FitConsoleWindow(cb->Info.dwSize, TRUE);
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2319 if (!SetConsoleScreenBufferSize(g_hConOut, cb->Info.dwSize))
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2320 return FALSE;
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2321 if (!SetConsoleTextAttribute(g_hConOut, cb->Info.wAttributes))
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2322 return FALSE;
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2323
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2324 if (!RestoreScreen)
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2325 {
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2326 /*
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2327 * No need to restore the screen buffer contents, so we're done.
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2328 */
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2329 return TRUE;
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2330 }
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2331
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2332 if (!SetConsoleCursorPosition(g_hConOut, cb->Info.dwCursorPosition))
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2333 return FALSE;
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2334 if (!SetConsoleWindowInfo(g_hConOut, TRUE, &cb->Info.srWindow))
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2335 return FALSE;
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2336
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2337 /*
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2338 * Restore the screen buffer contents.
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2339 */
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2340 if (cb->Buffer != NULL)
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2341 {
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2342 BufferCoord.X = 0;
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2343 BufferCoord.Y = 0;
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2344 WriteRegion.Left = 0;
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2345 WriteRegion.Top = 0;
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2346 WriteRegion.Right = cb->Info.dwSize.X - 1;
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2347 WriteRegion.Bottom = cb->Info.dwSize.Y - 1;
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2348 if (!WriteConsoleOutput(g_hConOut, /* output handle */
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2349 cb->Buffer, /* our buffer */
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2350 cb->BufferSize, /* dimensions of our buffer */
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2351 BufferCoord, /* offset in our buffer */
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2352 &WriteRegion)) /* region to restore */
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2353 {
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2354 return FALSE;
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2355 }
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2356 }
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2357
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2358 return TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2359 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2360
7184
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2361 #define FEAT_RESTORE_ORIG_SCREEN
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2362 #ifdef FEAT_RESTORE_ORIG_SCREEN
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2363 static ConsoleBuffer g_cbOrig = { 0 };
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2364 #endif
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2365 static ConsoleBuffer g_cbNonTermcap = { 0 };
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2366 static ConsoleBuffer g_cbTermcap = { 0 };
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2367
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2368 #ifdef FEAT_TITLE
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2369 #ifdef __BORLANDC__
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2370 typedef HWND (__stdcall *GETCONSOLEWINDOWPROC)(VOID);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2371 #else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2372 typedef WINBASEAPI HWND (WINAPI *GETCONSOLEWINDOWPROC)(VOID);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2373 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2374 char g_szOrigTitle[256] = { 0 };
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2375 HWND g_hWnd = NULL; /* also used in os_mswin.c */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2376 static HICON g_hOrigIconSmall = NULL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2377 static HICON g_hOrigIcon = NULL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2378 static HICON g_hVimIcon = NULL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2379 static BOOL g_fCanChangeIcon = FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2380
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2381 /* ICON* are not defined in VC++ 4.0 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2382 #ifndef ICON_SMALL
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2383 #define ICON_SMALL 0
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2384 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2385 #ifndef ICON_BIG
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2386 #define ICON_BIG 1
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2387 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2388 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2389 * GetConsoleIcon()
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2390 * Description:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2391 * Attempts to retrieve the small icon and/or the big icon currently in
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2392 * use by a given window.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2393 * Returns:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2394 * TRUE on success
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2395 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2396 static BOOL
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2397 GetConsoleIcon(
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
2398 HWND hWnd,
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
2399 HICON *phIconSmall,
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
2400 HICON *phIcon)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2401 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2402 if (hWnd == NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2403 return FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2404
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2405 if (phIconSmall != NULL)
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
2406 *phIconSmall = (HICON)SendMessage(hWnd, WM_GETICON,
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
2407 (WPARAM)ICON_SMALL, (LPARAM)0);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2408 if (phIcon != NULL)
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
2409 *phIcon = (HICON)SendMessage(hWnd, WM_GETICON,
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
2410 (WPARAM)ICON_BIG, (LPARAM)0);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2411 return TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2412 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2413
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2414 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2415 * SetConsoleIcon()
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2416 * Description:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2417 * Attempts to change the small icon and/or the big icon currently in
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2418 * use by a given window.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2419 * Returns:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2420 * TRUE on success
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2421 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2422 static BOOL
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2423 SetConsoleIcon(
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
2424 HWND hWnd,
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
2425 HICON hIconSmall,
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
2426 HICON hIcon)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2427 {
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
2428 HICON hPrevIconSmall;
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
2429 HICON hPrevIcon;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2430
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2431 if (hWnd == NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2432 return FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2433
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2434 if (hIconSmall != NULL)
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
2435 hPrevIconSmall = (HICON)SendMessage(hWnd, WM_SETICON,
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
2436 (WPARAM)ICON_SMALL, (LPARAM)hIconSmall);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2437 if (hIcon != NULL)
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
2438 hPrevIcon = (HICON)SendMessage(hWnd, WM_SETICON,
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
2439 (WPARAM)ICON_BIG,(LPARAM) hIcon);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2440 return TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2441 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2442
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2443 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2444 * SaveConsoleTitleAndIcon()
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2445 * Description:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2446 * Saves the current console window title in g_szOrigTitle, for later
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2447 * restoration. Also, attempts to obtain a handle to the console window,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2448 * and use it to save the small and big icons currently in use by the
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2449 * console window. This is not always possible on some versions of Windows;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2450 * nor is it possible when running Vim remotely using Telnet (since the
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2451 * console window the user sees is owned by a remote process).
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2452 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2453 static void
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2454 SaveConsoleTitleAndIcon(void)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2455 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2456 GETCONSOLEWINDOWPROC GetConsoleWindowProc;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2457
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2458 /* Save the original title. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2459 if (!GetConsoleTitle(g_szOrigTitle, sizeof(g_szOrigTitle)))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2460 return;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2461
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2462 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2463 * Obtain a handle to the console window using GetConsoleWindow() from
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2464 * KERNEL32.DLL; we need to handle in order to change the window icon.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2465 * This function only exists on NT-based Windows, starting with Windows
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2466 * 2000. On older operating systems, we can't change the window icon
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2467 * anyway.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2468 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2469 if ((GetConsoleWindowProc = (GETCONSOLEWINDOWPROC)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2470 GetProcAddress(GetModuleHandle("KERNEL32.DLL"),
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2471 "GetConsoleWindow")) != NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2472 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2473 g_hWnd = (*GetConsoleWindowProc)();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2474 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2475 if (g_hWnd == NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2476 return;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2477
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2478 /* Save the original console window icon. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2479 GetConsoleIcon(g_hWnd, &g_hOrigIconSmall, &g_hOrigIcon);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2480 if (g_hOrigIconSmall == NULL || g_hOrigIcon == NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2481 return;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2482
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2483 /* Extract the first icon contained in the Vim executable. */
6249
7816c24ff890 updated for version 7.4.459
Bram Moolenaar <bram@vim.org>
parents: 6193
diff changeset
2484 if (mch_icon_load((HANDLE *)&g_hVimIcon) == FAIL || g_hVimIcon == NULL)
7816c24ff890 updated for version 7.4.459
Bram Moolenaar <bram@vim.org>
parents: 6193
diff changeset
2485 g_hVimIcon = ExtractIcon(NULL, exe_name, 0);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2486 if (g_hVimIcon != NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2487 g_fCanChangeIcon = TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2488 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2489 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2490
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2491 static int g_fWindInitCalled = FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2492 static int g_fTermcapMode = FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2493 static CONSOLE_CURSOR_INFO g_cci;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2494 static DWORD g_cmodein = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2495 static DWORD g_cmodeout = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2496
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2497 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2498 * non-GUI version of mch_init().
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2499 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2500 void
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
2501 mch_init(void)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2502 {
7184
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2503 #ifndef FEAT_RESTORE_ORIG_SCREEN
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2504 CONSOLE_SCREEN_BUFFER_INFO csbi;
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2505 #endif
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2506 #ifndef __MINGW32__
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2507 extern int _fmode;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2508 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2509
2584
f9bd6784f393 updated for version 7.3.009
Bram Moolenaar <bram@vim.org>
parents: 2311
diff changeset
2510 /* Silently handle invalid parameters to CRT functions */
f9bd6784f393 updated for version 7.3.009
Bram Moolenaar <bram@vim.org>
parents: 2311
diff changeset
2511 SET_INVALID_PARAM_HANDLER;
f9bd6784f393 updated for version 7.3.009
Bram Moolenaar <bram@vim.org>
parents: 2311
diff changeset
2512
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2513 /* Let critical errors result in a failure, not in a dialog box. Required
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2514 * for the timestamp test to work on removed floppies. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2515 SetErrorMode(SEM_FAILCRITICALERRORS);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2516
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2517 _fmode = O_BINARY; /* we do our own CR-LF translation */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2518 out_flush();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2519
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2520 /* Obtain handles for the standard Console I/O devices */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2521 if (read_cmd_fd == 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2522 g_hConIn = GetStdHandle(STD_INPUT_HANDLE);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2523 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2524 create_conin();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2525 g_hConOut = GetStdHandle(STD_OUTPUT_HANDLE);
7184
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2526
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2527 #ifdef FEAT_RESTORE_ORIG_SCREEN
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2528 /* Save the initial console buffer for later restoration */
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2529 SaveConsoleBuffer(&g_cbOrig);
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2530 g_attrCurrent = g_attrDefault = g_cbOrig.Info.wAttributes;
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2531 #else
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2532 /* Get current text attributes */
7184
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2533 GetConsoleScreenBufferInfo(g_hConOut, &csbi);
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2534 g_attrCurrent = g_attrDefault = csbi.wAttributes;
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
2535 #endif
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2536 if (cterm_normal_fg_color == 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2537 cterm_normal_fg_color = (g_attrCurrent & 0xf) + 1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2538 if (cterm_normal_bg_color == 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2539 cterm_normal_bg_color = ((g_attrCurrent >> 4) & 0xf) + 1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2540
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2541 /* set termcap codes to current text attributes */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2542 update_tcap(g_attrCurrent);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2543
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2544 GetConsoleCursorInfo(g_hConOut, &g_cci);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2545 GetConsoleMode(g_hConIn, &g_cmodein);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2546 GetConsoleMode(g_hConOut, &g_cmodeout);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2547
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2548 #ifdef FEAT_TITLE
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2549 SaveConsoleTitleAndIcon();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2550 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2551 * Set both the small and big icons of the console window to Vim's icon.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2552 * Note that Vim presently only has one size of icon (32x32), but it
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2553 * automatically gets scaled down to 16x16 when setting the small icon.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2554 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2555 if (g_fCanChangeIcon)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2556 SetConsoleIcon(g_hWnd, g_hVimIcon, g_hVimIcon);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2557 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2558
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2559 ui_get_shellsize();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2560
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2561 #ifdef MCH_WRITE_DUMP
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2562 fdDump = fopen("dump", "wt");
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2563
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2564 if (fdDump)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2565 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2566 time_t t;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2567
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2568 time(&t);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2569 fputs(ctime(&t), fdDump);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2570 fflush(fdDump);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2571 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2572 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2573
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2574 g_fWindInitCalled = TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2575
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2576 #ifdef FEAT_MOUSE
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2577 g_fMouseAvail = GetSystemMetrics(SM_MOUSEPRESENT);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2578 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2579
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2580 #ifdef FEAT_CLIPBOARD
4168
ff193256398a updated for version 7.3.836
Bram Moolenaar <bram@vim.org>
parents: 4122
diff changeset
2581 win_clip_init();
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2582 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2583
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2584 /* This will be NULL on anything but NT 4.0 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2585 s_pfnGetConsoleKeyboardLayoutName =
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2586 (PFNGCKLN) GetProcAddress(GetModuleHandle("kernel32.dll"),
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2587 "GetConsoleKeyboardLayoutNameA");
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2588 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2589
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2590 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2591 * non-GUI version of mch_exit().
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2592 * Shut down and exit with status `r'
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2593 * Careful: mch_exit() may be called before mch_init()!
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2594 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2595 void
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2596 mch_exit(int r)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2597 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2598 stoptermcap();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2599
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2600 if (g_fWindInitCalled)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2601 settmode(TMODE_COOK);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2602
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2603 ml_close_all(TRUE); /* remove all memfiles */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2604
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2605 if (g_fWindInitCalled)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2606 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2607 #ifdef FEAT_TITLE
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2608 mch_restore_title(3);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2609 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2610 * Restore both the small and big icons of the console window to
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2611 * what they were at startup. Don't do this when the window is
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2612 * closed, Vim would hang here.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2613 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2614 if (g_fCanChangeIcon && !g_fForceExit)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2615 SetConsoleIcon(g_hWnd, g_hOrigIconSmall, g_hOrigIcon);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2616 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2617
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2618 #ifdef MCH_WRITE_DUMP
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2619 if (fdDump)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2620 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2621 time_t t;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2622
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2623 time(&t);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2624 fputs(ctime(&t), fdDump);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2625 fclose(fdDump);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2626 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2627 fdDump = NULL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2628 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2629 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2630
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2631 SetConsoleCursorInfo(g_hConOut, &g_cci);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2632 SetConsoleMode(g_hConIn, g_cmodein);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2633 SetConsoleMode(g_hConOut, g_cmodeout);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2634
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2635 #ifdef DYNAMIC_GETTEXT
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2636 dyn_libintl_end();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2637 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2638
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2639 exit(r);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2640 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2641 #endif /* !FEAT_GUI_W32 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2642
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2643 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2644 * Do we have an interactive window?
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2645 */
323
03b3684919e3 updated for version 7.0084
vimboss
parents: 297
diff changeset
2646 /*ARGSUSED*/
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2647 int
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2648 mch_check_win(
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2649 int argc,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2650 char **argv)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2651 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2652 get_exe_name();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2653
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2654 #ifdef FEAT_GUI_W32
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2655 return OK; /* GUI always has a tty */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2656 #else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2657 if (isatty(1))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2658 return OK;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2659 return FAIL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2660 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2661 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2662
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2663
5326
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2664 #ifdef FEAT_MBYTE
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2665 /*
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2666 * fname_casew(): Wide version of fname_case(). Set the case of the file name,
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2667 * if it already exists. When "len" is > 0, also expand short to long
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2668 * filenames.
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2669 * Return FAIL if wide functions are not available, OK otherwise.
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2670 * NOTE: much of this is identical to fname_case(), keep in sync!
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2671 */
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2672 static int
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2673 fname_casew(
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2674 WCHAR *name,
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2675 int len)
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2676 {
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2677 WCHAR szTrueName[_MAX_PATH + 2];
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2678 WCHAR szTrueNameTemp[_MAX_PATH + 2];
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2679 WCHAR *ptrue, *ptruePrev;
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2680 WCHAR *porig, *porigPrev;
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2681 int flen;
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2682 WIN32_FIND_DATAW fb;
5529
0e21e2a38ec6 updated for version 7.4.113
Bram Moolenaar <bram@vim.org>
parents: 5494
diff changeset
2683 HANDLE hFind = INVALID_HANDLE_VALUE;
5326
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2684 int c;
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2685 int slen;
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2686
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2687 flen = (int)wcslen(name);
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2688 if (flen > _MAX_PATH)
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2689 return OK;
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2690
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2691 /* slash_adjust(name) not needed, already adjusted by fname_case(). */
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2692
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2693 /* Build the new name in szTrueName[] one component at a time. */
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2694 porig = name;
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2695 ptrue = szTrueName;
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2696
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2697 if (iswalpha(porig[0]) && porig[1] == L':')
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2698 {
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2699 /* copy leading drive letter */
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2700 *ptrue++ = *porig++;
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2701 *ptrue++ = *porig++;
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2702 }
5529
0e21e2a38ec6 updated for version 7.4.113
Bram Moolenaar <bram@vim.org>
parents: 5494
diff changeset
2703 *ptrue = NUL; /* in case nothing follows */
5326
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2704
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2705 while (*porig != NUL)
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2706 {
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2707 /* copy \ characters */
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2708 while (*porig == psepc)
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2709 *ptrue++ = *porig++;
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2710
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2711 ptruePrev = ptrue;
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2712 porigPrev = porig;
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2713 while (*porig != NUL && *porig != psepc)
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2714 {
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2715 *ptrue++ = *porig++;
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2716 }
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2717 *ptrue = NUL;
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2718
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2719 /* To avoid a slow failure append "\*" when searching a directory,
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2720 * server or network share. */
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2721 wcscpy(szTrueNameTemp, szTrueName);
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2722 slen = (int)wcslen(szTrueNameTemp);
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2723 if (*porig == psepc && slen + 2 < _MAX_PATH)
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2724 wcscpy(szTrueNameTemp + slen, L"\\*");
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2725
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2726 /* Skip "", "." and "..". */
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2727 if (ptrue > ptruePrev
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2728 && (ptruePrev[0] != L'.'
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2729 || (ptruePrev[1] != NUL
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2730 && (ptruePrev[1] != L'.' || ptruePrev[2] != NUL)))
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2731 && (hFind = FindFirstFileW(szTrueNameTemp, &fb))
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2732 != INVALID_HANDLE_VALUE)
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2733 {
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2734 c = *porig;
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2735 *porig = NUL;
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2736
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2737 /* Only use the match when it's the same name (ignoring case) or
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2738 * expansion is allowed and there is a match with the short name
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2739 * and there is enough room. */
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2740 if (_wcsicoll(porigPrev, fb.cFileName) == 0
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2741 || (len > 0
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2742 && (_wcsicoll(porigPrev, fb.cAlternateFileName) == 0
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2743 && (int)(ptruePrev - szTrueName)
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2744 + (int)wcslen(fb.cFileName) < len)))
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2745 {
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2746 wcscpy(ptruePrev, fb.cFileName);
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2747
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2748 /* Look for exact match and prefer it if found. Must be a
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2749 * long name, otherwise there would be only one match. */
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2750 while (FindNextFileW(hFind, &fb))
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2751 {
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2752 if (*fb.cAlternateFileName != NUL
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2753 && (wcscoll(porigPrev, fb.cFileName) == 0
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2754 || (len > 0
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2755 && (_wcsicoll(porigPrev,
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2756 fb.cAlternateFileName) == 0
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2757 && (int)(ptruePrev - szTrueName)
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2758 + (int)wcslen(fb.cFileName) < len))))
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2759 {
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2760 wcscpy(ptruePrev, fb.cFileName);
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2761 break;
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2762 }
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2763 }
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2764 }
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2765 FindClose(hFind);
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2766 *porig = c;
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2767 ptrue = ptruePrev + wcslen(ptruePrev);
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2768 }
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2769 else if (hFind == INVALID_HANDLE_VALUE
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2770 && GetLastError() == ERROR_CALL_NOT_IMPLEMENTED)
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2771 return FAIL;
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2772 }
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2773
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2774 wcscpy(name, szTrueName);
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2775 return OK;
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2776 }
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2777 #endif
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2778
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2779 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2780 * fname_case(): Set the case of the file name, if it already exists.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2781 * When "len" is > 0, also expand short to long filenames.
5326
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2782 * NOTE: much of this is identical to fname_casew(), keep in sync!
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2783 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2784 void
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2785 fname_case(
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2786 char_u *name,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2787 int len)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2788 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2789 char szTrueName[_MAX_PATH + 2];
2604
6a85219723b9 updated for version 7.3.027
Bram Moolenaar <bram@vim.org>
parents: 2584
diff changeset
2790 char szTrueNameTemp[_MAX_PATH + 2];
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2791 char *ptrue, *ptruePrev;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2792 char *porig, *porigPrev;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2793 int flen;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2794 WIN32_FIND_DATA fb;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2795 HANDLE hFind;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2796 int c;
2604
6a85219723b9 updated for version 7.3.027
Bram Moolenaar <bram@vim.org>
parents: 2584
diff changeset
2797 int slen;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2798
434
9595cf1d80a7 updated for version 7.0112
vimboss
parents: 417
diff changeset
2799 flen = (int)STRLEN(name);
5326
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2800 if (flen == 0)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2801 return;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2802
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2803 slash_adjust(name);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2804
5326
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2805 #ifdef FEAT_MBYTE
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2806 if (enc_codepage >= 0 && (int)GetACP() != enc_codepage)
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2807 {
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2808 WCHAR *p = enc_to_utf16(name, NULL);
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2809
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2810 if (p != NULL)
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2811 {
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2812 char_u *q;
6262
452e8b2a0ab3 updated for version 7.4.465
Bram Moolenaar <bram@vim.org>
parents: 6249
diff changeset
2813 WCHAR buf[_MAX_PATH + 1];
452e8b2a0ab3 updated for version 7.4.465
Bram Moolenaar <bram@vim.org>
parents: 6249
diff changeset
2814
452e8b2a0ab3 updated for version 7.4.465
Bram Moolenaar <bram@vim.org>
parents: 6249
diff changeset
2815 wcsncpy(buf, p, _MAX_PATH);
452e8b2a0ab3 updated for version 7.4.465
Bram Moolenaar <bram@vim.org>
parents: 6249
diff changeset
2816 buf[_MAX_PATH] = L'\0';
5326
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2817 vim_free(p);
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2818
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2819 if (fname_casew(buf, (len > 0) ? _MAX_PATH : 0) == OK)
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2820 {
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2821 q = utf16_to_enc(buf, NULL);
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2822 if (q != NULL)
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2823 {
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2824 vim_strncpy(name, q, (len > 0) ? len - 1 : flen);
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2825 vim_free(q);
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2826 return;
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2827 }
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2828 }
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2829 }
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2830 /* Retry with non-wide function (for Windows 98). */
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2831 }
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2832 #endif
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2833
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2834 /* If 'enc' is utf-8, flen can be larger than _MAX_PATH.
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2835 * So we should check this after calling wide function. */
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2836 if (flen > _MAX_PATH)
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2837 return;
8d5cd0ec3e71 updated for version 7.4.016
Bram Moolenaar <bram@vim.org>
parents: 5324
diff changeset
2838
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2839 /* Build the new name in szTrueName[] one component at a time. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2840 porig = name;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2841 ptrue = szTrueName;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2842
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2843 if (isalpha(porig[0]) && porig[1] == ':')
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2844 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2845 /* copy leading drive letter */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2846 *ptrue++ = *porig++;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2847 *ptrue++ = *porig++;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2848 }
5529
0e21e2a38ec6 updated for version 7.4.113
Bram Moolenaar <bram@vim.org>
parents: 5494
diff changeset
2849 *ptrue = NUL; /* in case nothing follows */
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2850
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2851 while (*porig != NUL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2852 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2853 /* copy \ characters */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2854 while (*porig == psepc)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2855 *ptrue++ = *porig++;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2856
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2857 ptruePrev = ptrue;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2858 porigPrev = porig;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2859 while (*porig != NUL && *porig != psepc)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2860 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2861 #ifdef FEAT_MBYTE
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2862 int l;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2863
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2864 if (enc_dbcs)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2865 {
474
a5fcf36ef512 updated for version 7.0127
vimboss
parents: 434
diff changeset
2866 l = (*mb_ptr2len)(porig);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2867 while (--l >= 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2868 *ptrue++ = *porig++;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2869 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2870 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2871 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2872 *ptrue++ = *porig++;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2873 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2874 *ptrue = NUL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2875
2604
6a85219723b9 updated for version 7.3.027
Bram Moolenaar <bram@vim.org>
parents: 2584
diff changeset
2876 /* To avoid a slow failure append "\*" when searching a directory,
6a85219723b9 updated for version 7.3.027
Bram Moolenaar <bram@vim.org>
parents: 2584
diff changeset
2877 * server or network share. */
6a85219723b9 updated for version 7.3.027
Bram Moolenaar <bram@vim.org>
parents: 2584
diff changeset
2878 STRCPY(szTrueNameTemp, szTrueName);
2615
c6fe65c000d2 updated for version 7.3.037
Bram Moolenaar <bram@vim.org>
parents: 2613
diff changeset
2879 slen = (int)strlen(szTrueNameTemp);
2604
6a85219723b9 updated for version 7.3.027
Bram Moolenaar <bram@vim.org>
parents: 2584
diff changeset
2880 if (*porig == psepc && slen + 2 < _MAX_PATH)
6a85219723b9 updated for version 7.3.027
Bram Moolenaar <bram@vim.org>
parents: 2584
diff changeset
2881 STRCPY(szTrueNameTemp + slen, "\\*");
6a85219723b9 updated for version 7.3.027
Bram Moolenaar <bram@vim.org>
parents: 2584
diff changeset
2882
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2883 /* Skip "", "." and "..". */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2884 if (ptrue > ptruePrev
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2885 && (ptruePrev[0] != '.'
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2886 || (ptruePrev[1] != NUL
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2887 && (ptruePrev[1] != '.' || ptruePrev[2] != NUL)))
2604
6a85219723b9 updated for version 7.3.027
Bram Moolenaar <bram@vim.org>
parents: 2584
diff changeset
2888 && (hFind = FindFirstFile(szTrueNameTemp, &fb))
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2889 != INVALID_HANDLE_VALUE)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2890 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2891 c = *porig;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2892 *porig = NUL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2893
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2894 /* Only use the match when it's the same name (ignoring case) or
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2895 * expansion is allowed and there is a match with the short name
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2896 * and there is enough room. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2897 if (_stricoll(porigPrev, fb.cFileName) == 0
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2898 || (len > 0
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2899 && (_stricoll(porigPrev, fb.cAlternateFileName) == 0
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2900 && (int)(ptruePrev - szTrueName)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2901 + (int)strlen(fb.cFileName) < len)))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2902 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2903 STRCPY(ptruePrev, fb.cFileName);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2904
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2905 /* Look for exact match and prefer it if found. Must be a
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2906 * long name, otherwise there would be only one match. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2907 while (FindNextFile(hFind, &fb))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2908 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2909 if (*fb.cAlternateFileName != NUL
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2910 && (strcoll(porigPrev, fb.cFileName) == 0
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2911 || (len > 0
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2912 && (_stricoll(porigPrev,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2913 fb.cAlternateFileName) == 0
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2914 && (int)(ptruePrev - szTrueName)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2915 + (int)strlen(fb.cFileName) < len))))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2916 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2917 STRCPY(ptruePrev, fb.cFileName);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2918 break;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2919 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2920 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2921 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2922 FindClose(hFind);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2923 *porig = c;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2924 ptrue = ptruePrev + strlen(ptruePrev);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2925 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2926 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2927
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2928 STRCPY(name, szTrueName);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2929 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2930
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2931
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2932 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2933 * Insert user name in s[len].
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2934 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2935 int
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2936 mch_get_user_name(
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
2937 char_u *s,
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
2938 int len)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2939 {
1414
1f099ff4f6fb updated for version 7.1-129
vimboss
parents: 1199
diff changeset
2940 char szUserName[256 + 1]; /* UNLEN is 256 */
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2941 DWORD cch = sizeof szUserName;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2942
5549
32e50f85d2c7 updated for version 7.4.123
Bram Moolenaar <bram@vim.org>
parents: 5547
diff changeset
2943 #ifdef FEAT_MBYTE
32e50f85d2c7 updated for version 7.4.123
Bram Moolenaar <bram@vim.org>
parents: 5547
diff changeset
2944 if (enc_codepage >= 0 && (int)GetACP() != enc_codepage)
32e50f85d2c7 updated for version 7.4.123
Bram Moolenaar <bram@vim.org>
parents: 5547
diff changeset
2945 {
32e50f85d2c7 updated for version 7.4.123
Bram Moolenaar <bram@vim.org>
parents: 5547
diff changeset
2946 WCHAR wszUserName[256 + 1]; /* UNLEN is 256 */
32e50f85d2c7 updated for version 7.4.123
Bram Moolenaar <bram@vim.org>
parents: 5547
diff changeset
2947 DWORD wcch = sizeof(wszUserName) / sizeof(WCHAR);
32e50f85d2c7 updated for version 7.4.123
Bram Moolenaar <bram@vim.org>
parents: 5547
diff changeset
2948
32e50f85d2c7 updated for version 7.4.123
Bram Moolenaar <bram@vim.org>
parents: 5547
diff changeset
2949 if (GetUserNameW(wszUserName, &wcch))
32e50f85d2c7 updated for version 7.4.123
Bram Moolenaar <bram@vim.org>
parents: 5547
diff changeset
2950 {
32e50f85d2c7 updated for version 7.4.123
Bram Moolenaar <bram@vim.org>
parents: 5547
diff changeset
2951 char_u *p = utf16_to_enc(wszUserName, NULL);
32e50f85d2c7 updated for version 7.4.123
Bram Moolenaar <bram@vim.org>
parents: 5547
diff changeset
2952
32e50f85d2c7 updated for version 7.4.123
Bram Moolenaar <bram@vim.org>
parents: 5547
diff changeset
2953 if (p != NULL)
32e50f85d2c7 updated for version 7.4.123
Bram Moolenaar <bram@vim.org>
parents: 5547
diff changeset
2954 {
32e50f85d2c7 updated for version 7.4.123
Bram Moolenaar <bram@vim.org>
parents: 5547
diff changeset
2955 vim_strncpy(s, p, len - 1);
32e50f85d2c7 updated for version 7.4.123
Bram Moolenaar <bram@vim.org>
parents: 5547
diff changeset
2956 vim_free(p);
32e50f85d2c7 updated for version 7.4.123
Bram Moolenaar <bram@vim.org>
parents: 5547
diff changeset
2957 return OK;
32e50f85d2c7 updated for version 7.4.123
Bram Moolenaar <bram@vim.org>
parents: 5547
diff changeset
2958 }
32e50f85d2c7 updated for version 7.4.123
Bram Moolenaar <bram@vim.org>
parents: 5547
diff changeset
2959 }
5657
6b69d8dde19e updated for version 7.4.175
Bram Moolenaar <bram@vim.org>
parents: 5635
diff changeset
2960 else if (GetLastError() != ERROR_CALL_NOT_IMPLEMENTED)
6b69d8dde19e updated for version 7.4.175
Bram Moolenaar <bram@vim.org>
parents: 5635
diff changeset
2961 return FAIL;
5549
32e50f85d2c7 updated for version 7.4.123
Bram Moolenaar <bram@vim.org>
parents: 5547
diff changeset
2962 /* Retry with non-wide function (for Windows 98). */
32e50f85d2c7 updated for version 7.4.123
Bram Moolenaar <bram@vim.org>
parents: 5547
diff changeset
2963 }
32e50f85d2c7 updated for version 7.4.123
Bram Moolenaar <bram@vim.org>
parents: 5547
diff changeset
2964 #endif
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2965 if (GetUserName(szUserName, &cch))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2966 {
417
8f41fe56e2fc updated for version 7.0109
vimboss
parents: 406
diff changeset
2967 vim_strncpy(s, szUserName, len - 1);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2968 return OK;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2969 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2970 s[0] = NUL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2971 return FAIL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2972 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2973
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2974
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2975 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2976 * Insert host name in s[len].
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2977 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2978 void
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2979 mch_get_host_name(
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2980 char_u *s,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2981 int len)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2982 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2983 DWORD cch = len;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2984
5551
9faba192ea90 updated for version 7.4.124
Bram Moolenaar <bram@vim.org>
parents: 5549
diff changeset
2985 #ifdef FEAT_MBYTE
9faba192ea90 updated for version 7.4.124
Bram Moolenaar <bram@vim.org>
parents: 5549
diff changeset
2986 if (enc_codepage >= 0 && (int)GetACP() != enc_codepage)
9faba192ea90 updated for version 7.4.124
Bram Moolenaar <bram@vim.org>
parents: 5549
diff changeset
2987 {
9faba192ea90 updated for version 7.4.124
Bram Moolenaar <bram@vim.org>
parents: 5549
diff changeset
2988 WCHAR wszHostName[256 + 1];
9faba192ea90 updated for version 7.4.124
Bram Moolenaar <bram@vim.org>
parents: 5549
diff changeset
2989 DWORD wcch = sizeof(wszHostName) / sizeof(WCHAR);
9faba192ea90 updated for version 7.4.124
Bram Moolenaar <bram@vim.org>
parents: 5549
diff changeset
2990
9faba192ea90 updated for version 7.4.124
Bram Moolenaar <bram@vim.org>
parents: 5549
diff changeset
2991 if (GetComputerNameW(wszHostName, &wcch))
9faba192ea90 updated for version 7.4.124
Bram Moolenaar <bram@vim.org>
parents: 5549
diff changeset
2992 {
9faba192ea90 updated for version 7.4.124
Bram Moolenaar <bram@vim.org>
parents: 5549
diff changeset
2993 char_u *p = utf16_to_enc(wszHostName, NULL);
9faba192ea90 updated for version 7.4.124
Bram Moolenaar <bram@vim.org>
parents: 5549
diff changeset
2994
9faba192ea90 updated for version 7.4.124
Bram Moolenaar <bram@vim.org>
parents: 5549
diff changeset
2995 if (p != NULL)
9faba192ea90 updated for version 7.4.124
Bram Moolenaar <bram@vim.org>
parents: 5549
diff changeset
2996 {
9faba192ea90 updated for version 7.4.124
Bram Moolenaar <bram@vim.org>
parents: 5549
diff changeset
2997 vim_strncpy(s, p, len - 1);
9faba192ea90 updated for version 7.4.124
Bram Moolenaar <bram@vim.org>
parents: 5549
diff changeset
2998 vim_free(p);
9faba192ea90 updated for version 7.4.124
Bram Moolenaar <bram@vim.org>
parents: 5549
diff changeset
2999 return;
9faba192ea90 updated for version 7.4.124
Bram Moolenaar <bram@vim.org>
parents: 5549
diff changeset
3000 }
9faba192ea90 updated for version 7.4.124
Bram Moolenaar <bram@vim.org>
parents: 5549
diff changeset
3001 }
5657
6b69d8dde19e updated for version 7.4.175
Bram Moolenaar <bram@vim.org>
parents: 5635
diff changeset
3002 else if (GetLastError() != ERROR_CALL_NOT_IMPLEMENTED)
6b69d8dde19e updated for version 7.4.175
Bram Moolenaar <bram@vim.org>
parents: 5635
diff changeset
3003 return;
5551
9faba192ea90 updated for version 7.4.124
Bram Moolenaar <bram@vim.org>
parents: 5549
diff changeset
3004 /* Retry with non-wide function (for Windows 98). */
9faba192ea90 updated for version 7.4.124
Bram Moolenaar <bram@vim.org>
parents: 5549
diff changeset
3005 }
9faba192ea90 updated for version 7.4.124
Bram Moolenaar <bram@vim.org>
parents: 5549
diff changeset
3006 #endif
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3007 if (!GetComputerName(s, &cch))
417
8f41fe56e2fc updated for version 7.0109
vimboss
parents: 406
diff changeset
3008 vim_strncpy(s, "PC (Win32 Vim)", len - 1);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3009 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3010
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3011
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3012 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3013 * return process ID
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3014 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3015 long
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
3016 mch_get_pid(void)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3017 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3018 return (long)GetCurrentProcessId();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3019 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3020
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3021
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3022 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3023 * Get name of current directory into buffer 'buf' of length 'len' bytes.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3024 * Return OK for success, FAIL for failure.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3025 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3026 int
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3027 mch_dirname(
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3028 char_u *buf,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3029 int len)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3030 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3031 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3032 * Originally this was:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3033 * return (getcwd(buf, len) != NULL ? OK : FAIL);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3034 * But the Win32s known bug list says that getcwd() doesn't work
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3035 * so use the Win32 system call instead. <Negri>
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3036 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3037 #ifdef FEAT_MBYTE
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3038 if (enc_codepage >= 0 && (int)GetACP() != enc_codepage)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3039 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3040 WCHAR wbuf[_MAX_PATH + 1];
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3041
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3042 if (GetCurrentDirectoryW(_MAX_PATH, wbuf) != 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3043 {
1752
a8aae2e1d2ae updated for version 7.2-049
vimboss
parents: 1686
diff changeset
3044 char_u *p = utf16_to_enc(wbuf, NULL);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3045
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3046 if (p != NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3047 {
417
8f41fe56e2fc updated for version 7.0109
vimboss
parents: 406
diff changeset
3048 vim_strncpy(buf, p, len - 1);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3049 vim_free(p);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3050 return OK;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3051 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3052 }
5657
6b69d8dde19e updated for version 7.4.175
Bram Moolenaar <bram@vim.org>
parents: 5635
diff changeset
3053 else if (GetLastError() != ERROR_CALL_NOT_IMPLEMENTED)
6b69d8dde19e updated for version 7.4.175
Bram Moolenaar <bram@vim.org>
parents: 5635
diff changeset
3054 return FAIL;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3055 /* Retry with non-wide function (for Windows 98). */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3056 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3057 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3058 return (GetCurrentDirectory(len, buf) != 0 ? OK : FAIL);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3059 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3060
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3061 /*
5494
645358801356 updated for version 7.4.096
Bram Moolenaar <bram@vim.org>
parents: 5376
diff changeset
3062 * Get file permissions for "name".
645358801356 updated for version 7.4.096
Bram Moolenaar <bram@vim.org>
parents: 5376
diff changeset
3063 * Return mode_t or -1 for error.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3064 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3065 long
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
3066 mch_getperm(char_u *name)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3067 {
4872
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3068 struct stat st;
5494
645358801356 updated for version 7.4.096
Bram Moolenaar <bram@vim.org>
parents: 5376
diff changeset
3069 int n;
645358801356 updated for version 7.4.096
Bram Moolenaar <bram@vim.org>
parents: 5376
diff changeset
3070
4872
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3071 n = mch_stat(name, &st);
5588
2ca470c6096e updated for version 7.4.141
Bram Moolenaar <bram@vim.org>
parents: 5580
diff changeset
3072 return n == 0 ? (long)(unsigned short)st.st_mode : -1L;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3073 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3074
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3075
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3076 /*
5229
1261caf9bc51 updated for version 7.4a.040
Bram Moolenaar <bram@vim.org>
parents: 5112
diff changeset
3077 * Set file permission for "name" to "perm".
4872
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3078 *
5229
1261caf9bc51 updated for version 7.4a.040
Bram Moolenaar <bram@vim.org>
parents: 5112
diff changeset
3079 * Return FAIL for failure, OK otherwise.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3080 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3081 int
5229
1261caf9bc51 updated for version 7.4a.040
Bram Moolenaar <bram@vim.org>
parents: 5112
diff changeset
3082 mch_setperm(char_u *name, long perm)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3083 {
5229
1261caf9bc51 updated for version 7.4a.040
Bram Moolenaar <bram@vim.org>
parents: 5112
diff changeset
3084 long n = -1;
1261caf9bc51 updated for version 7.4a.040
Bram Moolenaar <bram@vim.org>
parents: 5112
diff changeset
3085
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3086 #ifdef FEAT_MBYTE
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3087 if (enc_codepage >= 0 && (int)GetACP() != enc_codepage)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3088 {
5229
1261caf9bc51 updated for version 7.4a.040
Bram Moolenaar <bram@vim.org>
parents: 5112
diff changeset
3089 WCHAR *p = enc_to_utf16(name, NULL);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3090
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3091 if (p != NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3092 {
4872
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3093 n = _wchmod(p, perm);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3094 vim_free(p);
5657
6b69d8dde19e updated for version 7.4.175
Bram Moolenaar <bram@vim.org>
parents: 5635
diff changeset
3095 if (n == -1 && g_PlatformId == VER_PLATFORM_WIN32_NT)
4872
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3096 return FAIL;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3097 /* Retry with non-wide function (for Windows 98). */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3098 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3099 }
5229
1261caf9bc51 updated for version 7.4a.040
Bram Moolenaar <bram@vim.org>
parents: 5112
diff changeset
3100 if (n == -1)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3101 #endif
4872
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3102 n = _chmod(name, perm);
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3103 if (n == -1)
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3104 return FAIL;
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3105
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3106 win32_set_archive(name);
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3107
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3108 return OK;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3109 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3110
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3111 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3112 * Set hidden flag for "name".
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3113 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3114 void
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3115 mch_hide(char_u *name)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3116 {
4872
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3117 int attrs = win32_getattrs(name);
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3118 if (attrs == -1)
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3119 return;
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3120
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3121 attrs |= FILE_ATTRIBUTE_HIDDEN;
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3122 win32_setattrs(name, attrs);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3123 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3124
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3125 /*
7194
272f04b41f51 commit https://github.com/vim/vim/commit/8a52ba791893fd55c5bdf98825c5b3e8892eaa62
Christian Brabandt <cb@256bit.org>
parents: 7184
diff changeset
3126 * Return TRUE if file "name" exists and is hidden.
272f04b41f51 commit https://github.com/vim/vim/commit/8a52ba791893fd55c5bdf98825c5b3e8892eaa62
Christian Brabandt <cb@256bit.org>
parents: 7184
diff changeset
3127 */
272f04b41f51 commit https://github.com/vim/vim/commit/8a52ba791893fd55c5bdf98825c5b3e8892eaa62
Christian Brabandt <cb@256bit.org>
parents: 7184
diff changeset
3128 int
272f04b41f51 commit https://github.com/vim/vim/commit/8a52ba791893fd55c5bdf98825c5b3e8892eaa62
Christian Brabandt <cb@256bit.org>
parents: 7184
diff changeset
3129 mch_ishidden(char_u *name)
272f04b41f51 commit https://github.com/vim/vim/commit/8a52ba791893fd55c5bdf98825c5b3e8892eaa62
Christian Brabandt <cb@256bit.org>
parents: 7184
diff changeset
3130 {
272f04b41f51 commit https://github.com/vim/vim/commit/8a52ba791893fd55c5bdf98825c5b3e8892eaa62
Christian Brabandt <cb@256bit.org>
parents: 7184
diff changeset
3131 int f = win32_getattrs(name);
272f04b41f51 commit https://github.com/vim/vim/commit/8a52ba791893fd55c5bdf98825c5b3e8892eaa62
Christian Brabandt <cb@256bit.org>
parents: 7184
diff changeset
3132
272f04b41f51 commit https://github.com/vim/vim/commit/8a52ba791893fd55c5bdf98825c5b3e8892eaa62
Christian Brabandt <cb@256bit.org>
parents: 7184
diff changeset
3133 if (f == -1)
272f04b41f51 commit https://github.com/vim/vim/commit/8a52ba791893fd55c5bdf98825c5b3e8892eaa62
Christian Brabandt <cb@256bit.org>
parents: 7184
diff changeset
3134 return FALSE; /* file does not exist at all */
272f04b41f51 commit https://github.com/vim/vim/commit/8a52ba791893fd55c5bdf98825c5b3e8892eaa62
Christian Brabandt <cb@256bit.org>
parents: 7184
diff changeset
3135
272f04b41f51 commit https://github.com/vim/vim/commit/8a52ba791893fd55c5bdf98825c5b3e8892eaa62
Christian Brabandt <cb@256bit.org>
parents: 7184
diff changeset
3136 return (f & FILE_ATTRIBUTE_HIDDEN) != 0;
272f04b41f51 commit https://github.com/vim/vim/commit/8a52ba791893fd55c5bdf98825c5b3e8892eaa62
Christian Brabandt <cb@256bit.org>
parents: 7184
diff changeset
3137 }
272f04b41f51 commit https://github.com/vim/vim/commit/8a52ba791893fd55c5bdf98825c5b3e8892eaa62
Christian Brabandt <cb@256bit.org>
parents: 7184
diff changeset
3138
272f04b41f51 commit https://github.com/vim/vim/commit/8a52ba791893fd55c5bdf98825c5b3e8892eaa62
Christian Brabandt <cb@256bit.org>
parents: 7184
diff changeset
3139 /*
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3140 * return TRUE if "name" is a directory
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3141 * return FALSE if "name" is not a directory or upon error
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3142 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3143 int
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3144 mch_isdir(char_u *name)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3145 {
4872
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3146 int f = win32_getattrs(name);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3147
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3148 if (f == -1)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3149 return FALSE; /* file does not exist at all */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3150
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3151 return (f & FILE_ATTRIBUTE_DIRECTORY) != 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3152 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3153
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3154 /*
7657
9c5e8254ea6b commit https://github.com/vim/vim/commit/203258c3ad2966cc9d08b3805b103333988b30b7
Christian Brabandt <cb@256bit.org>
parents: 7619
diff changeset
3155 * return TRUE if "name" is a directory, NOT a symlink to a directory
9c5e8254ea6b commit https://github.com/vim/vim/commit/203258c3ad2966cc9d08b3805b103333988b30b7
Christian Brabandt <cb@256bit.org>
parents: 7619
diff changeset
3156 * return FALSE if "name" is not a directory
9c5e8254ea6b commit https://github.com/vim/vim/commit/203258c3ad2966cc9d08b3805b103333988b30b7
Christian Brabandt <cb@256bit.org>
parents: 7619
diff changeset
3157 * return FALSE for error
9c5e8254ea6b commit https://github.com/vim/vim/commit/203258c3ad2966cc9d08b3805b103333988b30b7
Christian Brabandt <cb@256bit.org>
parents: 7619
diff changeset
3158 */
9c5e8254ea6b commit https://github.com/vim/vim/commit/203258c3ad2966cc9d08b3805b103333988b30b7
Christian Brabandt <cb@256bit.org>
parents: 7619
diff changeset
3159 int
9c5e8254ea6b commit https://github.com/vim/vim/commit/203258c3ad2966cc9d08b3805b103333988b30b7
Christian Brabandt <cb@256bit.org>
parents: 7619
diff changeset
3160 mch_isrealdir(char_u *name)
9c5e8254ea6b commit https://github.com/vim/vim/commit/203258c3ad2966cc9d08b3805b103333988b30b7
Christian Brabandt <cb@256bit.org>
parents: 7619
diff changeset
3161 {
9c5e8254ea6b commit https://github.com/vim/vim/commit/203258c3ad2966cc9d08b3805b103333988b30b7
Christian Brabandt <cb@256bit.org>
parents: 7619
diff changeset
3162 return mch_isdir(name) && !mch_is_symbolic_link(name);
9c5e8254ea6b commit https://github.com/vim/vim/commit/203258c3ad2966cc9d08b3805b103333988b30b7
Christian Brabandt <cb@256bit.org>
parents: 7619
diff changeset
3163 }
9c5e8254ea6b commit https://github.com/vim/vim/commit/203258c3ad2966cc9d08b3805b103333988b30b7
Christian Brabandt <cb@256bit.org>
parents: 7619
diff changeset
3164
9c5e8254ea6b commit https://github.com/vim/vim/commit/203258c3ad2966cc9d08b3805b103333988b30b7
Christian Brabandt <cb@256bit.org>
parents: 7619
diff changeset
3165 /*
2803
66f2d62271fe updated for version 7.3.177
Bram Moolenaar <bram@vim.org>
parents: 2793
diff changeset
3166 * Create directory "name".
66f2d62271fe updated for version 7.3.177
Bram Moolenaar <bram@vim.org>
parents: 2793
diff changeset
3167 * Return 0 on success, -1 on error.
66f2d62271fe updated for version 7.3.177
Bram Moolenaar <bram@vim.org>
parents: 2793
diff changeset
3168 */
66f2d62271fe updated for version 7.3.177
Bram Moolenaar <bram@vim.org>
parents: 2793
diff changeset
3169 int
66f2d62271fe updated for version 7.3.177
Bram Moolenaar <bram@vim.org>
parents: 2793
diff changeset
3170 mch_mkdir(char_u *name)
66f2d62271fe updated for version 7.3.177
Bram Moolenaar <bram@vim.org>
parents: 2793
diff changeset
3171 {
66f2d62271fe updated for version 7.3.177
Bram Moolenaar <bram@vim.org>
parents: 2793
diff changeset
3172 #ifdef FEAT_MBYTE
66f2d62271fe updated for version 7.3.177
Bram Moolenaar <bram@vim.org>
parents: 2793
diff changeset
3173 if (enc_codepage >= 0 && (int)GetACP() != enc_codepage)
66f2d62271fe updated for version 7.3.177
Bram Moolenaar <bram@vim.org>
parents: 2793
diff changeset
3174 {
66f2d62271fe updated for version 7.3.177
Bram Moolenaar <bram@vim.org>
parents: 2793
diff changeset
3175 WCHAR *p;
66f2d62271fe updated for version 7.3.177
Bram Moolenaar <bram@vim.org>
parents: 2793
diff changeset
3176 int retval;
66f2d62271fe updated for version 7.3.177
Bram Moolenaar <bram@vim.org>
parents: 2793
diff changeset
3177
66f2d62271fe updated for version 7.3.177
Bram Moolenaar <bram@vim.org>
parents: 2793
diff changeset
3178 p = enc_to_utf16(name, NULL);
66f2d62271fe updated for version 7.3.177
Bram Moolenaar <bram@vim.org>
parents: 2793
diff changeset
3179 if (p == NULL)
66f2d62271fe updated for version 7.3.177
Bram Moolenaar <bram@vim.org>
parents: 2793
diff changeset
3180 return -1;
66f2d62271fe updated for version 7.3.177
Bram Moolenaar <bram@vim.org>
parents: 2793
diff changeset
3181 retval = _wmkdir(p);
66f2d62271fe updated for version 7.3.177
Bram Moolenaar <bram@vim.org>
parents: 2793
diff changeset
3182 vim_free(p);
66f2d62271fe updated for version 7.3.177
Bram Moolenaar <bram@vim.org>
parents: 2793
diff changeset
3183 return retval;
66f2d62271fe updated for version 7.3.177
Bram Moolenaar <bram@vim.org>
parents: 2793
diff changeset
3184 }
66f2d62271fe updated for version 7.3.177
Bram Moolenaar <bram@vim.org>
parents: 2793
diff changeset
3185 #endif
66f2d62271fe updated for version 7.3.177
Bram Moolenaar <bram@vim.org>
parents: 2793
diff changeset
3186 return _mkdir(name);
66f2d62271fe updated for version 7.3.177
Bram Moolenaar <bram@vim.org>
parents: 2793
diff changeset
3187 }
66f2d62271fe updated for version 7.3.177
Bram Moolenaar <bram@vim.org>
parents: 2793
diff changeset
3188
66f2d62271fe updated for version 7.3.177
Bram Moolenaar <bram@vim.org>
parents: 2793
diff changeset
3189 /*
7619
6fed43c541c8 commit https://github.com/vim/vim/commit/4cf7679383dca81a4a351e2b0ec333c95d6d9085
Christian Brabandt <cb@256bit.org>
parents: 7613
diff changeset
3190 * Delete directory "name".
6fed43c541c8 commit https://github.com/vim/vim/commit/4cf7679383dca81a4a351e2b0ec333c95d6d9085
Christian Brabandt <cb@256bit.org>
parents: 7613
diff changeset
3191 * Return 0 on success, -1 on error.
6fed43c541c8 commit https://github.com/vim/vim/commit/4cf7679383dca81a4a351e2b0ec333c95d6d9085
Christian Brabandt <cb@256bit.org>
parents: 7613
diff changeset
3192 */
6fed43c541c8 commit https://github.com/vim/vim/commit/4cf7679383dca81a4a351e2b0ec333c95d6d9085
Christian Brabandt <cb@256bit.org>
parents: 7613
diff changeset
3193 int
6fed43c541c8 commit https://github.com/vim/vim/commit/4cf7679383dca81a4a351e2b0ec333c95d6d9085
Christian Brabandt <cb@256bit.org>
parents: 7613
diff changeset
3194 mch_rmdir(char_u *name)
6fed43c541c8 commit https://github.com/vim/vim/commit/4cf7679383dca81a4a351e2b0ec333c95d6d9085
Christian Brabandt <cb@256bit.org>
parents: 7613
diff changeset
3195 {
6fed43c541c8 commit https://github.com/vim/vim/commit/4cf7679383dca81a4a351e2b0ec333c95d6d9085
Christian Brabandt <cb@256bit.org>
parents: 7613
diff changeset
3196 #ifdef FEAT_MBYTE
6fed43c541c8 commit https://github.com/vim/vim/commit/4cf7679383dca81a4a351e2b0ec333c95d6d9085
Christian Brabandt <cb@256bit.org>
parents: 7613
diff changeset
3197 if (enc_codepage >= 0 && (int)GetACP() != enc_codepage)
6fed43c541c8 commit https://github.com/vim/vim/commit/4cf7679383dca81a4a351e2b0ec333c95d6d9085
Christian Brabandt <cb@256bit.org>
parents: 7613
diff changeset
3198 {
6fed43c541c8 commit https://github.com/vim/vim/commit/4cf7679383dca81a4a351e2b0ec333c95d6d9085
Christian Brabandt <cb@256bit.org>
parents: 7613
diff changeset
3199 WCHAR *p;
6fed43c541c8 commit https://github.com/vim/vim/commit/4cf7679383dca81a4a351e2b0ec333c95d6d9085
Christian Brabandt <cb@256bit.org>
parents: 7613
diff changeset
3200 int retval;
6fed43c541c8 commit https://github.com/vim/vim/commit/4cf7679383dca81a4a351e2b0ec333c95d6d9085
Christian Brabandt <cb@256bit.org>
parents: 7613
diff changeset
3201
6fed43c541c8 commit https://github.com/vim/vim/commit/4cf7679383dca81a4a351e2b0ec333c95d6d9085
Christian Brabandt <cb@256bit.org>
parents: 7613
diff changeset
3202 p = enc_to_utf16(name, NULL);
6fed43c541c8 commit https://github.com/vim/vim/commit/4cf7679383dca81a4a351e2b0ec333c95d6d9085
Christian Brabandt <cb@256bit.org>
parents: 7613
diff changeset
3203 if (p == NULL)
6fed43c541c8 commit https://github.com/vim/vim/commit/4cf7679383dca81a4a351e2b0ec333c95d6d9085
Christian Brabandt <cb@256bit.org>
parents: 7613
diff changeset
3204 return -1;
6fed43c541c8 commit https://github.com/vim/vim/commit/4cf7679383dca81a4a351e2b0ec333c95d6d9085
Christian Brabandt <cb@256bit.org>
parents: 7613
diff changeset
3205 retval = _wrmdir(p);
6fed43c541c8 commit https://github.com/vim/vim/commit/4cf7679383dca81a4a351e2b0ec333c95d6d9085
Christian Brabandt <cb@256bit.org>
parents: 7613
diff changeset
3206 vim_free(p);
6fed43c541c8 commit https://github.com/vim/vim/commit/4cf7679383dca81a4a351e2b0ec333c95d6d9085
Christian Brabandt <cb@256bit.org>
parents: 7613
diff changeset
3207 return retval;
6fed43c541c8 commit https://github.com/vim/vim/commit/4cf7679383dca81a4a351e2b0ec333c95d6d9085
Christian Brabandt <cb@256bit.org>
parents: 7613
diff changeset
3208 }
6fed43c541c8 commit https://github.com/vim/vim/commit/4cf7679383dca81a4a351e2b0ec333c95d6d9085
Christian Brabandt <cb@256bit.org>
parents: 7613
diff changeset
3209 #endif
6fed43c541c8 commit https://github.com/vim/vim/commit/4cf7679383dca81a4a351e2b0ec333c95d6d9085
Christian Brabandt <cb@256bit.org>
parents: 7613
diff changeset
3210 return _rmdir(name);
6fed43c541c8 commit https://github.com/vim/vim/commit/4cf7679383dca81a4a351e2b0ec333c95d6d9085
Christian Brabandt <cb@256bit.org>
parents: 7613
diff changeset
3211 }
6fed43c541c8 commit https://github.com/vim/vim/commit/4cf7679383dca81a4a351e2b0ec333c95d6d9085
Christian Brabandt <cb@256bit.org>
parents: 7613
diff changeset
3212
6fed43c541c8 commit https://github.com/vim/vim/commit/4cf7679383dca81a4a351e2b0ec333c95d6d9085
Christian Brabandt <cb@256bit.org>
parents: 7613
diff changeset
3213 /*
696
f0a9ef4db025 updated for version 7.0210
vimboss
parents: 609
diff changeset
3214 * Return TRUE if file "fname" has more than one link.
f0a9ef4db025 updated for version 7.0210
vimboss
parents: 609
diff changeset
3215 */
f0a9ef4db025 updated for version 7.0210
vimboss
parents: 609
diff changeset
3216 int
4872
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3217 mch_is_hard_link(char_u *fname)
696
f0a9ef4db025 updated for version 7.0210
vimboss
parents: 609
diff changeset
3218 {
2793
ee48b3da9d53 updated for version 7.3.172
Bram Moolenaar <bram@vim.org>
parents: 2690
diff changeset
3219 BY_HANDLE_FILE_INFORMATION info;
ee48b3da9d53 updated for version 7.3.172
Bram Moolenaar <bram@vim.org>
parents: 2690
diff changeset
3220
ee48b3da9d53 updated for version 7.3.172
Bram Moolenaar <bram@vim.org>
parents: 2690
diff changeset
3221 return win32_fileinfo(fname, &info) == FILEINFO_OK
ee48b3da9d53 updated for version 7.3.172
Bram Moolenaar <bram@vim.org>
parents: 2690
diff changeset
3222 && info.nNumberOfLinks > 1;
ee48b3da9d53 updated for version 7.3.172
Bram Moolenaar <bram@vim.org>
parents: 2690
diff changeset
3223 }
ee48b3da9d53 updated for version 7.3.172
Bram Moolenaar <bram@vim.org>
parents: 2690
diff changeset
3224
ee48b3da9d53 updated for version 7.3.172
Bram Moolenaar <bram@vim.org>
parents: 2690
diff changeset
3225 /*
7657
9c5e8254ea6b commit https://github.com/vim/vim/commit/203258c3ad2966cc9d08b3805b103333988b30b7
Christian Brabandt <cb@256bit.org>
parents: 7619
diff changeset
3226 * Return TRUE if "name" is a symbolic link (or a junction).
4872
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3227 */
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3228 int
7657
9c5e8254ea6b commit https://github.com/vim/vim/commit/203258c3ad2966cc9d08b3805b103333988b30b7
Christian Brabandt <cb@256bit.org>
parents: 7619
diff changeset
3229 mch_is_symbolic_link(char_u *name)
4872
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3230 {
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3231 HANDLE hFind;
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3232 int res = FALSE;
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3233 WIN32_FIND_DATAA findDataA;
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3234 DWORD fileFlags = 0, reparseTag = 0;
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3235 #ifdef FEAT_MBYTE
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3236 WCHAR *wn = NULL;
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3237 WIN32_FIND_DATAW findDataW;
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3238
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3239 if (enc_codepage >= 0 && (int)GetACP() != enc_codepage)
7657
9c5e8254ea6b commit https://github.com/vim/vim/commit/203258c3ad2966cc9d08b3805b103333988b30b7
Christian Brabandt <cb@256bit.org>
parents: 7619
diff changeset
3240 wn = enc_to_utf16(name, NULL);
4872
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3241 if (wn != NULL)
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3242 {
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3243 hFind = FindFirstFileW(wn, &findDataW);
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3244 vim_free(wn);
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3245 if (hFind == INVALID_HANDLE_VALUE
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3246 && GetLastError() == ERROR_CALL_NOT_IMPLEMENTED)
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3247 {
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3248 /* Retry with non-wide function (for Windows 98). */
7657
9c5e8254ea6b commit https://github.com/vim/vim/commit/203258c3ad2966cc9d08b3805b103333988b30b7
Christian Brabandt <cb@256bit.org>
parents: 7619
diff changeset
3249 hFind = FindFirstFile(name, &findDataA);
4872
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3250 if (hFind != INVALID_HANDLE_VALUE)
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3251 {
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3252 fileFlags = findDataA.dwFileAttributes;
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3253 reparseTag = findDataA.dwReserved0;
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3254 }
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3255 }
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3256 else
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3257 {
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3258 fileFlags = findDataW.dwFileAttributes;
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3259 reparseTag = findDataW.dwReserved0;
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3260 }
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3261 }
4930
7155782d94fb updated for version 7.3.1210
Bram Moolenaar <bram@vim.org>
parents: 4872
diff changeset
3262 else
7155782d94fb updated for version 7.3.1210
Bram Moolenaar <bram@vim.org>
parents: 4872
diff changeset
3263 #endif
4872
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3264 {
7657
9c5e8254ea6b commit https://github.com/vim/vim/commit/203258c3ad2966cc9d08b3805b103333988b30b7
Christian Brabandt <cb@256bit.org>
parents: 7619
diff changeset
3265 hFind = FindFirstFile(name, &findDataA);
4930
7155782d94fb updated for version 7.3.1210
Bram Moolenaar <bram@vim.org>
parents: 4872
diff changeset
3266 if (hFind != INVALID_HANDLE_VALUE)
7155782d94fb updated for version 7.3.1210
Bram Moolenaar <bram@vim.org>
parents: 4872
diff changeset
3267 {
7155782d94fb updated for version 7.3.1210
Bram Moolenaar <bram@vim.org>
parents: 4872
diff changeset
3268 fileFlags = findDataA.dwFileAttributes;
7155782d94fb updated for version 7.3.1210
Bram Moolenaar <bram@vim.org>
parents: 4872
diff changeset
3269 reparseTag = findDataA.dwReserved0;
7155782d94fb updated for version 7.3.1210
Bram Moolenaar <bram@vim.org>
parents: 4872
diff changeset
3270 }
4872
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3271 }
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3272
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3273 if (hFind != INVALID_HANDLE_VALUE)
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3274 FindClose(hFind);
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3275
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3276 if ((fileFlags & FILE_ATTRIBUTE_REPARSE_POINT)
7657
9c5e8254ea6b commit https://github.com/vim/vim/commit/203258c3ad2966cc9d08b3805b103333988b30b7
Christian Brabandt <cb@256bit.org>
parents: 7619
diff changeset
3277 && (reparseTag == IO_REPARSE_TAG_SYMLINK
9c5e8254ea6b commit https://github.com/vim/vim/commit/203258c3ad2966cc9d08b3805b103333988b30b7
Christian Brabandt <cb@256bit.org>
parents: 7619
diff changeset
3278 || reparseTag == IO_REPARSE_TAG_MOUNT_POINT))
4872
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3279 res = TRUE;
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3280
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3281 return res;
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3282 }
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3283
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3284 /*
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3285 * Return TRUE if file "fname" has more than one link or if it is a symbolic
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3286 * link.
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3287 */
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3288 int
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3289 mch_is_linked(char_u *fname)
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3290 {
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3291 if (mch_is_hard_link(fname) || mch_is_symbolic_link(fname))
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3292 return TRUE;
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3293 return FALSE;
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3294 }
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3295
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3296 /*
2793
ee48b3da9d53 updated for version 7.3.172
Bram Moolenaar <bram@vim.org>
parents: 2690
diff changeset
3297 * Get the by-handle-file-information for "fname".
ee48b3da9d53 updated for version 7.3.172
Bram Moolenaar <bram@vim.org>
parents: 2690
diff changeset
3298 * Returns FILEINFO_OK when OK.
ee48b3da9d53 updated for version 7.3.172
Bram Moolenaar <bram@vim.org>
parents: 2690
diff changeset
3299 * returns FILEINFO_ENC_FAIL when enc_to_utf16() failed.
ee48b3da9d53 updated for version 7.3.172
Bram Moolenaar <bram@vim.org>
parents: 2690
diff changeset
3300 * Returns FILEINFO_READ_FAIL when CreateFile() failed.
ee48b3da9d53 updated for version 7.3.172
Bram Moolenaar <bram@vim.org>
parents: 2690
diff changeset
3301 * Returns FILEINFO_INFO_FAIL when GetFileInformationByHandle() failed.
ee48b3da9d53 updated for version 7.3.172
Bram Moolenaar <bram@vim.org>
parents: 2690
diff changeset
3302 */
ee48b3da9d53 updated for version 7.3.172
Bram Moolenaar <bram@vim.org>
parents: 2690
diff changeset
3303 int
ee48b3da9d53 updated for version 7.3.172
Bram Moolenaar <bram@vim.org>
parents: 2690
diff changeset
3304 win32_fileinfo(char_u *fname, BY_HANDLE_FILE_INFORMATION *info)
ee48b3da9d53 updated for version 7.3.172
Bram Moolenaar <bram@vim.org>
parents: 2690
diff changeset
3305 {
696
f0a9ef4db025 updated for version 7.0210
vimboss
parents: 609
diff changeset
3306 HANDLE hFile;
2793
ee48b3da9d53 updated for version 7.3.172
Bram Moolenaar <bram@vim.org>
parents: 2690
diff changeset
3307 int res = FILEINFO_READ_FAIL;
696
f0a9ef4db025 updated for version 7.0210
vimboss
parents: 609
diff changeset
3308 #ifdef FEAT_MBYTE
f0a9ef4db025 updated for version 7.0210
vimboss
parents: 609
diff changeset
3309 WCHAR *wn = NULL;
f0a9ef4db025 updated for version 7.0210
vimboss
parents: 609
diff changeset
3310
f0a9ef4db025 updated for version 7.0210
vimboss
parents: 609
diff changeset
3311 if (enc_codepage >= 0 && (int)GetACP() != enc_codepage)
2793
ee48b3da9d53 updated for version 7.3.172
Bram Moolenaar <bram@vim.org>
parents: 2690
diff changeset
3312 {
1752
a8aae2e1d2ae updated for version 7.2-049
vimboss
parents: 1686
diff changeset
3313 wn = enc_to_utf16(fname, NULL);
2793
ee48b3da9d53 updated for version 7.3.172
Bram Moolenaar <bram@vim.org>
parents: 2690
diff changeset
3314 if (wn == NULL)
ee48b3da9d53 updated for version 7.3.172
Bram Moolenaar <bram@vim.org>
parents: 2690
diff changeset
3315 res = FILEINFO_ENC_FAIL;
ee48b3da9d53 updated for version 7.3.172
Bram Moolenaar <bram@vim.org>
parents: 2690
diff changeset
3316 }
696
f0a9ef4db025 updated for version 7.0210
vimboss
parents: 609
diff changeset
3317 if (wn != NULL)
f0a9ef4db025 updated for version 7.0210
vimboss
parents: 609
diff changeset
3318 {
f0a9ef4db025 updated for version 7.0210
vimboss
parents: 609
diff changeset
3319 hFile = CreateFileW(wn, /* file name */
f0a9ef4db025 updated for version 7.0210
vimboss
parents: 609
diff changeset
3320 GENERIC_READ, /* access mode */
2793
ee48b3da9d53 updated for version 7.3.172
Bram Moolenaar <bram@vim.org>
parents: 2690
diff changeset
3321 FILE_SHARE_READ | FILE_SHARE_WRITE, /* share mode */
696
f0a9ef4db025 updated for version 7.0210
vimboss
parents: 609
diff changeset
3322 NULL, /* security descriptor */
f0a9ef4db025 updated for version 7.0210
vimboss
parents: 609
diff changeset
3323 OPEN_EXISTING, /* creation disposition */
2793
ee48b3da9d53 updated for version 7.3.172
Bram Moolenaar <bram@vim.org>
parents: 2690
diff changeset
3324 FILE_FLAG_BACKUP_SEMANTICS, /* file attributes */
696
f0a9ef4db025 updated for version 7.0210
vimboss
parents: 609
diff changeset
3325 NULL); /* handle to template file */
f0a9ef4db025 updated for version 7.0210
vimboss
parents: 609
diff changeset
3326 if (hFile == INVALID_HANDLE_VALUE
2793
ee48b3da9d53 updated for version 7.3.172
Bram Moolenaar <bram@vim.org>
parents: 2690
diff changeset
3327 && GetLastError() == ERROR_CALL_NOT_IMPLEMENTED)
696
f0a9ef4db025 updated for version 7.0210
vimboss
parents: 609
diff changeset
3328 {
f0a9ef4db025 updated for version 7.0210
vimboss
parents: 609
diff changeset
3329 /* Retry with non-wide function (for Windows 98). */
f0a9ef4db025 updated for version 7.0210
vimboss
parents: 609
diff changeset
3330 vim_free(wn);
f0a9ef4db025 updated for version 7.0210
vimboss
parents: 609
diff changeset
3331 wn = NULL;
f0a9ef4db025 updated for version 7.0210
vimboss
parents: 609
diff changeset
3332 }
f0a9ef4db025 updated for version 7.0210
vimboss
parents: 609
diff changeset
3333 }
f0a9ef4db025 updated for version 7.0210
vimboss
parents: 609
diff changeset
3334 if (wn == NULL)
f0a9ef4db025 updated for version 7.0210
vimboss
parents: 609
diff changeset
3335 #endif
f0a9ef4db025 updated for version 7.0210
vimboss
parents: 609
diff changeset
3336 hFile = CreateFile(fname, /* file name */
f0a9ef4db025 updated for version 7.0210
vimboss
parents: 609
diff changeset
3337 GENERIC_READ, /* access mode */
2793
ee48b3da9d53 updated for version 7.3.172
Bram Moolenaar <bram@vim.org>
parents: 2690
diff changeset
3338 FILE_SHARE_READ | FILE_SHARE_WRITE, /* share mode */
696
f0a9ef4db025 updated for version 7.0210
vimboss
parents: 609
diff changeset
3339 NULL, /* security descriptor */
f0a9ef4db025 updated for version 7.0210
vimboss
parents: 609
diff changeset
3340 OPEN_EXISTING, /* creation disposition */
2793
ee48b3da9d53 updated for version 7.3.172
Bram Moolenaar <bram@vim.org>
parents: 2690
diff changeset
3341 FILE_FLAG_BACKUP_SEMANTICS, /* file attributes */
696
f0a9ef4db025 updated for version 7.0210
vimboss
parents: 609
diff changeset
3342 NULL); /* handle to template file */
f0a9ef4db025 updated for version 7.0210
vimboss
parents: 609
diff changeset
3343
f0a9ef4db025 updated for version 7.0210
vimboss
parents: 609
diff changeset
3344 if (hFile != INVALID_HANDLE_VALUE)
f0a9ef4db025 updated for version 7.0210
vimboss
parents: 609
diff changeset
3345 {
2793
ee48b3da9d53 updated for version 7.3.172
Bram Moolenaar <bram@vim.org>
parents: 2690
diff changeset
3346 if (GetFileInformationByHandle(hFile, info) != 0)
ee48b3da9d53 updated for version 7.3.172
Bram Moolenaar <bram@vim.org>
parents: 2690
diff changeset
3347 res = FILEINFO_OK;
ee48b3da9d53 updated for version 7.3.172
Bram Moolenaar <bram@vim.org>
parents: 2690
diff changeset
3348 else
ee48b3da9d53 updated for version 7.3.172
Bram Moolenaar <bram@vim.org>
parents: 2690
diff changeset
3349 res = FILEINFO_INFO_FAIL;
696
f0a9ef4db025 updated for version 7.0210
vimboss
parents: 609
diff changeset
3350 CloseHandle(hFile);
f0a9ef4db025 updated for version 7.0210
vimboss
parents: 609
diff changeset
3351 }
f0a9ef4db025 updated for version 7.0210
vimboss
parents: 609
diff changeset
3352
f0a9ef4db025 updated for version 7.0210
vimboss
parents: 609
diff changeset
3353 #ifdef FEAT_MBYTE
f0a9ef4db025 updated for version 7.0210
vimboss
parents: 609
diff changeset
3354 vim_free(wn);
f0a9ef4db025 updated for version 7.0210
vimboss
parents: 609
diff changeset
3355 #endif
f0a9ef4db025 updated for version 7.0210
vimboss
parents: 609
diff changeset
3356 return res;
f0a9ef4db025 updated for version 7.0210
vimboss
parents: 609
diff changeset
3357 }
f0a9ef4db025 updated for version 7.0210
vimboss
parents: 609
diff changeset
3358
f0a9ef4db025 updated for version 7.0210
vimboss
parents: 609
diff changeset
3359 /*
4872
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3360 * get file attributes for `name'
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3361 * -1 : error
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3362 * else FILE_ATTRIBUTE_* defined in winnt.h
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3363 */
5494
645358801356 updated for version 7.4.096
Bram Moolenaar <bram@vim.org>
parents: 5376
diff changeset
3364 static int
4872
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3365 win32_getattrs(char_u *name)
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3366 {
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3367 int attr;
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3368 #ifdef FEAT_MBYTE
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3369 WCHAR *p = NULL;
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3370
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3371 if (enc_codepage >= 0 && (int)GetACP() != enc_codepage)
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3372 p = enc_to_utf16(name, NULL);
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3373
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3374 if (p != NULL)
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3375 {
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3376 attr = GetFileAttributesW(p);
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3377 if (attr < 0 && GetLastError() == ERROR_CALL_NOT_IMPLEMENTED)
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3378 {
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3379 /* Retry with non-wide function (for Windows 98). */
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3380 vim_free(p);
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3381 p = NULL;
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3382 }
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3383 }
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3384 if (p == NULL)
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3385 #endif
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3386 attr = GetFileAttributes((char *)name);
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3387 #ifdef FEAT_MBYTE
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3388 vim_free(p);
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3389 #endif
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3390 return attr;
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3391 }
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3392
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3393 /*
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3394 * set file attributes for `name' to `attrs'
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3395 *
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3396 * return -1 for failure, 0 otherwise
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3397 */
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3398 static
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3399 int
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3400 win32_setattrs(char_u *name, int attrs)
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3401 {
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3402 int res;
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3403 #ifdef FEAT_MBYTE
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3404 WCHAR *p = NULL;
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3405
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3406 if (enc_codepage >= 0 && (int)GetACP() != enc_codepage)
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3407 p = enc_to_utf16(name, NULL);
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3408
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3409 if (p != NULL)
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3410 {
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3411 res = SetFileAttributesW(p, attrs);
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3412 if (res == FALSE
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3413 && GetLastError() == ERROR_CALL_NOT_IMPLEMENTED)
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3414 {
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3415 /* Retry with non-wide function (for Windows 98). */
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3416 vim_free(p);
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3417 p = NULL;
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3418 }
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3419 }
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3420 if (p == NULL)
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3421 #endif
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3422 res = SetFileAttributes((char *)name, attrs);
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3423 #ifdef FEAT_MBYTE
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3424 vim_free(p);
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3425 #endif
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3426 return res ? 0 : -1;
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3427 }
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3428
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3429 /*
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3430 * Set archive flag for "name".
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3431 */
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3432 static
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3433 int
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3434 win32_set_archive(char_u *name)
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3435 {
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3436 int attrs = win32_getattrs(name);
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3437 if (attrs == -1)
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3438 return -1;
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3439
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3440 attrs |= FILE_ATTRIBUTE_ARCHIVE;
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3441 return win32_setattrs(name, attrs);
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3442 }
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3443
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3444 /*
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3445 * Return TRUE if file or directory "name" is writable (not readonly).
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3446 * Strange semantics of Win32: a readonly directory is writable, but you can't
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3447 * delete a file. Let's say this means it is writable.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3448 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3449 int
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3450 mch_writable(char_u *name)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3451 {
4872
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3452 int attrs = win32_getattrs(name);
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3453
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3454 return (attrs != -1 && (!(attrs & FILE_ATTRIBUTE_READONLY)
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
3455 || (attrs & FILE_ATTRIBUTE_DIRECTORY)));
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3456 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3457
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3458 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3459 * Return 1 if "name" can be executed, 0 if not.
6700
f26c1d294156 updated for version 7.4.674
Bram Moolenaar <bram@vim.org>
parents: 6524
diff changeset
3460 * If "use_path" is FALSE only check if "name" is executable.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3461 * Return -1 if unknown.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3462 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3463 int
6700
f26c1d294156 updated for version 7.4.674
Bram Moolenaar <bram@vim.org>
parents: 6524
diff changeset
3464 mch_can_exe(char_u *name, char_u **path, int use_path)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3465 {
10
4e2284e71352 updated for version 7.0002
vimboss
parents: 9
diff changeset
3466 char_u buf[_MAX_PATH];
835
8bebcabccc2c updated for version 7.0e01
vimboss
parents: 819
diff changeset
3467 int len = (int)STRLEN(name);
10
4e2284e71352 updated for version 7.0002
vimboss
parents: 9
diff changeset
3468 char_u *p;
4e2284e71352 updated for version 7.0002
vimboss
parents: 9
diff changeset
3469
4e2284e71352 updated for version 7.0002
vimboss
parents: 9
diff changeset
3470 if (len >= _MAX_PATH) /* safety check */
4e2284e71352 updated for version 7.0002
vimboss
parents: 9
diff changeset
3471 return FALSE;
6700
f26c1d294156 updated for version 7.4.674
Bram Moolenaar <bram@vim.org>
parents: 6524
diff changeset
3472 if (!use_path)
f26c1d294156 updated for version 7.4.674
Bram Moolenaar <bram@vim.org>
parents: 6524
diff changeset
3473 {
f26c1d294156 updated for version 7.4.674
Bram Moolenaar <bram@vim.org>
parents: 6524
diff changeset
3474 /* TODO: check if file is really executable. */
f26c1d294156 updated for version 7.4.674
Bram Moolenaar <bram@vim.org>
parents: 6524
diff changeset
3475 return mch_getperm(name) != -1 && !mch_isdir(name);
f26c1d294156 updated for version 7.4.674
Bram Moolenaar <bram@vim.org>
parents: 6524
diff changeset
3476 }
10
4e2284e71352 updated for version 7.0002
vimboss
parents: 9
diff changeset
3477
4e2284e71352 updated for version 7.0002
vimboss
parents: 9
diff changeset
3478 /* If there already is an extension try using the name directly. Also do
4e2284e71352 updated for version 7.0002
vimboss
parents: 9
diff changeset
3479 * this with a Unix-shell like 'shell'. */
4e2284e71352 updated for version 7.0002
vimboss
parents: 9
diff changeset
3480 if (vim_strchr(gettail(name), '.') != NULL
4e2284e71352 updated for version 7.0002
vimboss
parents: 9
diff changeset
3481 || strstr((char *)gettail(p_sh), "sh") != NULL)
5782
5ab2946f7ce5 updated for version 7.4.235
Bram Moolenaar <bram@vim.org>
parents: 5657
diff changeset
3482 if (executable_exists((char *)name, path))
10
4e2284e71352 updated for version 7.0002
vimboss
parents: 9
diff changeset
3483 return TRUE;
4e2284e71352 updated for version 7.0002
vimboss
parents: 9
diff changeset
3484
4e2284e71352 updated for version 7.0002
vimboss
parents: 9
diff changeset
3485 /*
4e2284e71352 updated for version 7.0002
vimboss
parents: 9
diff changeset
3486 * Loop over all extensions in $PATHEXT.
4e2284e71352 updated for version 7.0002
vimboss
parents: 9
diff changeset
3487 */
417
8f41fe56e2fc updated for version 7.0109
vimboss
parents: 406
diff changeset
3488 vim_strncpy(buf, name, _MAX_PATH - 1);
10
4e2284e71352 updated for version 7.0002
vimboss
parents: 9
diff changeset
3489 p = mch_getenv("PATHEXT");
4e2284e71352 updated for version 7.0002
vimboss
parents: 9
diff changeset
3490 if (p == NULL)
4e2284e71352 updated for version 7.0002
vimboss
parents: 9
diff changeset
3491 p = (char_u *)".com;.exe;.bat;.cmd";
4e2284e71352 updated for version 7.0002
vimboss
parents: 9
diff changeset
3492 while (*p)
4e2284e71352 updated for version 7.0002
vimboss
parents: 9
diff changeset
3493 {
4e2284e71352 updated for version 7.0002
vimboss
parents: 9
diff changeset
3494 if (p[0] == '.' && (p[1] == NUL || p[1] == ';'))
4e2284e71352 updated for version 7.0002
vimboss
parents: 9
diff changeset
3495 {
4e2284e71352 updated for version 7.0002
vimboss
parents: 9
diff changeset
3496 /* A single "." means no extension is added. */
4e2284e71352 updated for version 7.0002
vimboss
parents: 9
diff changeset
3497 buf[len] = NUL;
4e2284e71352 updated for version 7.0002
vimboss
parents: 9
diff changeset
3498 ++p;
4e2284e71352 updated for version 7.0002
vimboss
parents: 9
diff changeset
3499 if (*p)
4e2284e71352 updated for version 7.0002
vimboss
parents: 9
diff changeset
3500 ++p;
4e2284e71352 updated for version 7.0002
vimboss
parents: 9
diff changeset
3501 }
4e2284e71352 updated for version 7.0002
vimboss
parents: 9
diff changeset
3502 else
4e2284e71352 updated for version 7.0002
vimboss
parents: 9
diff changeset
3503 copy_option_part(&p, buf + len, _MAX_PATH - len, ";");
5782
5ab2946f7ce5 updated for version 7.4.235
Bram Moolenaar <bram@vim.org>
parents: 5657
diff changeset
3504 if (executable_exists((char *)buf, path))
10
4e2284e71352 updated for version 7.0002
vimboss
parents: 9
diff changeset
3505 return TRUE;
4e2284e71352 updated for version 7.0002
vimboss
parents: 9
diff changeset
3506 }
4e2284e71352 updated for version 7.0002
vimboss
parents: 9
diff changeset
3507 return FALSE;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3508 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3509
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3510 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3511 * Check what "name" is:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3512 * NODE_NORMAL: file or directory (or doesn't exist)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3513 * NODE_WRITABLE: writable device, socket, fifo, etc.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3514 * NODE_OTHER: non-writable things
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3515 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3516 int
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3517 mch_nodetype(char_u *name)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3518 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3519 HANDLE hFile;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3520 int type;
5324
a7478f9f2551 updated for version 7.4.015
Bram Moolenaar <bram@vim.org>
parents: 5292
diff changeset
3521 #ifdef FEAT_MBYTE
a7478f9f2551 updated for version 7.4.015
Bram Moolenaar <bram@vim.org>
parents: 5292
diff changeset
3522 WCHAR *wn = NULL;
a7478f9f2551 updated for version 7.4.015
Bram Moolenaar <bram@vim.org>
parents: 5292
diff changeset
3523 #endif
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3524
1004
09d0e83c29b8 updated for version 7.0-130
vimboss
parents: 840
diff changeset
3525 /* We can't open a file with a name "\\.\con" or "\\.\prn" and trying to
09d0e83c29b8 updated for version 7.0-130
vimboss
parents: 840
diff changeset
3526 * read from it later will cause Vim to hang. Thus return NODE_WRITABLE
09d0e83c29b8 updated for version 7.0-130
vimboss
parents: 840
diff changeset
3527 * here. */
09d0e83c29b8 updated for version 7.0-130
vimboss
parents: 840
diff changeset
3528 if (STRNCMP(name, "\\\\.\\", 4) == 0)
09d0e83c29b8 updated for version 7.0-130
vimboss
parents: 840
diff changeset
3529 return NODE_WRITABLE;
09d0e83c29b8 updated for version 7.0-130
vimboss
parents: 840
diff changeset
3530
5324
a7478f9f2551 updated for version 7.4.015
Bram Moolenaar <bram@vim.org>
parents: 5292
diff changeset
3531 #ifdef FEAT_MBYTE
a7478f9f2551 updated for version 7.4.015
Bram Moolenaar <bram@vim.org>
parents: 5292
diff changeset
3532 if (enc_codepage >= 0 && (int)GetACP() != enc_codepage)
a7478f9f2551 updated for version 7.4.015
Bram Moolenaar <bram@vim.org>
parents: 5292
diff changeset
3533 {
a7478f9f2551 updated for version 7.4.015
Bram Moolenaar <bram@vim.org>
parents: 5292
diff changeset
3534 wn = enc_to_utf16(name, NULL);
a7478f9f2551 updated for version 7.4.015
Bram Moolenaar <bram@vim.org>
parents: 5292
diff changeset
3535 if (wn != NULL)
a7478f9f2551 updated for version 7.4.015
Bram Moolenaar <bram@vim.org>
parents: 5292
diff changeset
3536 {
a7478f9f2551 updated for version 7.4.015
Bram Moolenaar <bram@vim.org>
parents: 5292
diff changeset
3537 hFile = CreateFileW(wn, /* file name */
a7478f9f2551 updated for version 7.4.015
Bram Moolenaar <bram@vim.org>
parents: 5292
diff changeset
3538 GENERIC_WRITE, /* access mode */
a7478f9f2551 updated for version 7.4.015
Bram Moolenaar <bram@vim.org>
parents: 5292
diff changeset
3539 0, /* share mode */
a7478f9f2551 updated for version 7.4.015
Bram Moolenaar <bram@vim.org>
parents: 5292
diff changeset
3540 NULL, /* security descriptor */
a7478f9f2551 updated for version 7.4.015
Bram Moolenaar <bram@vim.org>
parents: 5292
diff changeset
3541 OPEN_EXISTING, /* creation disposition */
a7478f9f2551 updated for version 7.4.015
Bram Moolenaar <bram@vim.org>
parents: 5292
diff changeset
3542 0, /* file attributes */
a7478f9f2551 updated for version 7.4.015
Bram Moolenaar <bram@vim.org>
parents: 5292
diff changeset
3543 NULL); /* handle to template file */
a7478f9f2551 updated for version 7.4.015
Bram Moolenaar <bram@vim.org>
parents: 5292
diff changeset
3544 if (hFile == INVALID_HANDLE_VALUE
a7478f9f2551 updated for version 7.4.015
Bram Moolenaar <bram@vim.org>
parents: 5292
diff changeset
3545 && GetLastError() == ERROR_CALL_NOT_IMPLEMENTED)
a7478f9f2551 updated for version 7.4.015
Bram Moolenaar <bram@vim.org>
parents: 5292
diff changeset
3546 {
a7478f9f2551 updated for version 7.4.015
Bram Moolenaar <bram@vim.org>
parents: 5292
diff changeset
3547 /* Retry with non-wide function (for Windows 98). */
a7478f9f2551 updated for version 7.4.015
Bram Moolenaar <bram@vim.org>
parents: 5292
diff changeset
3548 vim_free(wn);
a7478f9f2551 updated for version 7.4.015
Bram Moolenaar <bram@vim.org>
parents: 5292
diff changeset
3549 wn = NULL;
a7478f9f2551 updated for version 7.4.015
Bram Moolenaar <bram@vim.org>
parents: 5292
diff changeset
3550 }
a7478f9f2551 updated for version 7.4.015
Bram Moolenaar <bram@vim.org>
parents: 5292
diff changeset
3551 }
a7478f9f2551 updated for version 7.4.015
Bram Moolenaar <bram@vim.org>
parents: 5292
diff changeset
3552 }
a7478f9f2551 updated for version 7.4.015
Bram Moolenaar <bram@vim.org>
parents: 5292
diff changeset
3553 if (wn == NULL)
a7478f9f2551 updated for version 7.4.015
Bram Moolenaar <bram@vim.org>
parents: 5292
diff changeset
3554 #endif
a7478f9f2551 updated for version 7.4.015
Bram Moolenaar <bram@vim.org>
parents: 5292
diff changeset
3555 hFile = CreateFile(name, /* file name */
a7478f9f2551 updated for version 7.4.015
Bram Moolenaar <bram@vim.org>
parents: 5292
diff changeset
3556 GENERIC_WRITE, /* access mode */
a7478f9f2551 updated for version 7.4.015
Bram Moolenaar <bram@vim.org>
parents: 5292
diff changeset
3557 0, /* share mode */
a7478f9f2551 updated for version 7.4.015
Bram Moolenaar <bram@vim.org>
parents: 5292
diff changeset
3558 NULL, /* security descriptor */
a7478f9f2551 updated for version 7.4.015
Bram Moolenaar <bram@vim.org>
parents: 5292
diff changeset
3559 OPEN_EXISTING, /* creation disposition */
a7478f9f2551 updated for version 7.4.015
Bram Moolenaar <bram@vim.org>
parents: 5292
diff changeset
3560 0, /* file attributes */
a7478f9f2551 updated for version 7.4.015
Bram Moolenaar <bram@vim.org>
parents: 5292
diff changeset
3561 NULL); /* handle to template file */
a7478f9f2551 updated for version 7.4.015
Bram Moolenaar <bram@vim.org>
parents: 5292
diff changeset
3562
a7478f9f2551 updated for version 7.4.015
Bram Moolenaar <bram@vim.org>
parents: 5292
diff changeset
3563 #ifdef FEAT_MBYTE
a7478f9f2551 updated for version 7.4.015
Bram Moolenaar <bram@vim.org>
parents: 5292
diff changeset
3564 vim_free(wn);
a7478f9f2551 updated for version 7.4.015
Bram Moolenaar <bram@vim.org>
parents: 5292
diff changeset
3565 #endif
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3566 if (hFile == INVALID_HANDLE_VALUE)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3567 return NODE_NORMAL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3568
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3569 type = GetFileType(hFile);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3570 CloseHandle(hFile);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3571 if (type == FILE_TYPE_CHAR)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3572 return NODE_WRITABLE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3573 if (type == FILE_TYPE_DISK)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3574 return NODE_NORMAL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3575 return NODE_OTHER;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3576 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3577
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3578 #ifdef HAVE_ACL
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3579 struct my_acl
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3580 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3581 PSECURITY_DESCRIPTOR pSecurityDescriptor;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3582 PSID pSidOwner;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3583 PSID pSidGroup;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3584 PACL pDacl;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3585 PACL pSacl;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3586 };
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3587 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3588
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3589 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3590 * Return a pointer to the ACL of file "fname" in allocated memory.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3591 * Return NULL if the ACL is not available for whatever reason.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3592 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3593 vim_acl_T
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
3594 mch_get_acl(char_u *fname)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3595 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3596 #ifndef HAVE_ACL
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3597 return (vim_acl_T)NULL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3598 #else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3599 struct my_acl *p = NULL;
5047
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3600 DWORD err;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3601
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3602 /* This only works on Windows NT and 2000. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3603 if (g_PlatformId == VER_PLATFORM_WIN32_NT && advapi_lib != NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3604 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3605 p = (struct my_acl *)alloc_clear((unsigned)sizeof(struct my_acl));
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3606 if (p != NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3607 {
5047
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3608 # ifdef FEAT_MBYTE
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3609 WCHAR *wn = NULL;
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3610
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3611 if (enc_codepage >= 0 && (int)GetACP() != enc_codepage)
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3612 wn = enc_to_utf16(fname, NULL);
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3613 if (wn != NULL)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3614 {
5047
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3615 /* Try to retrieve the entire security descriptor. */
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3616 err = pGetNamedSecurityInfoW(
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3617 wn, // Abstract filename
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3618 SE_FILE_OBJECT, // File Object
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3619 OWNER_SECURITY_INFORMATION |
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3620 GROUP_SECURITY_INFORMATION |
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3621 DACL_SECURITY_INFORMATION |
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3622 SACL_SECURITY_INFORMATION,
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3623 &p->pSidOwner, // Ownership information.
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3624 &p->pSidGroup, // Group membership.
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3625 &p->pDacl, // Discretionary information.
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3626 &p->pSacl, // For auditing purposes.
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3627 &p->pSecurityDescriptor);
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3628 if (err == ERROR_ACCESS_DENIED ||
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3629 err == ERROR_PRIVILEGE_NOT_HELD)
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3630 {
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3631 /* Retrieve only DACL. */
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3632 (void)pGetNamedSecurityInfoW(
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3633 wn,
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3634 SE_FILE_OBJECT,
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3635 DACL_SECURITY_INFORMATION,
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3636 NULL,
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3637 NULL,
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3638 &p->pDacl,
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3639 NULL,
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3640 &p->pSecurityDescriptor);
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3641 }
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3642 if (p->pSecurityDescriptor == NULL)
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3643 {
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3644 mch_free_acl((vim_acl_T)p);
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3645 p = NULL;
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3646 }
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3647 vim_free(wn);
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3648 }
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3649 else
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3650 # endif
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3651 {
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3652 /* Try to retrieve the entire security descriptor. */
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3653 err = pGetNamedSecurityInfo(
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3654 (LPSTR)fname, // Abstract filename
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3655 SE_FILE_OBJECT, // File Object
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3656 OWNER_SECURITY_INFORMATION |
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3657 GROUP_SECURITY_INFORMATION |
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3658 DACL_SECURITY_INFORMATION |
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3659 SACL_SECURITY_INFORMATION,
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3660 &p->pSidOwner, // Ownership information.
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3661 &p->pSidGroup, // Group membership.
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3662 &p->pDacl, // Discretionary information.
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3663 &p->pSacl, // For auditing purposes.
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3664 &p->pSecurityDescriptor);
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3665 if (err == ERROR_ACCESS_DENIED ||
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3666 err == ERROR_PRIVILEGE_NOT_HELD)
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3667 {
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3668 /* Retrieve only DACL. */
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3669 (void)pGetNamedSecurityInfo(
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3670 (LPSTR)fname,
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3671 SE_FILE_OBJECT,
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3672 DACL_SECURITY_INFORMATION,
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3673 NULL,
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3674 NULL,
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3675 &p->pDacl,
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3676 NULL,
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3677 &p->pSecurityDescriptor);
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3678 }
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3679 if (p->pSecurityDescriptor == NULL)
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3680 {
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3681 mch_free_acl((vim_acl_T)p);
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3682 p = NULL;
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3683 }
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3684 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3685 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3686 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3687
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3688 return (vim_acl_T)p;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3689 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3690 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3691
5047
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3692 #ifdef HAVE_ACL
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3693 /*
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3694 * Check if "acl" contains inherited ACE.
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3695 */
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3696 static BOOL
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3697 is_acl_inherited(PACL acl)
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3698 {
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3699 DWORD i;
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3700 ACL_SIZE_INFORMATION acl_info;
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3701 PACCESS_ALLOWED_ACE ace;
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3702
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3703 acl_info.AceCount = 0;
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3704 GetAclInformation(acl, &acl_info, sizeof(acl_info), AclSizeInformation);
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3705 for (i = 0; i < acl_info.AceCount; i++)
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3706 {
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3707 GetAce(acl, i, (LPVOID *)&ace);
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3708 if (ace->Header.AceFlags & INHERITED_ACE)
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3709 return TRUE;
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3710 }
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3711 return FALSE;
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3712 }
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3713 #endif
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3714
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3715 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3716 * Set the ACL of file "fname" to "acl" (unless it's NULL).
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3717 * Errors are ignored.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3718 * This must only be called with "acl" equal to what mch_get_acl() returned.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3719 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3720 void
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
3721 mch_set_acl(char_u *fname, vim_acl_T acl)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3722 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3723 #ifdef HAVE_ACL
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3724 struct my_acl *p = (struct my_acl *)acl;
5047
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3725 SECURITY_INFORMATION sec_info = 0;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3726
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3727 if (p != NULL && advapi_lib != NULL)
5047
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3728 {
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3729 # ifdef FEAT_MBYTE
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3730 WCHAR *wn = NULL;
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3731 # endif
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3732
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3733 /* Set security flags */
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3734 if (p->pSidOwner)
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3735 sec_info |= OWNER_SECURITY_INFORMATION;
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3736 if (p->pSidGroup)
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3737 sec_info |= GROUP_SECURITY_INFORMATION;
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3738 if (p->pDacl)
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3739 {
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3740 sec_info |= DACL_SECURITY_INFORMATION;
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3741 /* Do not inherit its parent's DACL.
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3742 * If the DACL is inherited, Cygwin permissions would be changed.
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3743 */
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3744 if (!is_acl_inherited(p->pDacl))
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3745 sec_info |= PROTECTED_DACL_SECURITY_INFORMATION;
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3746 }
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3747 if (p->pSacl)
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3748 sec_info |= SACL_SECURITY_INFORMATION;
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3749
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3750 # ifdef FEAT_MBYTE
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3751 if (enc_codepage >= 0 && (int)GetACP() != enc_codepage)
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3752 wn = enc_to_utf16(fname, NULL);
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3753 if (wn != NULL)
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3754 {
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3755 (void)pSetNamedSecurityInfoW(
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3756 wn, // Abstract filename
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3757 SE_FILE_OBJECT, // File Object
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3758 sec_info,
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3759 p->pSidOwner, // Ownership information.
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3760 p->pSidGroup, // Group membership.
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3761 p->pDacl, // Discretionary information.
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3762 p->pSacl // For auditing purposes.
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3763 );
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3764 vim_free(wn);
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3765 }
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3766 else
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3767 # endif
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3768 {
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3769 (void)pSetNamedSecurityInfo(
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3770 (LPSTR)fname, // Abstract filename
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3771 SE_FILE_OBJECT, // File Object
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3772 sec_info,
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3773 p->pSidOwner, // Ownership information.
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3774 p->pSidGroup, // Group membership.
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3775 p->pDacl, // Discretionary information.
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3776 p->pSacl // For auditing purposes.
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3777 );
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3778 }
cabdcfe72dc3 updated for version 7.3.1267
Bram Moolenaar <bram@vim.org>
parents: 4930
diff changeset
3779 }
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3780 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3781 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3782
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3783 void
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
3784 mch_free_acl(vim_acl_T acl)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3785 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3786 #ifdef HAVE_ACL
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3787 struct my_acl *p = (struct my_acl *)acl;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3788
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3789 if (p != NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3790 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3791 LocalFree(p->pSecurityDescriptor); // Free the memory just in case
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3792 vim_free(p);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3793 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3794 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3795 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3796
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3797 #ifndef FEAT_GUI_W32
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3798
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3799 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3800 * handler for ctrl-break, ctrl-c interrupts, and fatal events.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3801 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3802 static BOOL WINAPI
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3803 handler_routine(
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3804 DWORD dwCtrlType)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3805 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3806 switch (dwCtrlType)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3807 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3808 case CTRL_C_EVENT:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3809 if (ctrl_c_interrupts)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3810 g_fCtrlCPressed = TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3811 return TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3812
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3813 case CTRL_BREAK_EVENT:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3814 g_fCBrkPressed = TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3815 return TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3816
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3817 /* fatal events: shut down gracefully */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3818 case CTRL_CLOSE_EVENT:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3819 case CTRL_LOGOFF_EVENT:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3820 case CTRL_SHUTDOWN_EVENT:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3821 windgoto((int)Rows - 1, 0);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3822 g_fForceExit = TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3823
1569
9fbb40a1228a updated for version 7.1-282
vimboss
parents: 1443
diff changeset
3824 vim_snprintf((char *)IObuff, IOSIZE, _("Vim: Caught %s event\n"),
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3825 (dwCtrlType == CTRL_CLOSE_EVENT
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3826 ? _("close")
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3827 : dwCtrlType == CTRL_LOGOFF_EVENT
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3828 ? _("logoff")
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3829 : _("shutdown")));
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3830 #ifdef DEBUG
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3831 OutputDebugString(IObuff);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3832 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3833
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3834 preserve_exit(); /* output IObuff, preserve files and exit */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3835
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3836 return TRUE; /* not reached */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3837
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3838 default:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3839 return FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3840 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3841 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3842
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3843
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3844 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3845 * set the tty in (raw) ? "raw" : "cooked" mode
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3846 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3847 void
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
3848 mch_settmode(int tmode)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3849 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3850 DWORD cmodein;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3851 DWORD cmodeout;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3852 BOOL bEnableHandler;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3853
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3854 GetConsoleMode(g_hConIn, &cmodein);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3855 GetConsoleMode(g_hConOut, &cmodeout);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3856 if (tmode == TMODE_RAW)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3857 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3858 cmodein &= ~(ENABLE_LINE_INPUT | ENABLE_PROCESSED_INPUT |
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3859 ENABLE_ECHO_INPUT);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3860 #ifdef FEAT_MOUSE
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3861 if (g_fMouseActive)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3862 cmodein |= ENABLE_MOUSE_INPUT;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3863 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3864 cmodeout &= ~(ENABLE_PROCESSED_OUTPUT | ENABLE_WRAP_AT_EOL_OUTPUT);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3865 bEnableHandler = TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3866 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3867 else /* cooked */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3868 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3869 cmodein |= (ENABLE_LINE_INPUT | ENABLE_PROCESSED_INPUT |
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3870 ENABLE_ECHO_INPUT);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3871 cmodeout |= (ENABLE_PROCESSED_OUTPUT | ENABLE_WRAP_AT_EOL_OUTPUT);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3872 bEnableHandler = FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3873 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3874 SetConsoleMode(g_hConIn, cmodein);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3875 SetConsoleMode(g_hConOut, cmodeout);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3876 SetConsoleCtrlHandler(handler_routine, bEnableHandler);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3877
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3878 #ifdef MCH_WRITE_DUMP
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3879 if (fdDump)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3880 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3881 fprintf(fdDump, "mch_settmode(%s, in = %x, out = %x)\n",
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3882 tmode == TMODE_RAW ? "raw" :
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3883 tmode == TMODE_COOK ? "cooked" : "normal",
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3884 cmodein, cmodeout);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3885 fflush(fdDump);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3886 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3887 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3888 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3889
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3890
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3891 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3892 * Get the size of the current window in `Rows' and `Columns'
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3893 * Return OK when size could be determined, FAIL otherwise.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3894 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3895 int
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
3896 mch_get_shellsize(void)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3897 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3898 CONSOLE_SCREEN_BUFFER_INFO csbi;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3899
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3900 if (!g_fTermcapMode && g_cbTermcap.IsValid)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3901 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3902 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3903 * For some reason, we are trying to get the screen dimensions
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3904 * even though we are not in termcap mode. The 'Rows' and 'Columns'
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3905 * variables are really intended to mean the size of Vim screen
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3906 * while in termcap mode.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3907 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3908 Rows = g_cbTermcap.Info.dwSize.Y;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3909 Columns = g_cbTermcap.Info.dwSize.X;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3910 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3911 else if (GetConsoleScreenBufferInfo(g_hConOut, &csbi))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3912 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3913 Rows = csbi.srWindow.Bottom - csbi.srWindow.Top + 1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3914 Columns = csbi.srWindow.Right - csbi.srWindow.Left + 1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3915 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3916 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3917 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3918 Rows = 25;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3919 Columns = 80;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3920 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3921 return OK;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3922 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3923
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3924 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3925 * Set a console window to `xSize' * `ySize'
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3926 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3927 static void
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3928 ResizeConBufAndWindow(
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
3929 HANDLE hConsole,
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
3930 int xSize,
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
3931 int ySize)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3932 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3933 CONSOLE_SCREEN_BUFFER_INFO csbi; /* hold current console buffer info */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3934 SMALL_RECT srWindowRect; /* hold the new console size */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3935 COORD coordScreen;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3936
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3937 #ifdef MCH_WRITE_DUMP
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3938 if (fdDump)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3939 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3940 fprintf(fdDump, "ResizeConBufAndWindow(%d, %d)\n", xSize, ySize);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3941 fflush(fdDump);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3942 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3943 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3944
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3945 /* get the largest size we can size the console window to */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3946 coordScreen = GetLargestConsoleWindowSize(hConsole);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3947
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3948 /* define the new console window size and scroll position */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3949 srWindowRect.Left = srWindowRect.Top = (SHORT) 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3950 srWindowRect.Right = (SHORT) (min(xSize, coordScreen.X) - 1);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3951 srWindowRect.Bottom = (SHORT) (min(ySize, coordScreen.Y) - 1);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3952
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3953 if (GetConsoleScreenBufferInfo(g_hConOut, &csbi))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3954 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3955 int sx, sy;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3956
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3957 sx = csbi.srWindow.Right - csbi.srWindow.Left + 1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3958 sy = csbi.srWindow.Bottom - csbi.srWindow.Top + 1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3959 if (sy < ySize || sx < xSize)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3960 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3961 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3962 * Increasing number of lines/columns, do buffer first.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3963 * Use the maximal size in x and y direction.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3964 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3965 if (sy < ySize)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3966 coordScreen.Y = ySize;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3967 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3968 coordScreen.Y = sy;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3969 if (sx < xSize)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3970 coordScreen.X = xSize;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3971 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3972 coordScreen.X = sx;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3973 SetConsoleScreenBufferSize(hConsole, coordScreen);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3974 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3975 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3976
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3977 if (!SetConsoleWindowInfo(g_hConOut, TRUE, &srWindowRect))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3978 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3979 #ifdef MCH_WRITE_DUMP
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3980 if (fdDump)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3981 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3982 fprintf(fdDump, "SetConsoleWindowInfo failed: %lx\n",
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3983 GetLastError());
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3984 fflush(fdDump);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3985 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3986 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3987 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3988
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3989 /* define the new console buffer size */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3990 coordScreen.X = xSize;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3991 coordScreen.Y = ySize;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3992
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3993 if (!SetConsoleScreenBufferSize(hConsole, coordScreen))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3994 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3995 #ifdef MCH_WRITE_DUMP
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3996 if (fdDump)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3997 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3998 fprintf(fdDump, "SetConsoleScreenBufferSize failed: %lx\n",
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3999 GetLastError());
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4000 fflush(fdDump);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4001 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4002 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4003 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4004 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4005
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4006
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4007 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4008 * Set the console window to `Rows' * `Columns'
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4009 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4010 void
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
4011 mch_set_shellsize(void)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4012 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4013 COORD coordScreen;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4014
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4015 /* Don't change window size while still starting up */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4016 if (suppress_winsize != 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4017 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4018 suppress_winsize = 2;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4019 return;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4020 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4021
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4022 if (term_console)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4023 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4024 coordScreen = GetLargestConsoleWindowSize(g_hConOut);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4025
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4026 /* Clamp Rows and Columns to reasonable values */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4027 if (Rows > coordScreen.Y)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4028 Rows = coordScreen.Y;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4029 if (Columns > coordScreen.X)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4030 Columns = coordScreen.X;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4031
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4032 ResizeConBufAndWindow(g_hConOut, Columns, Rows);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4033 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4034 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4035
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4036 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4037 * Rows and/or Columns has changed.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4038 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4039 void
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
4040 mch_new_shellsize(void)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4041 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4042 set_scroll_region(0, 0, Columns - 1, Rows - 1);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4043 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4044
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4045
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4046 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4047 * Called when started up, to set the winsize that was delayed.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4048 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4049 void
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
4050 mch_set_winsize_now(void)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4051 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4052 if (suppress_winsize == 2)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4053 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4054 suppress_winsize = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4055 mch_set_shellsize();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4056 shell_resized();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4057 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4058 suppress_winsize = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4059 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4060 #endif /* FEAT_GUI_W32 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4061
5547
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4062 static BOOL
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4063 vim_create_process(
5556
b14554844756 updated for version 7.4.126
Bram Moolenaar <bram@vim.org>
parents: 5553
diff changeset
4064 char *cmd,
5569
1b09d6792520 updated for version 7.4.132
Bram Moolenaar <bram@vim.org>
parents: 5556
diff changeset
4065 BOOL inherit_handles,
5547
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4066 DWORD flags,
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4067 STARTUPINFO *si,
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4068 PROCESS_INFORMATION *pi)
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4069 {
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4070 # ifdef FEAT_MBYTE
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4071 if (enc_codepage >= 0 && (int)GetACP() != enc_codepage)
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4072 {
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4073 WCHAR *wcmd = enc_to_utf16(cmd, NULL);
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4074
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4075 if (wcmd != NULL)
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4076 {
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4077 BOOL ret;
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4078 ret = CreateProcessW(
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4079 NULL, /* Executable name */
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4080 wcmd, /* Command to execute */
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4081 NULL, /* Process security attributes */
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4082 NULL, /* Thread security attributes */
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4083 inherit_handles, /* Inherit handles */
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4084 flags, /* Creation flags */
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4085 NULL, /* Environment */
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4086 NULL, /* Current directory */
5556
b14554844756 updated for version 7.4.126
Bram Moolenaar <bram@vim.org>
parents: 5553
diff changeset
4087 (LPSTARTUPINFOW)si, /* Startup information */
5547
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4088 pi); /* Process information */
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4089 vim_free(wcmd);
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4090 return ret;
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4091 }
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4092 }
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4093 #endif
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4094 return CreateProcess(
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4095 NULL, /* Executable name */
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4096 cmd, /* Command to execute */
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4097 NULL, /* Process security attributes */
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4098 NULL, /* Thread security attributes */
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4099 inherit_handles, /* Inherit handles */
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4100 flags, /* Creation flags */
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4101 NULL, /* Environment */
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4102 NULL, /* Current directory */
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4103 si, /* Startup information */
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4104 pi); /* Process information */
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4105 }
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4106
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4107
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4108 #if defined(FEAT_GUI_W32) || defined(PROTO)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4109
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4110 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4111 * Specialised version of system() for Win32 GUI mode.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4112 * This version proceeds as follows:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4113 * 1. Create a console window for use by the subprocess
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4114 * 2. Run the subprocess (it gets the allocated console by default)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4115 * 3. Wait for the subprocess to terminate and get its exit code
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4116 * 4. Prompt the user to press a key to close the console window
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4117 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4118 static int
2935
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4119 mch_system_classic(char *cmd, int options)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4120 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4121 STARTUPINFO si;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4122 PROCESS_INFORMATION pi;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4123 DWORD ret = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4124 HWND hwnd = GetFocus();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4125
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4126 si.cb = sizeof(si);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4127 si.lpReserved = NULL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4128 si.lpDesktop = NULL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4129 si.lpTitle = NULL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4130 si.dwFlags = STARTF_USESHOWWINDOW;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4131 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4132 * It's nicer to run a filter command in a minimized window, but in
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4133 * Windows 95 this makes the command MUCH slower. We can't do it under
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4134 * Win32s either as it stops the synchronous spawn workaround working.
2643
e6372ac3ebe5 updated for version 7.3.063
Bram Moolenaar <bram@vim.org>
parents: 2630
diff changeset
4135 * Don't activate the window to keep focus on Vim.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4136 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4137 if ((options & SHELL_DOOUT) && !mch_windows95() && !gui_is_win32s())
2643
e6372ac3ebe5 updated for version 7.3.063
Bram Moolenaar <bram@vim.org>
parents: 2630
diff changeset
4138 si.wShowWindow = SW_SHOWMINNOACTIVE;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4139 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4140 si.wShowWindow = SW_SHOWNORMAL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4141 si.cbReserved2 = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4142 si.lpReserved2 = NULL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4143
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4144 /* There is a strange error on Windows 95 when using "c:\\command.com".
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4145 * When the "c:\\" is left out it works OK...? */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4146 if (mch_windows95()
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4147 && (STRNICMP(cmd, "c:/command.com", 14) == 0
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4148 || STRNICMP(cmd, "c:\\command.com", 14) == 0))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4149 cmd += 3;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4150
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4151 /* Now, run the command */
5547
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4152 vim_create_process(cmd, FALSE,
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4153 CREATE_DEFAULT_ERROR_MODE | CREATE_NEW_CONSOLE, &si, &pi);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4154
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4155 /* Wait for the command to terminate before continuing */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4156 if (g_PlatformId != VER_PLATFORM_WIN32s)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4157 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4158 #ifdef FEAT_GUI
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4159 int delay = 1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4160
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4161 /* Keep updating the window while waiting for the shell to finish. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4162 for (;;)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4163 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4164 MSG msg;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4165
3010
e5b17a5f6516 updated for version 7.3.277
Bram Moolenaar <bram@vim.org>
parents: 2935
diff changeset
4166 if (pPeekMessage(&msg, (HWND)NULL, 0, 0, PM_REMOVE))
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4167 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4168 TranslateMessage(&msg);
3010
e5b17a5f6516 updated for version 7.3.277
Bram Moolenaar <bram@vim.org>
parents: 2935
diff changeset
4169 pDispatchMessage(&msg);
3720
27ecf0c87bd2 updated for version 7.3.619
Bram Moolenaar <bram@vim.org>
parents: 3691
diff changeset
4170 delay = 1;
27ecf0c87bd2 updated for version 7.3.619
Bram Moolenaar <bram@vim.org>
parents: 3691
diff changeset
4171 continue;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4172 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4173 if (WaitForSingleObject(pi.hProcess, delay) != WAIT_TIMEOUT)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4174 break;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4175
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4176 /* We start waiting for a very short time and then increase it, so
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4177 * that we respond quickly when the process is quick, and don't
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4178 * consume too much overhead when it's slow. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4179 if (delay < 50)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4180 delay += 10;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4181 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4182 #else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4183 WaitForSingleObject(pi.hProcess, INFINITE);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4184 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4185
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4186 /* Get the command exit code */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4187 GetExitCodeProcess(pi.hProcess, &ret);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4188 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4189 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4190 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4191 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4192 * This ugly code is the only quick way of performing
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4193 * a synchronous spawn under Win32s. Yuk.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4194 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4195 num_windows = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4196 EnumWindows(win32ssynch_cb, 0);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4197 old_num_windows = num_windows;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4198 do
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4199 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4200 Sleep(1000);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4201 num_windows = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4202 EnumWindows(win32ssynch_cb, 0);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4203 } while (num_windows == old_num_windows);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4204 ret = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4205 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4206
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4207 /* Close the handles to the subprocess, so that it goes away */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4208 CloseHandle(pi.hThread);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4209 CloseHandle(pi.hProcess);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4210
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4211 /* Try to get input focus back. Doesn't always work though. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4212 PostMessage(hwnd, WM_SETFOCUS, 0, 0);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4213
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4214 return ret;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4215 }
2935
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4216
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4217 /*
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4218 * Thread launched by the gui to send the current buffer data to the
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4219 * process. This way avoid to hang up vim totally if the children
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4220 * process take a long time to process the lines.
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4221 */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4222 static DWORD WINAPI
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4223 sub_process_writer(LPVOID param)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4224 {
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4225 HANDLE g_hChildStd_IN_Wr = param;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4226 linenr_T lnum = curbuf->b_op_start.lnum;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4227 DWORD len = 0;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4228 DWORD l;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4229 char_u *lp = ml_get(lnum);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4230 char_u *s;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4231 int written = 0;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4232
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4233 for (;;)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4234 {
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4235 l = (DWORD)STRLEN(lp + written);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4236 if (l == 0)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4237 len = 0;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4238 else if (lp[written] == NL)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4239 {
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4240 /* NL -> NUL translation */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4241 WriteFile(g_hChildStd_IN_Wr, "", 1, &len, NULL);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4242 }
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4243 else
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4244 {
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4245 s = vim_strchr(lp + written, NL);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4246 WriteFile(g_hChildStd_IN_Wr, (char *)lp + written,
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4247 s == NULL ? l : (DWORD)(s - (lp + written)),
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4248 &len, NULL);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4249 }
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4250 if (len == (int)l)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4251 {
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4252 /* Finished a line, add a NL, unless this line should not have
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4253 * one. */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4254 if (lnum != curbuf->b_op_end.lnum
6933
62ba356c2d4e patch 7.4.785
Bram Moolenaar <bram@vim.org>
parents: 6710
diff changeset
4255 || (!curbuf->b_p_bin
62ba356c2d4e patch 7.4.785
Bram Moolenaar <bram@vim.org>
parents: 6710
diff changeset
4256 && curbuf->b_p_fixeol)
2935
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4257 || (lnum != curbuf->b_no_eol_lnum
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4258 && (lnum != curbuf->b_ml.ml_line_count
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4259 || curbuf->b_p_eol)))
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4260 {
4238
26e59a39fdd9 updated for version 7.3.870
Bram Moolenaar <bram@vim.org>
parents: 4168
diff changeset
4261 WriteFile(g_hChildStd_IN_Wr, "\n", 1, (LPDWORD)&ignored, NULL);
2935
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4262 }
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4263
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4264 ++lnum;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4265 if (lnum > curbuf->b_op_end.lnum)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4266 break;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4267
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4268 lp = ml_get(lnum);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4269 written = 0;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4270 }
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4271 else if (len > 0)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4272 written += len;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4273 }
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4274
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4275 /* finished all the lines, close pipe */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4276 CloseHandle(g_hChildStd_IN_Wr);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4277 ExitThread(0);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4278 }
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4279
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4280
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4281 # define BUFLEN 100 /* length for buffer, stolen from unix version */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4282
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4283 /*
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4284 * This function read from the children's stdout and write the
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4285 * data on screen or in the buffer accordingly.
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4286 */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4287 static void
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4288 dump_pipe(int options,
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4289 HANDLE g_hChildStd_OUT_Rd,
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4290 garray_T *ga,
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4291 char_u buffer[],
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4292 DWORD *buffer_off)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4293 {
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4294 DWORD availableBytes = 0;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4295 DWORD i;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4296 int ret;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4297 DWORD len;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4298 DWORD toRead;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4299 int repeatCount;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4300
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4301 /* we query the pipe to see if there is any data to read
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4302 * to avoid to perform a blocking read */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4303 ret = PeekNamedPipe(g_hChildStd_OUT_Rd, /* pipe to query */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4304 NULL, /* optional buffer */
3622
43fd3896fab7 updated for version 7.3.571
Bram Moolenaar <bram@vim.org>
parents: 3386
diff changeset
4305 0, /* buffer size */
2935
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4306 NULL, /* number of read bytes */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4307 &availableBytes, /* available bytes total */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4308 NULL); /* byteLeft */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4309
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4310 repeatCount = 0;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4311 /* We got real data in the pipe, read it */
3622
43fd3896fab7 updated for version 7.3.571
Bram Moolenaar <bram@vim.org>
parents: 3386
diff changeset
4312 while (ret != 0 && availableBytes > 0)
2935
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4313 {
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4314 repeatCount++;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4315 toRead =
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4316 # ifdef FEAT_MBYTE
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4317 (DWORD)(BUFLEN - *buffer_off);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4318 # else
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4319 (DWORD)BUFLEN;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4320 # endif
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4321 toRead = availableBytes < toRead ? availableBytes : toRead;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4322 ReadFile(g_hChildStd_OUT_Rd, buffer
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4323 # ifdef FEAT_MBYTE
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4324 + *buffer_off, toRead
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4325 # else
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4326 , toRead
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4327 # endif
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4328 , &len, NULL);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4329
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4330 /* If we haven't read anything, there is a problem */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4331 if (len == 0)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4332 break;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4333
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4334 availableBytes -= len;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4335
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4336 if (options & SHELL_READ)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4337 {
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4338 /* Do NUL -> NL translation, append NL separated
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4339 * lines to the current buffer. */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4340 for (i = 0; i < len; ++i)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4341 {
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4342 if (buffer[i] == NL)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4343 append_ga_line(ga);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4344 else if (buffer[i] == NUL)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4345 ga_append(ga, NL);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4346 else
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4347 ga_append(ga, buffer[i]);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4348 }
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4349 }
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4350 # ifdef FEAT_MBYTE
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4351 else if (has_mbyte)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4352 {
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4353 int l;
3030
07bc2ccfe555 updated for version 7.3.287
Bram Moolenaar <bram@vim.org>
parents: 3010
diff changeset
4354 int c;
07bc2ccfe555 updated for version 7.3.287
Bram Moolenaar <bram@vim.org>
parents: 3010
diff changeset
4355 char_u *p;
2935
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4356
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4357 len += *buffer_off;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4358 buffer[len] = NUL;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4359
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4360 /* Check if the last character in buffer[] is
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4361 * incomplete, keep these bytes for the next
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4362 * round. */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4363 for (p = buffer; p < buffer + len; p += l)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4364 {
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4365 l = mb_cptr2len(p);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4366 if (l == 0)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4367 l = 1; /* NUL byte? */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4368 else if (MB_BYTE2LEN(*p) != l)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4369 break;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4370 }
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4371 if (p == buffer) /* no complete character */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4372 {
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4373 /* avoid getting stuck at an illegal byte */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4374 if (len >= 12)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4375 ++p;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4376 else
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4377 {
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4378 *buffer_off = len;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4379 return;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4380 }
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4381 }
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4382 c = *p;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4383 *p = NUL;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4384 msg_puts(buffer);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4385 if (p < buffer + len)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4386 {
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4387 *p = c;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4388 *buffer_off = (DWORD)((buffer + len) - p);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4389 mch_memmove(buffer, p, *buffer_off);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4390 return;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4391 }
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4392 *buffer_off = 0;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4393 }
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4394 # endif /* FEAT_MBYTE */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4395 else
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4396 {
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4397 buffer[len] = NUL;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4398 msg_puts(buffer);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4399 }
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4400
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4401 windgoto(msg_row, msg_col);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4402 cursor_on();
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4403 out_flush();
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4404 }
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4405 }
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4406
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4407 /*
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4408 * Version of system to use for windows NT > 5.0 (Win2K), use pipe
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4409 * for communication and doesn't open any new window.
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4410 */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4411 static int
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4412 mch_system_piped(char *cmd, int options)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4413 {
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4414 STARTUPINFO si;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4415 PROCESS_INFORMATION pi;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4416 DWORD ret = 0;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4417
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4418 HANDLE g_hChildStd_IN_Rd = NULL;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4419 HANDLE g_hChildStd_IN_Wr = NULL;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4420 HANDLE g_hChildStd_OUT_Rd = NULL;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4421 HANDLE g_hChildStd_OUT_Wr = NULL;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4422
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4423 char_u buffer[BUFLEN + 1]; /* reading buffer + size */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4424 DWORD len;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4425
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4426 /* buffer used to receive keys */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4427 char_u ta_buf[BUFLEN + 1]; /* TypeAHead */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4428 int ta_len = 0; /* valid bytes in ta_buf[] */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4429
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4430 DWORD i;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4431 int c;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4432 int noread_cnt = 0;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4433 garray_T ga;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4434 int delay = 1;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4435 DWORD buffer_off = 0; /* valid bytes in buffer[] */
3361
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4436 char *p = NULL;
2935
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4437
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4438 SECURITY_ATTRIBUTES saAttr;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4439
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4440 /* Set the bInheritHandle flag so pipe handles are inherited. */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4441 saAttr.nLength = sizeof(SECURITY_ATTRIBUTES);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4442 saAttr.bInheritHandle = TRUE;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4443 saAttr.lpSecurityDescriptor = NULL;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4444
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4445 if ( ! CreatePipe(&g_hChildStd_OUT_Rd, &g_hChildStd_OUT_Wr, &saAttr, 0)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4446 /* Ensure the read handle to the pipe for STDOUT is not inherited. */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4447 || ! pSetHandleInformation(g_hChildStd_OUT_Rd, HANDLE_FLAG_INHERIT, 0)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4448 /* Create a pipe for the child process's STDIN. */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4449 || ! CreatePipe(&g_hChildStd_IN_Rd, &g_hChildStd_IN_Wr, &saAttr, 0)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4450 /* Ensure the write handle to the pipe for STDIN is not inherited. */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4451 || ! pSetHandleInformation(g_hChildStd_IN_Wr, HANDLE_FLAG_INHERIT, 0) )
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4452 {
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4453 CloseHandle(g_hChildStd_IN_Rd);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4454 CloseHandle(g_hChildStd_IN_Wr);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4455 CloseHandle(g_hChildStd_OUT_Rd);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4456 CloseHandle(g_hChildStd_OUT_Wr);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4457 MSG_PUTS(_("\nCannot create pipes\n"));
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4458 }
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4459
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4460 si.cb = sizeof(si);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4461 si.lpReserved = NULL;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4462 si.lpDesktop = NULL;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4463 si.lpTitle = NULL;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4464 si.dwFlags = STARTF_USESHOWWINDOW | STARTF_USESTDHANDLES;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4465
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4466 /* set-up our file redirection */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4467 si.hStdError = g_hChildStd_OUT_Wr;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4468 si.hStdOutput = g_hChildStd_OUT_Wr;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4469 si.hStdInput = g_hChildStd_IN_Rd;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4470 si.wShowWindow = SW_HIDE;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4471 si.cbReserved2 = 0;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4472 si.lpReserved2 = NULL;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4473
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4474 if (options & SHELL_READ)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4475 ga_init2(&ga, 1, BUFLEN);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4476
3361
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4477 if (cmd != NULL)
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4478 {
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4479 p = (char *)vim_strsave((char_u *)cmd);
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4480 if (p != NULL)
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4481 unescape_shellxquote((char_u *)p, p_sxe);
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4482 else
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4483 p = cmd;
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4484 }
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4485
5547
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4486 /* Now, run the command.
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4487 * About "Inherit handles" being TRUE: this command can be litigious,
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4488 * handle inheritance was deactivated for pending temp file, but, if we
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4489 * deactivate it, the pipes don't work for some reason. */
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4490 vim_create_process(p, TRUE, CREATE_DEFAULT_ERROR_MODE, &si, &pi);
2935
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4491
3361
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4492 if (p != cmd)
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4493 vim_free(p);
2935
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4494
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4495 /* Close our unused side of the pipes */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4496 CloseHandle(g_hChildStd_IN_Rd);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4497 CloseHandle(g_hChildStd_OUT_Wr);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4498
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4499 if (options & SHELL_WRITE)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4500 {
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4501 HANDLE thread =
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4502 CreateThread(NULL, /* security attributes */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4503 0, /* default stack size */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4504 sub_process_writer, /* function to be executed */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4505 g_hChildStd_IN_Wr, /* parameter */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4506 0, /* creation flag, start immediately */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4507 NULL); /* we don't care about thread id */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4508 CloseHandle(thread);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4509 g_hChildStd_IN_Wr = NULL;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4510 }
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4511
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4512 /* Keep updating the window while waiting for the shell to finish. */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4513 for (;;)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4514 {
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4515 MSG msg;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4516
5553
45ef9d2096e8 updated for version 7.4.125
Bram Moolenaar <bram@vim.org>
parents: 5551
diff changeset
4517 if (pPeekMessage(&msg, (HWND)NULL, 0, 0, PM_REMOVE))
2935
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4518 {
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4519 TranslateMessage(&msg);
5553
45ef9d2096e8 updated for version 7.4.125
Bram Moolenaar <bram@vim.org>
parents: 5551
diff changeset
4520 pDispatchMessage(&msg);
2935
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4521 }
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4522
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4523 /* write pipe information in the window */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4524 if ((options & (SHELL_READ|SHELL_WRITE))
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4525 # ifdef FEAT_GUI
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4526 || gui.in_use
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4527 # endif
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4528 )
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4529 {
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4530 len = 0;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4531 if (!(options & SHELL_EXPAND)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4532 && ((options &
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4533 (SHELL_READ|SHELL_WRITE|SHELL_COOKED))
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4534 != (SHELL_READ|SHELL_WRITE|SHELL_COOKED)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4535 # ifdef FEAT_GUI
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4536 || gui.in_use
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4537 # endif
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4538 )
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4539 && (ta_len > 0 || noread_cnt > 4))
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4540 {
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4541 if (ta_len == 0)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4542 {
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4543 /* Get extra characters when we don't have any. Reset the
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4544 * counter and timer. */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4545 noread_cnt = 0;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4546 # if defined(HAVE_GETTIMEOFDAY) && defined(HAVE_SYS_TIME_H)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4547 gettimeofday(&start_tv, NULL);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4548 # endif
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4549 len = ui_inchar(ta_buf, BUFLEN, 10L, 0);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4550 }
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4551 if (ta_len > 0 || len > 0)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4552 {
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4553 /*
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4554 * For pipes: Check for CTRL-C: send interrupt signal to
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4555 * child. Check for CTRL-D: EOF, close pipe to child.
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4556 */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4557 if (len == 1 && cmd != NULL)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4558 {
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4559 if (ta_buf[ta_len] == Ctrl_C)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4560 {
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4561 /* Learn what exit code is expected, for
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4562 * now put 9 as SIGKILL */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4563 TerminateProcess(pi.hProcess, 9);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4564 }
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4565 if (ta_buf[ta_len] == Ctrl_D)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4566 {
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4567 CloseHandle(g_hChildStd_IN_Wr);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4568 g_hChildStd_IN_Wr = NULL;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4569 }
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4570 }
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4571
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4572 /* replace K_BS by <BS> and K_DEL by <DEL> */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4573 for (i = ta_len; i < ta_len + len; ++i)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4574 {
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4575 if (ta_buf[i] == CSI && len - i > 2)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4576 {
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4577 c = TERMCAP2KEY(ta_buf[i + 1], ta_buf[i + 2]);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4578 if (c == K_DEL || c == K_KDEL || c == K_BS)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4579 {
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4580 mch_memmove(ta_buf + i + 1, ta_buf + i + 3,
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4581 (size_t)(len - i - 2));
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4582 if (c == K_DEL || c == K_KDEL)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4583 ta_buf[i] = DEL;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4584 else
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4585 ta_buf[i] = Ctrl_H;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4586 len -= 2;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4587 }
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4588 }
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4589 else if (ta_buf[i] == '\r')
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4590 ta_buf[i] = '\n';
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4591 # ifdef FEAT_MBYTE
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4592 if (has_mbyte)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4593 i += (*mb_ptr2len_len)(ta_buf + i,
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4594 ta_len + len - i) - 1;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4595 # endif
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4596 }
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4597
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4598 /*
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4599 * For pipes: echo the typed characters. For a pty this
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4600 * does not seem to work.
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4601 */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4602 for (i = ta_len; i < ta_len + len; ++i)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4603 {
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4604 if (ta_buf[i] == '\n' || ta_buf[i] == '\b')
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4605 msg_putchar(ta_buf[i]);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4606 # ifdef FEAT_MBYTE
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4607 else if (has_mbyte)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4608 {
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4609 int l = (*mb_ptr2len)(ta_buf + i);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4610
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4611 msg_outtrans_len(ta_buf + i, l);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4612 i += l - 1;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4613 }
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4614 # endif
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4615 else
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4616 msg_outtrans_len(ta_buf + i, 1);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4617 }
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4618 windgoto(msg_row, msg_col);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4619 out_flush();
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4620
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4621 ta_len += len;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4622
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4623 /*
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4624 * Write the characters to the child, unless EOF has been
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4625 * typed for pipes. Write one character at a time, to
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4626 * avoid losing too much typeahead. When writing buffer
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4627 * lines, drop the typed characters (only check for
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4628 * CTRL-C).
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4629 */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4630 if (options & SHELL_WRITE)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4631 ta_len = 0;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4632 else if (g_hChildStd_IN_Wr != NULL)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4633 {
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4634 WriteFile(g_hChildStd_IN_Wr, (char*)ta_buf,
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4635 1, &len, NULL);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4636 // if we are typing in, we want to keep things reactive
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4637 delay = 1;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4638 if (len > 0)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4639 {
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4640 ta_len -= len;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4641 mch_memmove(ta_buf, ta_buf + len, ta_len);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4642 }
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4643 }
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4644 }
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4645 }
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4646 }
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4647
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4648 if (ta_len)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4649 ui_inchar_undo(ta_buf, ta_len);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4650
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4651 if (WaitForSingleObject(pi.hProcess, delay) != WAIT_TIMEOUT)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4652 {
3030
07bc2ccfe555 updated for version 7.3.287
Bram Moolenaar <bram@vim.org>
parents: 3010
diff changeset
4653 dump_pipe(options, g_hChildStd_OUT_Rd, &ga, buffer, &buffer_off);
2935
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4654 break;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4655 }
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4656
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4657 ++noread_cnt;
3030
07bc2ccfe555 updated for version 7.3.287
Bram Moolenaar <bram@vim.org>
parents: 3010
diff changeset
4658 dump_pipe(options, g_hChildStd_OUT_Rd, &ga, buffer, &buffer_off);
2935
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4659
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4660 /* We start waiting for a very short time and then increase it, so
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4661 * that we respond quickly when the process is quick, and don't
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4662 * consume too much overhead when it's slow. */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4663 if (delay < 50)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4664 delay += 10;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4665 }
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4666
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4667 /* Close the pipe */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4668 CloseHandle(g_hChildStd_OUT_Rd);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4669 if (g_hChildStd_IN_Wr != NULL)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4670 CloseHandle(g_hChildStd_IN_Wr);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4671
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4672 WaitForSingleObject(pi.hProcess, INFINITE);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4673
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4674 /* Get the command exit code */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4675 GetExitCodeProcess(pi.hProcess, &ret);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4676
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4677 if (options & SHELL_READ)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4678 {
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4679 if (ga.ga_len > 0)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4680 {
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4681 append_ga_line(&ga);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4682 /* remember that the NL was missing */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4683 curbuf->b_no_eol_lnum = curwin->w_cursor.lnum;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4684 }
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4685 else
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4686 curbuf->b_no_eol_lnum = 0;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4687 ga_clear(&ga);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4688 }
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4689
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4690 /* Close the handles to the subprocess, so that it goes away */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4691 CloseHandle(pi.hThread);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4692 CloseHandle(pi.hProcess);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4693
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4694 return ret;
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4695 }
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4696
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4697 static int
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4698 mch_system(char *cmd, int options)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4699 {
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4700 /* if we can pipe and the shelltemp option is off */
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4701 if (allowPiping && !p_stmp)
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4702 return mch_system_piped(cmd, options);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4703 else
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4704 return mch_system_classic(cmd, options);
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4705 }
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4706 #else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4707
5547
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4708 # ifdef FEAT_MBYTE
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4709 static int
7184
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
4710 mch_system(char *cmd, int options)
5547
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4711 {
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4712 if (enc_codepage >= 0 && (int)GetACP() != enc_codepage)
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4713 {
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4714 WCHAR *wcmd = enc_to_utf16(cmd, NULL);
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4715 if (wcmd != NULL)
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4716 {
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4717 int ret = _wsystem(wcmd);
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4718 vim_free(wcmd);
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4719 return ret;
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4720 }
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4721 }
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4722 return system(cmd);
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4723 }
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4724 # else
7184
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
4725 # define mch_system(c, o) system(c)
5547
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4726 # endif
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4727
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4728 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4729
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4730 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4731 * Either execute a command by calling the shell or start a new shell
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4732 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4733 int
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4734 mch_call_shell(
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
4735 char_u *cmd,
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
4736 int options) /* SHELL_*, see vim.h */
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4737 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4738 int x = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4739 int tmode = cur_tmode;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4740 #ifdef FEAT_TITLE
6293
e3149e2b4152 updated for version 7.4.480
Bram Moolenaar <bram@vim.org>
parents: 6290
diff changeset
4741 char szShellTitle[512];
6290
e0f2ed0efb49 updated for version 7.4.479
Bram Moolenaar <bram@vim.org>
parents: 6262
diff changeset
4742 # ifdef FEAT_MBYTE
6293
e3149e2b4152 updated for version 7.4.480
Bram Moolenaar <bram@vim.org>
parents: 6290
diff changeset
4743 int did_set_title = FALSE;
e3149e2b4152 updated for version 7.4.480
Bram Moolenaar <bram@vim.org>
parents: 6290
diff changeset
4744
6290
e0f2ed0efb49 updated for version 7.4.479
Bram Moolenaar <bram@vim.org>
parents: 6262
diff changeset
4745 /* Change the title to reflect that we are in a subshell. */
e0f2ed0efb49 updated for version 7.4.479
Bram Moolenaar <bram@vim.org>
parents: 6262
diff changeset
4746 if (enc_codepage >= 0 && (int)GetACP() != enc_codepage)
e0f2ed0efb49 updated for version 7.4.479
Bram Moolenaar <bram@vim.org>
parents: 6262
diff changeset
4747 {
e0f2ed0efb49 updated for version 7.4.479
Bram Moolenaar <bram@vim.org>
parents: 6262
diff changeset
4748 WCHAR szShellTitle[512];
e0f2ed0efb49 updated for version 7.4.479
Bram Moolenaar <bram@vim.org>
parents: 6262
diff changeset
4749
e0f2ed0efb49 updated for version 7.4.479
Bram Moolenaar <bram@vim.org>
parents: 6262
diff changeset
4750 if (GetConsoleTitleW(szShellTitle,
e0f2ed0efb49 updated for version 7.4.479
Bram Moolenaar <bram@vim.org>
parents: 6262
diff changeset
4751 sizeof(szShellTitle)/sizeof(WCHAR) - 4) > 0)
e0f2ed0efb49 updated for version 7.4.479
Bram Moolenaar <bram@vim.org>
parents: 6262
diff changeset
4752 {
e0f2ed0efb49 updated for version 7.4.479
Bram Moolenaar <bram@vim.org>
parents: 6262
diff changeset
4753 if (cmd == NULL)
e0f2ed0efb49 updated for version 7.4.479
Bram Moolenaar <bram@vim.org>
parents: 6262
diff changeset
4754 wcscat(szShellTitle, L" :sh");
e0f2ed0efb49 updated for version 7.4.479
Bram Moolenaar <bram@vim.org>
parents: 6262
diff changeset
4755 else
e0f2ed0efb49 updated for version 7.4.479
Bram Moolenaar <bram@vim.org>
parents: 6262
diff changeset
4756 {
e0f2ed0efb49 updated for version 7.4.479
Bram Moolenaar <bram@vim.org>
parents: 6262
diff changeset
4757 WCHAR *wn = enc_to_utf16(cmd, NULL);
e0f2ed0efb49 updated for version 7.4.479
Bram Moolenaar <bram@vim.org>
parents: 6262
diff changeset
4758
e0f2ed0efb49 updated for version 7.4.479
Bram Moolenaar <bram@vim.org>
parents: 6262
diff changeset
4759 if (wn != NULL)
e0f2ed0efb49 updated for version 7.4.479
Bram Moolenaar <bram@vim.org>
parents: 6262
diff changeset
4760 {
e0f2ed0efb49 updated for version 7.4.479
Bram Moolenaar <bram@vim.org>
parents: 6262
diff changeset
4761 wcscat(szShellTitle, L" - !");
e0f2ed0efb49 updated for version 7.4.479
Bram Moolenaar <bram@vim.org>
parents: 6262
diff changeset
4762 if ((wcslen(szShellTitle) + wcslen(wn) <
e0f2ed0efb49 updated for version 7.4.479
Bram Moolenaar <bram@vim.org>
parents: 6262
diff changeset
4763 sizeof(szShellTitle)/sizeof(WCHAR)))
e0f2ed0efb49 updated for version 7.4.479
Bram Moolenaar <bram@vim.org>
parents: 6262
diff changeset
4764 wcscat(szShellTitle, wn);
e0f2ed0efb49 updated for version 7.4.479
Bram Moolenaar <bram@vim.org>
parents: 6262
diff changeset
4765 SetConsoleTitleW(szShellTitle);
e0f2ed0efb49 updated for version 7.4.479
Bram Moolenaar <bram@vim.org>
parents: 6262
diff changeset
4766 vim_free(wn);
6293
e3149e2b4152 updated for version 7.4.480
Bram Moolenaar <bram@vim.org>
parents: 6290
diff changeset
4767 did_set_title = TRUE;
6290
e0f2ed0efb49 updated for version 7.4.479
Bram Moolenaar <bram@vim.org>
parents: 6262
diff changeset
4768 }
e0f2ed0efb49 updated for version 7.4.479
Bram Moolenaar <bram@vim.org>
parents: 6262
diff changeset
4769 }
e0f2ed0efb49 updated for version 7.4.479
Bram Moolenaar <bram@vim.org>
parents: 6262
diff changeset
4770 }
e0f2ed0efb49 updated for version 7.4.479
Bram Moolenaar <bram@vim.org>
parents: 6262
diff changeset
4771 }
6293
e3149e2b4152 updated for version 7.4.480
Bram Moolenaar <bram@vim.org>
parents: 6290
diff changeset
4772 if (!did_set_title)
e3149e2b4152 updated for version 7.4.480
Bram Moolenaar <bram@vim.org>
parents: 6290
diff changeset
4773 # endif
e3149e2b4152 updated for version 7.4.480
Bram Moolenaar <bram@vim.org>
parents: 6290
diff changeset
4774 /* Change the title to reflect that we are in a subshell. */
e3149e2b4152 updated for version 7.4.480
Bram Moolenaar <bram@vim.org>
parents: 6290
diff changeset
4775 if (GetConsoleTitle(szShellTitle, sizeof(szShellTitle) - 4) > 0)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4776 {
6293
e3149e2b4152 updated for version 7.4.480
Bram Moolenaar <bram@vim.org>
parents: 6290
diff changeset
4777 if (cmd == NULL)
e3149e2b4152 updated for version 7.4.480
Bram Moolenaar <bram@vim.org>
parents: 6290
diff changeset
4778 strcat(szShellTitle, " :sh");
e3149e2b4152 updated for version 7.4.480
Bram Moolenaar <bram@vim.org>
parents: 6290
diff changeset
4779 else
e3149e2b4152 updated for version 7.4.480
Bram Moolenaar <bram@vim.org>
parents: 6290
diff changeset
4780 {
e3149e2b4152 updated for version 7.4.480
Bram Moolenaar <bram@vim.org>
parents: 6290
diff changeset
4781 strcat(szShellTitle, " - !");
e3149e2b4152 updated for version 7.4.480
Bram Moolenaar <bram@vim.org>
parents: 6290
diff changeset
4782 if ((strlen(szShellTitle) + strlen(cmd) < sizeof(szShellTitle)))
e3149e2b4152 updated for version 7.4.480
Bram Moolenaar <bram@vim.org>
parents: 6290
diff changeset
4783 strcat(szShellTitle, cmd);
e3149e2b4152 updated for version 7.4.480
Bram Moolenaar <bram@vim.org>
parents: 6290
diff changeset
4784 }
e3149e2b4152 updated for version 7.4.480
Bram Moolenaar <bram@vim.org>
parents: 6290
diff changeset
4785 SetConsoleTitle(szShellTitle);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4786 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4787 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4788
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4789 out_flush();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4790
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4791 #ifdef MCH_WRITE_DUMP
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4792 if (fdDump)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4793 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4794 fprintf(fdDump, "mch_call_shell(\"%s\", %d)\n", cmd, options);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4795 fflush(fdDump);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4796 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4797 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4798
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4799 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4800 * Catch all deadly signals while running the external command, because a
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4801 * CTRL-C, Ctrl-Break or illegal instruction might otherwise kill us.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4802 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4803 signal(SIGINT, SIG_IGN);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4804 #if defined(__GNUC__) && !defined(__MINGW32__)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4805 signal(SIGKILL, SIG_IGN);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4806 #else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4807 signal(SIGBREAK, SIG_IGN);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4808 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4809 signal(SIGILL, SIG_IGN);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4810 signal(SIGFPE, SIG_IGN);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4811 signal(SIGSEGV, SIG_IGN);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4812 signal(SIGTERM, SIG_IGN);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4813 signal(SIGABRT, SIG_IGN);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4814
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4815 if (options & SHELL_COOKED)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4816 settmode(TMODE_COOK); /* set to normal mode */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4817
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4818 if (cmd == NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4819 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4820 x = mch_system(p_sh, options);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4821 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4822 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4823 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4824 /* we use "command" or "cmd" to start the shell; slow but easy */
3363
756d712b3118 updated for version 7.3.448
Bram Moolenaar <bram@vim.org>
parents: 3361
diff changeset
4825 char_u *newcmd = NULL;
756d712b3118 updated for version 7.3.448
Bram Moolenaar <bram@vim.org>
parents: 3361
diff changeset
4826 char_u *cmdbase = cmd;
756d712b3118 updated for version 7.3.448
Bram Moolenaar <bram@vim.org>
parents: 3361
diff changeset
4827 long_u cmdlen;
3361
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4828
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4829 /* Skip a leading ", ( and "(. */
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4830 if (*cmdbase == '"' )
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4831 ++cmdbase;
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4832 if (*cmdbase == '(')
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4833 ++cmdbase;
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4834
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4835 if ((STRNICMP(cmdbase, "start", 5) == 0) && vim_iswhite(cmdbase[5]))
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4836 {
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4837 STARTUPINFO si;
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4838 PROCESS_INFORMATION pi;
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4839 DWORD flags = CREATE_NEW_CONSOLE;
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4840 char_u *p;
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4841
5627
f29febf858be updated for version 7.4.160
Bram Moolenaar <bram@vim.org>
parents: 5590
diff changeset
4842 ZeroMemory(&si, sizeof(si));
3361
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4843 si.cb = sizeof(si);
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4844 si.lpReserved = NULL;
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4845 si.lpDesktop = NULL;
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4846 si.lpTitle = NULL;
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4847 si.dwFlags = 0;
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4848 si.cbReserved2 = 0;
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4849 si.lpReserved2 = NULL;
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4850
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4851 cmdbase = skipwhite(cmdbase + 5);
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4852 if ((STRNICMP(cmdbase, "/min", 4) == 0)
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4853 && vim_iswhite(cmdbase[4]))
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4854 {
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4855 cmdbase = skipwhite(cmdbase + 4);
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4856 si.dwFlags = STARTF_USESHOWWINDOW;
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4857 si.wShowWindow = SW_SHOWMINNOACTIVE;
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4858 }
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4859 else if ((STRNICMP(cmdbase, "/b", 2) == 0)
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4860 && vim_iswhite(cmdbase[2]))
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4861 {
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4862 cmdbase = skipwhite(cmdbase + 2);
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4863 flags = CREATE_NO_WINDOW;
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4864 si.dwFlags = STARTF_USESTDHANDLES;
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4865 si.hStdInput = CreateFile("\\\\.\\NUL", // File name
3363
756d712b3118 updated for version 7.3.448
Bram Moolenaar <bram@vim.org>
parents: 3361
diff changeset
4866 GENERIC_READ, // Access flags
3361
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4867 0, // Share flags
3363
756d712b3118 updated for version 7.3.448
Bram Moolenaar <bram@vim.org>
parents: 3361
diff changeset
4868 NULL, // Security att.
756d712b3118 updated for version 7.3.448
Bram Moolenaar <bram@vim.org>
parents: 3361
diff changeset
4869 OPEN_EXISTING, // Open flags
756d712b3118 updated for version 7.3.448
Bram Moolenaar <bram@vim.org>
parents: 3361
diff changeset
4870 FILE_ATTRIBUTE_NORMAL, // File att.
756d712b3118 updated for version 7.3.448
Bram Moolenaar <bram@vim.org>
parents: 3361
diff changeset
4871 NULL); // Temp file
3361
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4872 si.hStdOutput = si.hStdInput;
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4873 si.hStdError = si.hStdInput;
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4874 }
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4875
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4876 /* Remove a trailing ", ) and )" if they have a match
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4877 * at the start of the command. */
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4878 if (cmdbase > cmd)
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4879 {
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4880 p = cmdbase + STRLEN(cmdbase);
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4881 if (p > cmdbase && p[-1] == '"' && *cmd == '"')
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4882 *--p = NUL;
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4883 if (p > cmdbase && p[-1] == ')'
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4884 && (*cmd =='(' || cmd[1] == '('))
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4885 *--p = NUL;
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4886 }
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4887
3363
756d712b3118 updated for version 7.3.448
Bram Moolenaar <bram@vim.org>
parents: 3361
diff changeset
4888 newcmd = cmdbase;
756d712b3118 updated for version 7.3.448
Bram Moolenaar <bram@vim.org>
parents: 3361
diff changeset
4889 unescape_shellxquote(cmdbase, p_sxe);
756d712b3118 updated for version 7.3.448
Bram Moolenaar <bram@vim.org>
parents: 3361
diff changeset
4890
3361
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4891 /*
3363
756d712b3118 updated for version 7.3.448
Bram Moolenaar <bram@vim.org>
parents: 3361
diff changeset
4892 * If creating new console, arguments are passed to the
756d712b3118 updated for version 7.3.448
Bram Moolenaar <bram@vim.org>
parents: 3361
diff changeset
4893 * 'cmd.exe' as-is. If it's not, arguments are not treated
756d712b3118 updated for version 7.3.448
Bram Moolenaar <bram@vim.org>
parents: 3361
diff changeset
4894 * correctly for current 'cmd.exe'. So unescape characters in
756d712b3118 updated for version 7.3.448
Bram Moolenaar <bram@vim.org>
parents: 3361
diff changeset
4895 * shellxescape except '|' for avoiding to be treated as
756d712b3118 updated for version 7.3.448
Bram Moolenaar <bram@vim.org>
parents: 3361
diff changeset
4896 * argument to them. Pass the arguments to sub-shell.
3361
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4897 */
3363
756d712b3118 updated for version 7.3.448
Bram Moolenaar <bram@vim.org>
parents: 3361
diff changeset
4898 if (flags != CREATE_NEW_CONSOLE)
756d712b3118 updated for version 7.3.448
Bram Moolenaar <bram@vim.org>
parents: 3361
diff changeset
4899 {
756d712b3118 updated for version 7.3.448
Bram Moolenaar <bram@vim.org>
parents: 3361
diff changeset
4900 char_u *subcmd;
3367
3479ac596f6c updated for version 7.3.450
Bram Moolenaar <bram@vim.org>
parents: 3363
diff changeset
4901 char_u *cmd_shell = mch_getenv("COMSPEC");
3479ac596f6c updated for version 7.3.450
Bram Moolenaar <bram@vim.org>
parents: 3363
diff changeset
4902
3479ac596f6c updated for version 7.3.450
Bram Moolenaar <bram@vim.org>
parents: 3363
diff changeset
4903 if (cmd_shell == NULL || *cmd_shell == NUL)
3479ac596f6c updated for version 7.3.450
Bram Moolenaar <bram@vim.org>
parents: 3363
diff changeset
4904 cmd_shell = default_shell();
3363
756d712b3118 updated for version 7.3.448
Bram Moolenaar <bram@vim.org>
parents: 3361
diff changeset
4905
756d712b3118 updated for version 7.3.448
Bram Moolenaar <bram@vim.org>
parents: 3361
diff changeset
4906 subcmd = vim_strsave_escaped_ext(cmdbase, "|", '^', FALSE);
756d712b3118 updated for version 7.3.448
Bram Moolenaar <bram@vim.org>
parents: 3361
diff changeset
4907 if (subcmd != NULL)
756d712b3118 updated for version 7.3.448
Bram Moolenaar <bram@vim.org>
parents: 3361
diff changeset
4908 {
756d712b3118 updated for version 7.3.448
Bram Moolenaar <bram@vim.org>
parents: 3361
diff changeset
4909 /* make "cmd.exe /c arguments" */
756d712b3118 updated for version 7.3.448
Bram Moolenaar <bram@vim.org>
parents: 3361
diff changeset
4910 cmdlen = STRLEN(cmd_shell) + STRLEN(subcmd) + 5;
756d712b3118 updated for version 7.3.448
Bram Moolenaar <bram@vim.org>
parents: 3361
diff changeset
4911 newcmd = lalloc(cmdlen, TRUE);
756d712b3118 updated for version 7.3.448
Bram Moolenaar <bram@vim.org>
parents: 3361
diff changeset
4912 if (newcmd != NULL)
756d712b3118 updated for version 7.3.448
Bram Moolenaar <bram@vim.org>
parents: 3361
diff changeset
4913 vim_snprintf((char *)newcmd, cmdlen, "%s /c %s",
3367
3479ac596f6c updated for version 7.3.450
Bram Moolenaar <bram@vim.org>
parents: 3363
diff changeset
4914 cmd_shell, subcmd);
3363
756d712b3118 updated for version 7.3.448
Bram Moolenaar <bram@vim.org>
parents: 3361
diff changeset
4915 else
756d712b3118 updated for version 7.3.448
Bram Moolenaar <bram@vim.org>
parents: 3361
diff changeset
4916 newcmd = cmdbase;
3367
3479ac596f6c updated for version 7.3.450
Bram Moolenaar <bram@vim.org>
parents: 3363
diff changeset
4917 vim_free(subcmd);
3363
756d712b3118 updated for version 7.3.448
Bram Moolenaar <bram@vim.org>
parents: 3361
diff changeset
4918 }
756d712b3118 updated for version 7.3.448
Bram Moolenaar <bram@vim.org>
parents: 3361
diff changeset
4919 }
3361
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4920
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4921 /*
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4922 * Now, start the command as a process, so that it doesn't
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4923 * inherit our handles which causes unpleasant dangling swap
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4924 * files if we exit before the spawned process
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4925 */
5547
270c62fe685a updated for version 7.4.122
Bram Moolenaar <bram@vim.org>
parents: 5529
diff changeset
4926 if (vim_create_process(newcmd, FALSE, flags, &si, &pi))
3361
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4927 x = 0;
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4928 else
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4929 {
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4930 x = -1;
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4931 #ifdef FEAT_GUI_W32
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4932 EMSG(_("E371: Command not found"));
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4933 #endif
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4934 }
3363
756d712b3118 updated for version 7.3.448
Bram Moolenaar <bram@vim.org>
parents: 3361
diff changeset
4935
756d712b3118 updated for version 7.3.448
Bram Moolenaar <bram@vim.org>
parents: 3361
diff changeset
4936 if (newcmd != cmdbase)
756d712b3118 updated for version 7.3.448
Bram Moolenaar <bram@vim.org>
parents: 3361
diff changeset
4937 vim_free(newcmd);
756d712b3118 updated for version 7.3.448
Bram Moolenaar <bram@vim.org>
parents: 3361
diff changeset
4938
5627
f29febf858be updated for version 7.4.160
Bram Moolenaar <bram@vim.org>
parents: 5590
diff changeset
4939 if (si.dwFlags == STARTF_USESTDHANDLES && si.hStdInput != NULL)
3361
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4940 {
5627
f29febf858be updated for version 7.4.160
Bram Moolenaar <bram@vim.org>
parents: 5590
diff changeset
4941 /* Close the handle to \\.\NUL created above. */
3361
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4942 CloseHandle(si.hStdInput);
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4943 }
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4944 /* Close the handles to the subprocess, so that it goes away */
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4945 CloseHandle(pi.hThread);
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4946 CloseHandle(pi.hProcess);
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4947 }
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4948 else
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4949 {
3363
756d712b3118 updated for version 7.3.448
Bram Moolenaar <bram@vim.org>
parents: 3361
diff changeset
4950 cmdlen = (
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4951 #ifdef FEAT_GUI_W32
2935
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4952 (allowPiping && !p_stmp ? 0 : STRLEN(vimrun_path)) +
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4953 #endif
1569
9fbb40a1228a updated for version 7.1-282
vimboss
parents: 1443
diff changeset
4954 STRLEN(p_sh) + STRLEN(p_shcf) + STRLEN(cmd) + 10);
9fbb40a1228a updated for version 7.1-282
vimboss
parents: 1443
diff changeset
4955
3361
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4956 newcmd = lalloc(cmdlen, TRUE);
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4957 if (newcmd != NULL)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4958 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4959 #if defined(FEAT_GUI_W32)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4960 if (need_vimrun_warning)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4961 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4962 MessageBox(NULL,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4963 _("VIMRUN.EXE not found in your $PATH.\n"
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4964 "External commands will not pause after completion.\n"
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4965 "See :help win32-vimrun for more information."),
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4966 _("Vim Warning"),
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4967 MB_ICONWARNING);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4968 need_vimrun_warning = FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4969 }
2935
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4970 if (!s_dont_use_vimrun && (!allowPiping || p_stmp))
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4971 /* Use vimrun to execute the command. It opens a console
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4972 * window, which can be closed without killing Vim. */
2311
ccda151dde4e Support completion for ":find". (Nazri Ramliy)
Bram Moolenaar <bram@vim.org>
parents: 2215
diff changeset
4973 vim_snprintf((char *)newcmd, cmdlen, "%s%s%s %s %s",
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4974 vimrun_path,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4975 (msg_silent != 0 || (options & SHELL_DOOUT))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4976 ? "-s " : "",
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4977 p_sh, p_shcf, cmd);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4978 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4979 #endif
2311
ccda151dde4e Support completion for ":find". (Nazri Ramliy)
Bram Moolenaar <bram@vim.org>
parents: 2215
diff changeset
4980 vim_snprintf((char *)newcmd, cmdlen, "%s %s %s",
1569
9fbb40a1228a updated for version 7.1-282
vimboss
parents: 1443
diff changeset
4981 p_sh, p_shcf, cmd);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4982 x = mch_system((char *)newcmd, options);
3361
6a03b0ea2e12 updated for version 7.3.447
Bram Moolenaar <bram@vim.org>
parents: 3357
diff changeset
4983 vim_free(newcmd);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4984 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4985 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4986 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4987
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4988 if (tmode == TMODE_RAW)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4989 settmode(TMODE_RAW); /* set to raw mode */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4990
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4991 /* Print the return value, unless "vimrun" was used. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4992 if (x != 0 && !(options & SHELL_SILENT) && !emsg_silent
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4993 #if defined(FEAT_GUI_W32)
2935
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4994 && ((options & SHELL_DOOUT) || s_dont_use_vimrun
bf283e37792b updated for version 7.3.240
Bram Moolenaar <bram@vim.org>
parents: 2859
diff changeset
4995 || (allowPiping && !p_stmp))
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4996 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4997 )
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4998 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4999 smsg(_("shell returned %d"), x);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5000 msg_putchar('\n');
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5001 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5002 #ifdef FEAT_TITLE
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5003 resettitle();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5004 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5005
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5006 signal(SIGINT, SIG_DFL);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5007 #if defined(__GNUC__) && !defined(__MINGW32__)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5008 signal(SIGKILL, SIG_DFL);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5009 #else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5010 signal(SIGBREAK, SIG_DFL);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5011 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5012 signal(SIGILL, SIG_DFL);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5013 signal(SIGFPE, SIG_DFL);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5014 signal(SIGSEGV, SIG_DFL);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5015 signal(SIGTERM, SIG_DFL);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5016 signal(SIGABRT, SIG_DFL);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5017
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5018 return x;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5019 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5020
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5021
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5022 #ifndef FEAT_GUI_W32
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5023
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5024 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5025 * Start termcap mode
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5026 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5027 static void
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5028 termcap_mode_start(void)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5029 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5030 DWORD cmodein;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5031
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5032 if (g_fTermcapMode)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5033 return;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5034
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5035 SaveConsoleBuffer(&g_cbNonTermcap);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5036
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5037 if (g_cbTermcap.IsValid)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5038 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5039 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5040 * We've been in termcap mode before. Restore certain screen
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5041 * characteristics, including the buffer size and the window
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5042 * size. Since we will be redrawing the screen, we don't need
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5043 * to restore the actual contents of the buffer.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5044 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5045 RestoreConsoleBuffer(&g_cbTermcap, FALSE);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5046 SetConsoleWindowInfo(g_hConOut, TRUE, &g_cbTermcap.Info.srWindow);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5047 Rows = g_cbTermcap.Info.dwSize.Y;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5048 Columns = g_cbTermcap.Info.dwSize.X;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5049 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5050 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5051 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5052 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5053 * This is our first time entering termcap mode. Clear the console
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5054 * screen buffer, and resize the buffer to match the current window
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5055 * size. We will use this as the size of our editing environment.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5056 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5057 ClearConsoleBuffer(g_attrCurrent);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5058 ResizeConBufAndWindow(g_hConOut, Columns, Rows);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5059 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5060
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5061 #ifdef FEAT_TITLE
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5062 resettitle();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5063 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5064
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5065 GetConsoleMode(g_hConIn, &cmodein);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5066 #ifdef FEAT_MOUSE
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5067 if (g_fMouseActive)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5068 cmodein |= ENABLE_MOUSE_INPUT;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5069 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5070 cmodein &= ~ENABLE_MOUSE_INPUT;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5071 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5072 cmodein |= ENABLE_WINDOW_INPUT;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5073 SetConsoleMode(g_hConIn, cmodein);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5074
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5075 redraw_later_clear();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5076 g_fTermcapMode = TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5077 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5078
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5079
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5080 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5081 * End termcap mode
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5082 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5083 static void
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5084 termcap_mode_end(void)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5085 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5086 DWORD cmodein;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5087 ConsoleBuffer *cb;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5088 COORD coord;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5089 DWORD dwDummy;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5090
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5091 if (!g_fTermcapMode)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5092 return;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5093
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5094 SaveConsoleBuffer(&g_cbTermcap);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5095
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5096 GetConsoleMode(g_hConIn, &cmodein);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5097 cmodein &= ~(ENABLE_MOUSE_INPUT | ENABLE_WINDOW_INPUT);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5098 SetConsoleMode(g_hConIn, cmodein);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5099
7184
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
5100 #ifdef FEAT_RESTORE_ORIG_SCREEN
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
5101 cb = exiting ? &g_cbOrig : &g_cbNonTermcap;
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
5102 #else
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5103 cb = &g_cbNonTermcap;
7184
0a256475412f commit https://github.com/vim/vim/commit/4c0aac57599092da404f6726e88701ba441a4a6d
Christian Brabandt <cb@256bit.org>
parents: 7150
diff changeset
5104 #endif
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5105 RestoreConsoleBuffer(cb, p_rs);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5106 SetConsoleCursorInfo(g_hConOut, &g_cci);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5107
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5108 if (p_rs || exiting)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5109 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5110 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5111 * Clear anything that happens to be on the current line.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5112 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5113 coord.X = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5114 coord.Y = (SHORT) (p_rs ? cb->Info.dwCursorPosition.Y : (Rows - 1));
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5115 FillConsoleOutputCharacter(g_hConOut, ' ',
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5116 cb->Info.dwSize.X, coord, &dwDummy);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5117 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5118 * The following is just for aesthetics. If we are exiting without
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5119 * restoring the screen, then we want to have a prompt string
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5120 * appear at the bottom line. However, the command interpreter
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5121 * seems to always advance the cursor one line before displaying
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5122 * the prompt string, which causes the screen to scroll. To
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5123 * counter this, move the cursor up one line before exiting.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5124 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5125 if (exiting && !p_rs)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5126 coord.Y--;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5127 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5128 * Position the cursor at the leftmost column of the desired row.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5129 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5130 SetConsoleCursorPosition(g_hConOut, coord);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5131 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5132
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5133 g_fTermcapMode = FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5134 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5135 #endif /* FEAT_GUI_W32 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5136
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5137
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5138 #ifdef FEAT_GUI_W32
323
03b3684919e3 updated for version 7.0084
vimboss
parents: 297
diff changeset
5139 /*ARGSUSED*/
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5140 void
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5141 mch_write(
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5142 char_u *s,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5143 int len)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5144 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5145 /* never used */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5146 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5147
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5148 #else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5149
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5150 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5151 * clear `n' chars, starting from `coord'
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5152 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5153 static void
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5154 clear_chars(
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5155 COORD coord,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5156 DWORD n)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5157 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5158 DWORD dwDummy;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5159
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5160 FillConsoleOutputCharacter(g_hConOut, ' ', n, coord, &dwDummy);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5161 FillConsoleOutputAttribute(g_hConOut, g_attrCurrent, n, coord, &dwDummy);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5162 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5163
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5164
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5165 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5166 * Clear the screen
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5167 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5168 static void
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5169 clear_screen(void)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5170 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5171 g_coord.X = g_coord.Y = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5172 clear_chars(g_coord, Rows * Columns);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5173 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5174
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5175
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5176 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5177 * Clear to end of display
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5178 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5179 static void
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5180 clear_to_end_of_display(void)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5181 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5182 clear_chars(g_coord, (Rows - g_coord.Y - 1)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5183 * Columns + (Columns - g_coord.X));
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5184 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5185
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5186
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5187 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5188 * Clear to end of line
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5189 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5190 static void
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5191 clear_to_end_of_line(void)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5192 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5193 clear_chars(g_coord, Columns - g_coord.X);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5194 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5195
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5196
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5197 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5198 * Scroll the scroll region up by `cLines' lines
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5199 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5200 static void
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
5201 scroll(unsigned cLines)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5202 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5203 COORD oldcoord = g_coord;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5204
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5205 gotoxy(g_srScrollRegion.Left + 1, g_srScrollRegion.Top + 1);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5206 delete_lines(cLines);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5207
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5208 g_coord = oldcoord;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5209 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5210
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5211
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5212 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5213 * Set the scroll region
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5214 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5215 static void
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5216 set_scroll_region(
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5217 unsigned left,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5218 unsigned top,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5219 unsigned right,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5220 unsigned bottom)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5221 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5222 if (left >= right
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5223 || top >= bottom
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5224 || right > (unsigned) Columns - 1
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5225 || bottom > (unsigned) Rows - 1)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5226 return;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5227
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5228 g_srScrollRegion.Left = left;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5229 g_srScrollRegion.Top = top;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5230 g_srScrollRegion.Right = right;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5231 g_srScrollRegion.Bottom = bottom;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5232 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5233
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5234
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5235 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5236 * Insert `cLines' lines at the current cursor position
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5237 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5238 static void
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
5239 insert_lines(unsigned cLines)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5240 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5241 SMALL_RECT source;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5242 COORD dest;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5243 CHAR_INFO fill;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5244
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5245 dest.X = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5246 dest.Y = g_coord.Y + cLines;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5247
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5248 source.Left = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5249 source.Top = g_coord.Y;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5250 source.Right = g_srScrollRegion.Right;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5251 source.Bottom = g_srScrollRegion.Bottom - cLines;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5252
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5253 fill.Char.AsciiChar = ' ';
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5254 fill.Attributes = g_attrCurrent;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5255
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5256 ScrollConsoleScreenBuffer(g_hConOut, &source, NULL, dest, &fill);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5257
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5258 /* Here we have to deal with a win32 console flake: If the scroll
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5259 * region looks like abc and we scroll c to a and fill with d we get
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5260 * cbd... if we scroll block c one line at a time to a, we get cdd...
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5261 * vim expects cdd consistently... So we have to deal with that
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5262 * here... (this also occurs scrolling the same way in the other
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5263 * direction). */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5264
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5265 if (source.Bottom < dest.Y)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5266 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5267 COORD coord;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5268
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5269 coord.X = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5270 coord.Y = source.Bottom;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5271 clear_chars(coord, Columns * (dest.Y - source.Bottom));
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5272 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5273 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5274
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5275
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5276 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5277 * Delete `cLines' lines at the current cursor position
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5278 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5279 static void
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
5280 delete_lines(unsigned cLines)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5281 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5282 SMALL_RECT source;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5283 COORD dest;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5284 CHAR_INFO fill;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5285 int nb;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5286
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5287 dest.X = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5288 dest.Y = g_coord.Y;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5289
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5290 source.Left = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5291 source.Top = g_coord.Y + cLines;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5292 source.Right = g_srScrollRegion.Right;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5293 source.Bottom = g_srScrollRegion.Bottom;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5294
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5295 fill.Char.AsciiChar = ' ';
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5296 fill.Attributes = g_attrCurrent;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5297
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5298 ScrollConsoleScreenBuffer(g_hConOut, &source, NULL, dest, &fill);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5299
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5300 /* Here we have to deal with a win32 console flake: If the scroll
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5301 * region looks like abc and we scroll c to a and fill with d we get
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5302 * cbd... if we scroll block c one line at a time to a, we get cdd...
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5303 * vim expects cdd consistently... So we have to deal with that
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5304 * here... (this also occurs scrolling the same way in the other
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5305 * direction). */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5306
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5307 nb = dest.Y + (source.Bottom - source.Top) + 1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5308
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5309 if (nb < source.Top)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5310 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5311 COORD coord;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5312
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5313 coord.X = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5314 coord.Y = nb;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5315 clear_chars(coord, Columns * (source.Top - nb));
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5316 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5317 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5318
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5319
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5320 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5321 * Set the cursor position
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5322 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5323 static void
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5324 gotoxy(
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5325 unsigned x,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5326 unsigned y)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5327 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5328 if (x < 1 || x > (unsigned)Columns || y < 1 || y > (unsigned)Rows)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5329 return;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5330
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5331 /* external cursor coords are 1-based; internal are 0-based */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5332 g_coord.X = x - 1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5333 g_coord.Y = y - 1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5334 SetConsoleCursorPosition(g_hConOut, g_coord);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5335 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5336
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5337
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5338 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5339 * Set the current text attribute = (foreground | background)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5340 * See ../doc/os_win32.txt for the numbers.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5341 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5342 static void
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
5343 textattr(WORD wAttr)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5344 {
6710
43a07fa78155 updated for version 7.4.679
Bram Moolenaar <bram@vim.org>
parents: 6700
diff changeset
5345 g_attrCurrent = wAttr & 0xff;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5346
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5347 SetConsoleTextAttribute(g_hConOut, wAttr);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5348 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5349
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5350
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5351 static void
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
5352 textcolor(WORD wAttr)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5353 {
6710
43a07fa78155 updated for version 7.4.679
Bram Moolenaar <bram@vim.org>
parents: 6700
diff changeset
5354 g_attrCurrent = (g_attrCurrent & 0xf0) + (wAttr & 0x0f);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5355
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5356 SetConsoleTextAttribute(g_hConOut, g_attrCurrent);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5357 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5358
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5359
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5360 static void
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
5361 textbackground(WORD wAttr)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5362 {
6710
43a07fa78155 updated for version 7.4.679
Bram Moolenaar <bram@vim.org>
parents: 6700
diff changeset
5363 g_attrCurrent = (g_attrCurrent & 0x0f) + ((wAttr & 0x0f) << 4);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5364
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5365 SetConsoleTextAttribute(g_hConOut, g_attrCurrent);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5366 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5367
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5368
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5369 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5370 * restore the default text attribute (whatever we started with)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5371 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5372 static void
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
5373 normvideo(void)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5374 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5375 textattr(g_attrDefault);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5376 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5377
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5378
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5379 static WORD g_attrPreStandout = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5380
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5381 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5382 * Make the text standout, by brightening it
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5383 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5384 static void
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5385 standout(void)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5386 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5387 g_attrPreStandout = g_attrCurrent;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5388 textattr((WORD) (g_attrCurrent|FOREGROUND_INTENSITY|BACKGROUND_INTENSITY));
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5389 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5390
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5391
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5392 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5393 * Turn off standout mode
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5394 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5395 static void
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
5396 standend(void)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5397 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5398 if (g_attrPreStandout)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5399 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5400 textattr(g_attrPreStandout);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5401 g_attrPreStandout = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5402 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5403 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5404
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5405
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5406 /*
1199
3acf7c922a04 updated for version 7.1b
vimboss
parents: 1139
diff changeset
5407 * Set normal fg/bg color, based on T_ME. Called when t_me has been set.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5408 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5409 void
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
5410 mch_set_normal_colors(void)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5411 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5412 char_u *p;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5413 int n;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5414
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5415 cterm_normal_fg_color = (g_attrDefault & 0xf) + 1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5416 cterm_normal_bg_color = ((g_attrDefault >> 4) & 0xf) + 1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5417 if (T_ME[0] == ESC && T_ME[1] == '|')
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5418 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5419 p = T_ME + 2;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5420 n = getdigits(&p);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5421 if (*p == 'm' && n > 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5422 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5423 cterm_normal_fg_color = (n & 0xf) + 1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5424 cterm_normal_bg_color = ((n >> 4) & 0xf) + 1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5425 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5426 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5427 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5428
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5429
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5430 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5431 * visual bell: flash the screen
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5432 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5433 static void
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
5434 visual_bell(void)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5435 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5436 COORD coordOrigin = {0, 0};
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5437 WORD attrFlash = ~g_attrCurrent & 0xff;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5438
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5439 DWORD dwDummy;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5440 LPWORD oldattrs = (LPWORD)alloc(Rows * Columns * sizeof(WORD));
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5441
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5442 if (oldattrs == NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5443 return;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5444 ReadConsoleOutputAttribute(g_hConOut, oldattrs, Rows * Columns,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5445 coordOrigin, &dwDummy);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5446 FillConsoleOutputAttribute(g_hConOut, attrFlash, Rows * Columns,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5447 coordOrigin, &dwDummy);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5448
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5449 Sleep(15); /* wait for 15 msec */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5450 WriteConsoleOutputAttribute(g_hConOut, oldattrs, Rows * Columns,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5451 coordOrigin, &dwDummy);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5452 vim_free(oldattrs);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5453 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5454
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5455
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5456 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5457 * Make the cursor visible or invisible
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5458 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5459 static void
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
5460 cursor_visible(BOOL fVisible)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5461 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5462 s_cursor_visible = fVisible;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5463 #ifdef MCH_CURSOR_SHAPE
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5464 mch_update_cursor();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5465 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5466 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5467
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5468
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5469 /*
7080
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5470 * write `cbToWrite' bytes in `pchBuf' to the screen
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5471 * Returns the number of bytes actually written (at least one).
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5472 */
7080
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5473 static DWORD
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5474 write_chars(
7080
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5475 char_u *pchBuf,
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5476 DWORD cbToWrite)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5477 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5478 COORD coord = g_coord;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5479 DWORD written;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5480
7080
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5481 #ifdef FEAT_MBYTE
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5482 if (enc_codepage >= 0 && (int)GetACP() != enc_codepage)
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5483 {
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5484 static WCHAR *unicodebuf = NULL;
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5485 static int unibuflen = 0;
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5486 int length;
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5487 DWORD n, cchwritten, cells;
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5488
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5489 length = MultiByteToWideChar(CP_UTF8, 0, (LPCSTR)pchBuf, cbToWrite, 0, 0);
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5490 if (unicodebuf == NULL || length > unibuflen)
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5491 {
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5492 vim_free(unicodebuf);
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5493 unicodebuf = (WCHAR *)lalloc(length * sizeof(WCHAR), FALSE);
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5494 unibuflen = length;
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5495 }
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5496 MultiByteToWideChar(CP_UTF8, 0, (LPCSTR)pchBuf, cbToWrite,
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5497 unicodebuf, unibuflen);
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5498
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5499 cells = mb_string2cells(pchBuf, cbToWrite);
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5500 FillConsoleOutputAttribute(g_hConOut, g_attrCurrent, cells,
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5501 coord, &written);
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5502 /* When writing fails or didn't write a single character, pretend one
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5503 * character was written, otherwise we get stuck. */
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5504 if (WriteConsoleOutputCharacterW(g_hConOut, unicodebuf, length,
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5505 coord, &cchwritten) == 0
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5506 || cchwritten == 0)
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5507 cchwritten = 1;
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5508
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5509 if (cchwritten == length)
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5510 {
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5511 written = cbToWrite;
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5512 g_coord.X += (SHORT)cells;
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5513 }
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5514 else
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5515 {
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5516 char_u *p = pchBuf;
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5517 for (n = 0; n < cchwritten; n++)
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5518 mb_cptr_adv(p);
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5519 written = p - pchBuf;
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5520 g_coord.X += (SHORT)mb_string2cells(pchBuf, written);
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5521 }
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5522 }
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5523 else
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5524 #endif
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5525 {
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5526 FillConsoleOutputAttribute(g_hConOut, g_attrCurrent, cbToWrite,
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5527 coord, &written);
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5528 /* When writing fails or didn't write a single character, pretend one
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5529 * character was written, otherwise we get stuck. */
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5530 if (WriteConsoleOutputCharacter(g_hConOut, (LPCSTR)pchBuf, cbToWrite,
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5531 coord, &written) == 0
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5532 || written == 0)
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5533 written = 1;
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5534
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5535 g_coord.X += (SHORT) written;
1a34f5272977 commit https://github.com/vim/vim/commit/ac360bf2ca293735fc7c6654dc2b3066f4c62488
Christian Brabandt <cb@256bit.org>
parents: 7078
diff changeset
5536 }
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5537
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5538 while (g_coord.X > g_srScrollRegion.Right)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5539 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5540 g_coord.X -= (SHORT) Columns;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5541 if (g_coord.Y < g_srScrollRegion.Bottom)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5542 g_coord.Y++;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5543 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5544
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5545 gotoxy(g_coord.X + 1, g_coord.Y + 1);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5546
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5547 return written;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5548 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5549
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5550
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5551 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5552 * mch_write(): write the output buffer to the screen, translating ESC
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5553 * sequences into calls to console output routines.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5554 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5555 void
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5556 mch_write(
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5557 char_u *s,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5558 int len)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5559 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5560 s[len] = NUL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5561
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5562 if (!term_console)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5563 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5564 write(1, s, (unsigned)len);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5565 return;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5566 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5567
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5568 /* translate ESC | sequences into faked bios calls */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5569 while (len--)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5570 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5571 /* optimization: use one single write_chars for runs of text,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5572 * rather than once per character It ain't curses, but it helps. */
835
8bebcabccc2c updated for version 7.0e01
vimboss
parents: 819
diff changeset
5573 DWORD prefix = (DWORD)strcspn(s, "\n\r\b\a\033");
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5574
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5575 if (p_wd)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5576 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5577 WaitForChar(p_wd);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5578 if (prefix != 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5579 prefix = 1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5580 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5581
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5582 if (prefix != 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5583 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5584 DWORD nWritten;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5585
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5586 nWritten = write_chars(s, prefix);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5587 #ifdef MCH_WRITE_DUMP
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5588 if (fdDump)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5589 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5590 fputc('>', fdDump);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5591 fwrite(s, sizeof(char_u), nWritten, fdDump);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5592 fputs("<\n", fdDump);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5593 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5594 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5595 len -= (nWritten - 1);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5596 s += nWritten;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5597 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5598 else if (s[0] == '\n')
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5599 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5600 /* \n, newline: go to the beginning of the next line or scroll */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5601 if (g_coord.Y == g_srScrollRegion.Bottom)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5602 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5603 scroll(1);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5604 gotoxy(g_srScrollRegion.Left + 1, g_srScrollRegion.Bottom + 1);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5605 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5606 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5607 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5608 gotoxy(g_srScrollRegion.Left + 1, g_coord.Y + 2);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5609 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5610 #ifdef MCH_WRITE_DUMP
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5611 if (fdDump)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5612 fputs("\\n\n", fdDump);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5613 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5614 s++;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5615 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5616 else if (s[0] == '\r')
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5617 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5618 /* \r, carriage return: go to beginning of line */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5619 gotoxy(g_srScrollRegion.Left+1, g_coord.Y + 1);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5620 #ifdef MCH_WRITE_DUMP
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5621 if (fdDump)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5622 fputs("\\r\n", fdDump);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5623 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5624 s++;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5625 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5626 else if (s[0] == '\b')
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5627 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5628 /* \b, backspace: move cursor one position left */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5629 if (g_coord.X > g_srScrollRegion.Left)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5630 g_coord.X--;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5631 else if (g_coord.Y > g_srScrollRegion.Top)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5632 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5633 g_coord.X = g_srScrollRegion.Right;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5634 g_coord.Y--;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5635 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5636 gotoxy(g_coord.X + 1, g_coord.Y + 1);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5637 #ifdef MCH_WRITE_DUMP
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5638 if (fdDump)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5639 fputs("\\b\n", fdDump);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5640 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5641 s++;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5642 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5643 else if (s[0] == '\a')
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5644 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5645 /* \a, bell */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5646 MessageBeep(0xFFFFFFFF);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5647 #ifdef MCH_WRITE_DUMP
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5648 if (fdDump)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5649 fputs("\\a\n", fdDump);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5650 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5651 s++;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5652 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5653 else if (s[0] == ESC && len >= 3-1 && s[1] == '|')
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5654 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5655 #ifdef MCH_WRITE_DUMP
24
8ff7fd162d3c updated for version 7.0016
vimboss
parents: 23
diff changeset
5656 char_u *old_s = s;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5657 #endif
24
8ff7fd162d3c updated for version 7.0016
vimboss
parents: 23
diff changeset
5658 char_u *p;
8ff7fd162d3c updated for version 7.0016
vimboss
parents: 23
diff changeset
5659 int arg1 = 0, arg2 = 0;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5660
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5661 switch (s[2])
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5662 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5663 /* one or two numeric arguments, separated by ';' */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5664
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5665 case '0': case '1': case '2': case '3': case '4':
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5666 case '5': case '6': case '7': case '8': case '9':
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5667 p = s + 2;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5668 arg1 = getdigits(&p); /* no check for length! */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5669 if (p > s + len)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5670 break;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5671
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5672 if (*p == ';')
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5673 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5674 ++p;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5675 arg2 = getdigits(&p); /* no check for length! */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5676 if (p > s + len)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5677 break;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5678
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5679 if (*p == 'H')
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5680 gotoxy(arg2, arg1);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5681 else if (*p == 'r')
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5682 set_scroll_region(0, arg1 - 1, Columns - 1, arg2 - 1);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5683 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5684 else if (*p == 'A')
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5685 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5686 /* move cursor up arg1 lines in same column */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5687 gotoxy(g_coord.X + 1,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5688 max(g_srScrollRegion.Top, g_coord.Y - arg1) + 1);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5689 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5690 else if (*p == 'C')
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5691 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5692 /* move cursor right arg1 columns in same line */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5693 gotoxy(min(g_srScrollRegion.Right, g_coord.X + arg1) + 1,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5694 g_coord.Y + 1);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5695 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5696 else if (*p == 'H')
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5697 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5698 gotoxy(1, arg1);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5699 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5700 else if (*p == 'L')
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5701 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5702 insert_lines(arg1);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5703 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5704 else if (*p == 'm')
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5705 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5706 if (arg1 == 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5707 normvideo();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5708 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5709 textattr((WORD) arg1);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5710 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5711 else if (*p == 'f')
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5712 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5713 textcolor((WORD) arg1);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5714 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5715 else if (*p == 'b')
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5716 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5717 textbackground((WORD) arg1);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5718 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5719 else if (*p == 'M')
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5720 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5721 delete_lines(arg1);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5722 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5723
835
8bebcabccc2c updated for version 7.0e01
vimboss
parents: 819
diff changeset
5724 len -= (int)(p - s);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5725 s = p + 1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5726 break;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5727
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5728
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5729 /* Three-character escape sequences */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5730
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5731 case 'A':
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5732 /* move cursor up one line in same column */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5733 gotoxy(g_coord.X + 1,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5734 max(g_srScrollRegion.Top, g_coord.Y - 1) + 1);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5735 goto got3;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5736
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5737 case 'B':
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5738 visual_bell();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5739 goto got3;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5740
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5741 case 'C':
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5742 /* move cursor right one column in same line */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5743 gotoxy(min(g_srScrollRegion.Right, g_coord.X + 1) + 1,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5744 g_coord.Y + 1);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5745 goto got3;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5746
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5747 case 'E':
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5748 termcap_mode_end();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5749 goto got3;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5750
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5751 case 'F':
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5752 standout();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5753 goto got3;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5754
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5755 case 'f':
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5756 standend();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5757 goto got3;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5758
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5759 case 'H':
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5760 gotoxy(1, 1);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5761 goto got3;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5762
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5763 case 'j':
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5764 clear_to_end_of_display();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5765 goto got3;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5766
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5767 case 'J':
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5768 clear_screen();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5769 goto got3;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5770
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5771 case 'K':
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5772 clear_to_end_of_line();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5773 goto got3;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5774
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5775 case 'L':
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5776 insert_lines(1);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5777 goto got3;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5778
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5779 case 'M':
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5780 delete_lines(1);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5781 goto got3;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5782
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5783 case 'S':
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5784 termcap_mode_start();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5785 goto got3;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5786
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5787 case 'V':
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5788 cursor_visible(TRUE);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5789 goto got3;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5790
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5791 case 'v':
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5792 cursor_visible(FALSE);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5793 goto got3;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5794
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5795 got3:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5796 s += 3;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5797 len -= 2;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5798 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5799
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5800 #ifdef MCH_WRITE_DUMP
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5801 if (fdDump)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5802 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5803 fputs("ESC | ", fdDump);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5804 fwrite(old_s + 2, sizeof(char_u), s - old_s - 2, fdDump);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5805 fputc('\n', fdDump);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5806 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5807 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5808 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5809 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5810 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5811 /* Write a single character */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5812 DWORD nWritten;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5813
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5814 nWritten = write_chars(s, 1);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5815 #ifdef MCH_WRITE_DUMP
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5816 if (fdDump)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5817 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5818 fputc('>', fdDump);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5819 fwrite(s, sizeof(char_u), nWritten, fdDump);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5820 fputs("<\n", fdDump);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5821 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5822 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5823
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5824 len -= (nWritten - 1);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5825 s += nWritten;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5826 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5827 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5828
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5829 #ifdef MCH_WRITE_DUMP
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5830 if (fdDump)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5831 fflush(fdDump);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5832 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5833 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5834
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5835 #endif /* FEAT_GUI_W32 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5836
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5837
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5838 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5839 * Delay for half a second.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5840 */
323
03b3684919e3 updated for version 7.0084
vimboss
parents: 297
diff changeset
5841 /*ARGSUSED*/
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5842 void
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5843 mch_delay(
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5844 long msec,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5845 int ignoreinput)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5846 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5847 #ifdef FEAT_GUI_W32
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5848 Sleep((int)msec); /* never wait for input */
14
946da5994c01 updated for version 7.0006
vimboss
parents: 10
diff changeset
5849 #else /* Console */
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5850 if (ignoreinput)
14
946da5994c01 updated for version 7.0006
vimboss
parents: 10
diff changeset
5851 # ifdef FEAT_MZSCHEME
946da5994c01 updated for version 7.0006
vimboss
parents: 10
diff changeset
5852 if (mzthreads_allowed() && p_mzq > 0 && msec > p_mzq)
946da5994c01 updated for version 7.0006
vimboss
parents: 10
diff changeset
5853 {
946da5994c01 updated for version 7.0006
vimboss
parents: 10
diff changeset
5854 int towait = p_mzq;
946da5994c01 updated for version 7.0006
vimboss
parents: 10
diff changeset
5855
946da5994c01 updated for version 7.0006
vimboss
parents: 10
diff changeset
5856 /* if msec is large enough, wait by portions in p_mzq */
946da5994c01 updated for version 7.0006
vimboss
parents: 10
diff changeset
5857 while (msec > 0)
946da5994c01 updated for version 7.0006
vimboss
parents: 10
diff changeset
5858 {
946da5994c01 updated for version 7.0006
vimboss
parents: 10
diff changeset
5859 mzvim_check_threads();
946da5994c01 updated for version 7.0006
vimboss
parents: 10
diff changeset
5860 if (msec < towait)
946da5994c01 updated for version 7.0006
vimboss
parents: 10
diff changeset
5861 towait = msec;
946da5994c01 updated for version 7.0006
vimboss
parents: 10
diff changeset
5862 Sleep(towait);
946da5994c01 updated for version 7.0006
vimboss
parents: 10
diff changeset
5863 msec -= towait;
946da5994c01 updated for version 7.0006
vimboss
parents: 10
diff changeset
5864 }
946da5994c01 updated for version 7.0006
vimboss
parents: 10
diff changeset
5865 }
946da5994c01 updated for version 7.0006
vimboss
parents: 10
diff changeset
5866 else
946da5994c01 updated for version 7.0006
vimboss
parents: 10
diff changeset
5867 # endif
946da5994c01 updated for version 7.0006
vimboss
parents: 10
diff changeset
5868 Sleep((int)msec);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5869 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5870 WaitForChar(msec);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5871 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5872 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5873
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5874
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5875 /*
7657
9c5e8254ea6b commit https://github.com/vim/vim/commit/203258c3ad2966cc9d08b3805b103333988b30b7
Christian Brabandt <cb@256bit.org>
parents: 7619
diff changeset
5876 * This version of remove is not scared by a readonly (backup) file.
9c5e8254ea6b commit https://github.com/vim/vim/commit/203258c3ad2966cc9d08b3805b103333988b30b7
Christian Brabandt <cb@256bit.org>
parents: 7619
diff changeset
5877 * This can also remove a symbolic link like Unix.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5878 * Return 0 for success, -1 for failure.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5879 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5880 int
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5881 mch_remove(char_u *name)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5882 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5883 #ifdef FEAT_MBYTE
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5884 WCHAR *wn = NULL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5885 int n;
4872
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
5886 #endif
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
5887
7657
9c5e8254ea6b commit https://github.com/vim/vim/commit/203258c3ad2966cc9d08b3805b103333988b30b7
Christian Brabandt <cb@256bit.org>
parents: 7619
diff changeset
5888 /*
9c5e8254ea6b commit https://github.com/vim/vim/commit/203258c3ad2966cc9d08b3805b103333988b30b7
Christian Brabandt <cb@256bit.org>
parents: 7619
diff changeset
5889 * On Windows, deleting a directory's symbolic link is done by
9c5e8254ea6b commit https://github.com/vim/vim/commit/203258c3ad2966cc9d08b3805b103333988b30b7
Christian Brabandt <cb@256bit.org>
parents: 7619
diff changeset
5890 * RemoveDirectory(): mch_rmdir. It seems unnatural, but it is fact.
9c5e8254ea6b commit https://github.com/vim/vim/commit/203258c3ad2966cc9d08b3805b103333988b30b7
Christian Brabandt <cb@256bit.org>
parents: 7619
diff changeset
5891 */
9c5e8254ea6b commit https://github.com/vim/vim/commit/203258c3ad2966cc9d08b3805b103333988b30b7
Christian Brabandt <cb@256bit.org>
parents: 7619
diff changeset
5892 if (mch_isdir(name) && mch_is_symbolic_link(name))
9c5e8254ea6b commit https://github.com/vim/vim/commit/203258c3ad2966cc9d08b3805b103333988b30b7
Christian Brabandt <cb@256bit.org>
parents: 7619
diff changeset
5893 return mch_rmdir(name);
9c5e8254ea6b commit https://github.com/vim/vim/commit/203258c3ad2966cc9d08b3805b103333988b30b7
Christian Brabandt <cb@256bit.org>
parents: 7619
diff changeset
5894
4872
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
5895 win32_setattrs(name, FILE_ATTRIBUTE_NORMAL);
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
5896
fa98c2b030ed updated for version 7.3.1182
Bram Moolenaar <bram@vim.org>
parents: 4789
diff changeset
5897 #ifdef FEAT_MBYTE
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5898 if (enc_codepage >= 0 && (int)GetACP() != enc_codepage)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5899 {
1752
a8aae2e1d2ae updated for version 7.2-049
vimboss
parents: 1686
diff changeset
5900 wn = enc_to_utf16(name, NULL);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5901 if (wn != NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5902 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5903 n = DeleteFileW(wn) ? 0 : -1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5904 vim_free(wn);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5905 if (n == 0 || GetLastError() != ERROR_CALL_NOT_IMPLEMENTED)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5906 return n;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5907 /* Retry with non-wide function (for Windows 98). */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5908 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5909 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5910 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5911 return DeleteFile(name) ? 0 : -1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5912 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5913
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5914
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5915 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5916 * check for an "interrupt signal": CTRL-break or CTRL-C
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5917 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5918 void
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
5919 mch_breakcheck(void)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5920 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5921 #ifndef FEAT_GUI_W32 /* never used */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5922 if (g_fCtrlCPressed || g_fCBrkPressed)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5923 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5924 g_fCtrlCPressed = g_fCBrkPressed = FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5925 got_int = TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5926 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5927 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5928 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5929
7460
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5930 /* physical RAM to leave for the OS */
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5931 #define WINNT_RESERVE_BYTES (256*1024*1024)
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5932 #define WIN95_RESERVE_BYTES (8*1024*1024)
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5933
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5934 /*
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5935 * How much main memory in KiB that can be used by VIM.
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5936 */
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5937 /*ARGSUSED*/
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5938 long_u
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5939 mch_total_mem(int special)
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5940 {
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5941 PlatformId();
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5942 #if (defined(_MSC_VER) && (WINVER > 0x0400)) || defined(MEMORYSTATUSEX)
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5943 if (g_PlatformId == VER_PLATFORM_WIN32_NT)
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5944 {
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5945 MEMORYSTATUSEX ms;
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5946
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5947 /* Need to use GlobalMemoryStatusEx() when there is more memory than
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5948 * what fits in 32 bits. But it's not always available. */
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5949 ms.dwLength = sizeof(MEMORYSTATUSEX);
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5950 GlobalMemoryStatusEx(&ms);
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5951 if (ms.ullAvailVirtual < ms.ullTotalPhys)
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5952 {
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5953 /* Process address space fits in physical RAM, use all of it. */
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5954 return (long_u)(ms.ullAvailVirtual / 1024);
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5955 }
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5956 if (ms.ullTotalPhys <= WINNT_RESERVE_BYTES)
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5957 {
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5958 /* Catch old NT box or perverse hardware setup. */
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5959 return (long_u)((ms.ullTotalPhys / 2) / 1024);
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5960 }
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5961 /* Use physical RAM less reserve for OS + data. */
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5962 return (long_u)((ms.ullTotalPhys - WINNT_RESERVE_BYTES) / 1024);
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5963 }
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5964 else
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5965 #endif
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5966 {
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5967 /* Pre-XP or 95 OS handling. */
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5968 MEMORYSTATUS ms;
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5969 long_u os_reserve_bytes;
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5970
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5971 ms.dwLength = sizeof(MEMORYSTATUS);
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5972 GlobalMemoryStatus(&ms);
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5973 if (ms.dwAvailVirtual < ms.dwTotalPhys)
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5974 {
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5975 /* Process address space fits in physical RAM, use all of it. */
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5976 return (long_u)(ms.dwAvailVirtual / 1024);
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5977 }
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5978 os_reserve_bytes = (g_PlatformId == VER_PLATFORM_WIN32_NT)
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5979 ? WINNT_RESERVE_BYTES
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5980 : WIN95_RESERVE_BYTES;
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5981 if (ms.dwTotalPhys <= os_reserve_bytes)
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5982 {
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5983 /* Catch old boxes or perverse hardware setup. */
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5984 return (long_u)((ms.dwTotalPhys / 2) / 1024);
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5985 }
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5986 /* Use physical RAM less reserve for OS + data. */
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5987 return (long_u)((ms.dwTotalPhys - os_reserve_bytes) / 1024);
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5988 }
1420ccc9f610 commit https://github.com/vim/vim/commit/ee2739787f1e996739541bb60e6003b892497e03
Christian Brabandt <cb@256bit.org>
parents: 7194
diff changeset
5989 }
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5990
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5991 #ifdef FEAT_MBYTE
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5992 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5993 * Same code as below, but with wide functions and no comments.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5994 * Return 0 for success, non-zero for failure.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5995 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5996 int
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5997 mch_wrename(WCHAR *wold, WCHAR *wnew)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5998 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5999 WCHAR *p;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6000 int i;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6001 WCHAR szTempFile[_MAX_PATH + 1];
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6002 WCHAR szNewPath[_MAX_PATH + 1];
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6003 HANDLE hf;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6004
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6005 if (!mch_windows95())
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6006 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6007 p = wold;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6008 for (i = 0; wold[i] != NUL; ++i)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6009 if ((wold[i] == '/' || wold[i] == '\\' || wold[i] == ':')
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6010 && wold[i + 1] != 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6011 p = wold + i + 1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6012 if ((int)(wold + i - p) < 8 || p[6] != '~')
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6013 return (MoveFileW(wold, wnew) == 0);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6014 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6015
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6016 if (GetFullPathNameW(wnew, _MAX_PATH, szNewPath, &p) == 0 || p == NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6017 return -1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6018 *p = NUL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6019
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6020 if (GetTempFileNameW(szNewPath, L"VIM", 0, szTempFile) == 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6021 return -2;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6022
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6023 if (!DeleteFileW(szTempFile))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6024 return -3;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6025
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6026 if (!MoveFileW(wold, szTempFile))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6027 return -4;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6028
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6029 if ((hf = CreateFileW(wold, GENERIC_WRITE, 0, NULL, CREATE_NEW,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6030 FILE_ATTRIBUTE_NORMAL, NULL)) == INVALID_HANDLE_VALUE)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6031 return -5;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6032 if (!CloseHandle(hf))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6033 return -6;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6034
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6035 if (!MoveFileW(szTempFile, wnew))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6036 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6037 (void)MoveFileW(szTempFile, wold);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6038 return -7;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6039 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6040
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6041 DeleteFileW(szTempFile);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6042
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6043 if (!DeleteFileW(wold))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6044 return -8;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6045
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6046 return 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6047 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6048 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6049
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6050
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6051 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6052 * mch_rename() works around a bug in rename (aka MoveFile) in
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6053 * Windows 95: rename("foo.bar", "foo.bar~") will generate a
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6054 * file whose short file name is "FOO.BAR" (its long file name will
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6055 * be correct: "foo.bar~"). Because a file can be accessed by
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6056 * either its SFN or its LFN, "foo.bar" has effectively been
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6057 * renamed to "foo.bar", which is not at all what was wanted. This
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6058 * seems to happen only when renaming files with three-character
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6059 * extensions by appending a suffix that does not include ".".
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6060 * Windows NT gets it right, however, with an SFN of "FOO~1.BAR".
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6061 *
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6062 * There is another problem, which isn't really a bug but isn't right either:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6063 * When renaming "abcdef~1.txt" to "abcdef~1.txt~", the short name can be
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6064 * "abcdef~1.txt" again. This has been reported on Windows NT 4.0 with
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6065 * service pack 6. Doesn't seem to happen on Windows 98.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6066 *
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6067 * Like rename(), returns 0 upon success, non-zero upon failure.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6068 * Should probably set errno appropriately when errors occur.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6069 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6070 int
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6071 mch_rename(
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6072 const char *pszOldFile,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6073 const char *pszNewFile)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6074 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6075 char szTempFile[_MAX_PATH+1];
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6076 char szNewPath[_MAX_PATH+1];
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6077 char *pszFilePart;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6078 HANDLE hf;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6079 #ifdef FEAT_MBYTE
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6080 WCHAR *wold = NULL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6081 WCHAR *wnew = NULL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6082 int retval = -1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6083
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6084 if (enc_codepage >= 0 && (int)GetACP() != enc_codepage)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6085 {
1752
a8aae2e1d2ae updated for version 7.2-049
vimboss
parents: 1686
diff changeset
6086 wold = enc_to_utf16((char_u *)pszOldFile, NULL);
a8aae2e1d2ae updated for version 7.2-049
vimboss
parents: 1686
diff changeset
6087 wnew = enc_to_utf16((char_u *)pszNewFile, NULL);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6088 if (wold != NULL && wnew != NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6089 retval = mch_wrename(wold, wnew);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6090 vim_free(wold);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6091 vim_free(wnew);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6092 if (retval == 0 || GetLastError() != ERROR_CALL_NOT_IMPLEMENTED)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6093 return retval;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6094 /* Retry with non-wide function (for Windows 98). */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6095 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6096 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6097
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6098 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6099 * No need to play tricks if not running Windows 95, unless the file name
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6100 * contains a "~" as the seventh character.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6101 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6102 if (!mch_windows95())
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6103 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6104 pszFilePart = (char *)gettail((char_u *)pszOldFile);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6105 if (STRLEN(pszFilePart) < 8 || pszFilePart[6] != '~')
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6106 return rename(pszOldFile, pszNewFile);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6107 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6108
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6109 /* Get base path of new file name. Undocumented feature: If pszNewFile is
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6110 * a directory, no error is returned and pszFilePart will be NULL. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6111 if (GetFullPathName(pszNewFile, _MAX_PATH, szNewPath, &pszFilePart) == 0
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6112 || pszFilePart == NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6113 return -1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6114 *pszFilePart = NUL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6115
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6116 /* Get (and create) a unique temporary file name in directory of new file */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6117 if (GetTempFileName(szNewPath, "VIM", 0, szTempFile) == 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6118 return -2;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6119
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6120 /* blow the temp file away */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6121 if (!DeleteFile(szTempFile))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6122 return -3;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6123
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6124 /* rename old file to the temp file */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6125 if (!MoveFile(pszOldFile, szTempFile))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6126 return -4;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6127
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6128 /* now create an empty file called pszOldFile; this prevents the operating
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6129 * system using pszOldFile as an alias (SFN) if we're renaming within the
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6130 * same directory. For example, we're editing a file called
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6131 * filename.asc.txt by its SFN, filena~1.txt. If we rename filena~1.txt
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6132 * to filena~1.txt~ (i.e., we're making a backup while writing it), the
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6133 * SFN for filena~1.txt~ will be filena~1.txt, by default, which will
39
410fa1a31baf updated for version 7.0023
vimboss
parents: 36
diff changeset
6134 * cause all sorts of problems later in buf_write(). So, we create an
410fa1a31baf updated for version 7.0023
vimboss
parents: 36
diff changeset
6135 * empty file called filena~1.txt and the system will have to find some
410fa1a31baf updated for version 7.0023
vimboss
parents: 36
diff changeset
6136 * other SFN for filena~1.txt~, such as filena~2.txt
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6137 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6138 if ((hf = CreateFile(pszOldFile, GENERIC_WRITE, 0, NULL, CREATE_NEW,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6139 FILE_ATTRIBUTE_NORMAL, NULL)) == INVALID_HANDLE_VALUE)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6140 return -5;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6141 if (!CloseHandle(hf))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6142 return -6;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6143
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6144 /* rename the temp file to the new file */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6145 if (!MoveFile(szTempFile, pszNewFile))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6146 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6147 /* Renaming failed. Rename the file back to its old name, so that it
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6148 * looks like nothing happened. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6149 (void)MoveFile(szTempFile, pszOldFile);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6150
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6151 return -7;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6152 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6153
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6154 /* Seems to be left around on Novell filesystems */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6155 DeleteFile(szTempFile);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6156
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6157 /* finally, remove the empty old file */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6158 if (!DeleteFile(pszOldFile))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6159 return -8;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6160
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6161 return 0; /* success */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6162 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6163
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6164 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6165 * Get the default shell for the current hardware platform
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6166 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6167 char *
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6168 default_shell(void)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6169 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6170 char* psz = NULL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6171
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6172 PlatformId();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6173
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6174 if (g_PlatformId == VER_PLATFORM_WIN32_NT) /* Windows NT */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6175 psz = "cmd.exe";
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6176 else if (g_PlatformId == VER_PLATFORM_WIN32_WINDOWS) /* Windows 95 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6177 psz = "command.com";
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6178
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6179 return psz;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6180 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6181
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6182 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6183 * mch_access() extends access() to do more detailed check on network drives.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6184 * Returns 0 if file "n" has access rights according to "p", -1 otherwise.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6185 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6186 int
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6187 mch_access(char *n, int p)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6188 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6189 HANDLE hFile;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6190 DWORD am;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6191 int retval = -1; /* default: fail */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6192 #ifdef FEAT_MBYTE
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6193 WCHAR *wn = NULL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6194
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6195 if (enc_codepage >= 0 && (int)GetACP() != enc_codepage)
1752
a8aae2e1d2ae updated for version 7.2-049
vimboss
parents: 1686
diff changeset
6196 wn = enc_to_utf16(n, NULL);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6197 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6198
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6199 if (mch_isdir(n))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6200 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6201 char TempName[_MAX_PATH + 16] = "";
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6202 #ifdef FEAT_MBYTE
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6203 WCHAR TempNameW[_MAX_PATH + 16] = L"";
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6204 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6205
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6206 if (p & R_OK)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6207 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6208 /* Read check is performed by seeing if we can do a find file on
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6209 * the directory for any file. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6210 #ifdef FEAT_MBYTE
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6211 if (wn != NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6212 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6213 int i;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6214 WIN32_FIND_DATAW d;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6215
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6216 for (i = 0; i < _MAX_PATH && wn[i] != 0; ++i)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6217 TempNameW[i] = wn[i];
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6218 if (TempNameW[i - 1] != '\\' && TempNameW[i - 1] != '/')
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6219 TempNameW[i++] = '\\';
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6220 TempNameW[i++] = '*';
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6221 TempNameW[i++] = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6222
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6223 hFile = FindFirstFileW(TempNameW, &d);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6224 if (hFile == INVALID_HANDLE_VALUE)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6225 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6226 if (GetLastError() != ERROR_CALL_NOT_IMPLEMENTED)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6227 goto getout;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6228
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6229 /* Retry with non-wide function (for Windows 98). */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6230 vim_free(wn);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6231 wn = NULL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6232 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6233 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6234 (void)FindClose(hFile);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6235 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6236 if (wn == NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6237 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6238 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6239 char *pch;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6240 WIN32_FIND_DATA d;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6241
417
8f41fe56e2fc updated for version 7.0109
vimboss
parents: 406
diff changeset
6242 vim_strncpy(TempName, n, _MAX_PATH);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6243 pch = TempName + STRLEN(TempName) - 1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6244 if (*pch != '\\' && *pch != '/')
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6245 *++pch = '\\';
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6246 *++pch = '*';
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6247 *++pch = NUL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6248
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6249 hFile = FindFirstFile(TempName, &d);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6250 if (hFile == INVALID_HANDLE_VALUE)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6251 goto getout;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6252 (void)FindClose(hFile);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6253 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6254 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6255
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6256 if (p & W_OK)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6257 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6258 /* Trying to create a temporary file in the directory should catch
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6259 * directories on read-only network shares. However, in
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6260 * directories whose ACL allows writes but denies deletes will end
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6261 * up keeping the temporary file :-(. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6262 #ifdef FEAT_MBYTE
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6263 if (wn != NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6264 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6265 if (!GetTempFileNameW(wn, L"VIM", 0, TempNameW))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6266 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6267 if (GetLastError() != ERROR_CALL_NOT_IMPLEMENTED)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6268 goto getout;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6269
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6270 /* Retry with non-wide function (for Windows 98). */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6271 vim_free(wn);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6272 wn = NULL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6273 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6274 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6275 DeleteFileW(TempNameW);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6276 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6277 if (wn == NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6278 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6279 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6280 if (!GetTempFileName(n, "VIM", 0, TempName))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6281 goto getout;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6282 mch_remove((char_u *)TempName);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6283 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6284 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6285 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6286 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6287 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6288 /* Trying to open the file for the required access does ACL, read-only
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6289 * network share, and file attribute checks. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6290 am = ((p & W_OK) ? GENERIC_WRITE : 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6291 | ((p & R_OK) ? GENERIC_READ : 0);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6292 #ifdef FEAT_MBYTE
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6293 if (wn != NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6294 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6295 hFile = CreateFileW(wn, am, 0, NULL, OPEN_EXISTING, 0, NULL);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6296 if (hFile == INVALID_HANDLE_VALUE
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6297 && GetLastError() == ERROR_CALL_NOT_IMPLEMENTED)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6298 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6299 /* Retry with non-wide function (for Windows 98). */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6300 vim_free(wn);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6301 wn = NULL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6302 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6303 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6304 if (wn == NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6305 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6306 hFile = CreateFile(n, am, 0, NULL, OPEN_EXISTING, 0, NULL);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6307 if (hFile == INVALID_HANDLE_VALUE)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6308 goto getout;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6309 CloseHandle(hFile);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6310 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6311
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6312 retval = 0; /* success */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6313 getout:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6314 #ifdef FEAT_MBYTE
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6315 vim_free(wn);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6316 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6317 return retval;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6318 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6319
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6320 #if defined(FEAT_MBYTE) || defined(PROTO)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6321 /*
1752
a8aae2e1d2ae updated for version 7.2-049
vimboss
parents: 1686
diff changeset
6322 * Version of open() that may use UTF-16 file name.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6323 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6324 int
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6325 mch_open(char *name, int flags, int mode)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6326 {
39
410fa1a31baf updated for version 7.0023
vimboss
parents: 36
diff changeset
6327 /* _wopen() does not work with Borland C 5.5: creates a read-only file. */
410fa1a31baf updated for version 7.0023
vimboss
parents: 36
diff changeset
6328 # ifndef __BORLANDC__
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6329 WCHAR *wn;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6330 int f;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6331
39
410fa1a31baf updated for version 7.0023
vimboss
parents: 36
diff changeset
6332 if (enc_codepage >= 0 && (int)GetACP() != enc_codepage)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6333 {
1752
a8aae2e1d2ae updated for version 7.2-049
vimboss
parents: 1686
diff changeset
6334 wn = enc_to_utf16(name, NULL);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6335 if (wn != NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6336 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6337 f = _wopen(wn, flags, mode);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6338 vim_free(wn);
5657
6b69d8dde19e updated for version 7.4.175
Bram Moolenaar <bram@vim.org>
parents: 5635
diff changeset
6339 if (f >= 0 || g_PlatformId == VER_PLATFORM_WIN32_NT)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6340 return f;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6341 /* Retry with non-wide function (for Windows 98). Can't use
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6342 * GetLastError() here and it's unclear what errno gets set to if
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6343 * the _wopen() fails for missing wide functions. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6344 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6345 }
39
410fa1a31baf updated for version 7.0023
vimboss
parents: 36
diff changeset
6346 # endif
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6347
6345
9bc6ce142cc3 updated for version 7.4.505
Bram Moolenaar <bram@vim.org>
parents: 6293
diff changeset
6348 /* open() can open a file which name is longer than _MAX_PATH bytes
9bc6ce142cc3 updated for version 7.4.505
Bram Moolenaar <bram@vim.org>
parents: 6293
diff changeset
6349 * and shorter than _MAX_PATH characters successfully, but sometimes it
9bc6ce142cc3 updated for version 7.4.505
Bram Moolenaar <bram@vim.org>
parents: 6293
diff changeset
6350 * causes unexpected error in another part. We make it an error explicitly
9bc6ce142cc3 updated for version 7.4.505
Bram Moolenaar <bram@vim.org>
parents: 6293
diff changeset
6351 * here. */
9bc6ce142cc3 updated for version 7.4.505
Bram Moolenaar <bram@vim.org>
parents: 6293
diff changeset
6352 if (strlen(name) >= _MAX_PATH)
9bc6ce142cc3 updated for version 7.4.505
Bram Moolenaar <bram@vim.org>
parents: 6293
diff changeset
6353 return -1;
9bc6ce142cc3 updated for version 7.4.505
Bram Moolenaar <bram@vim.org>
parents: 6293
diff changeset
6354
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6355 return open(name, flags, mode);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6356 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6357
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6358 /*
1752
a8aae2e1d2ae updated for version 7.2-049
vimboss
parents: 1686
diff changeset
6359 * Version of fopen() that may use UTF-16 file name.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6360 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6361 FILE *
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6362 mch_fopen(char *name, char *mode)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6363 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6364 WCHAR *wn, *wm;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6365 FILE *f = NULL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6366
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6367 if (enc_codepage >= 0 && (int)GetACP() != enc_codepage
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6368 # ifdef __BORLANDC__
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6369 /* Wide functions of Borland C 5.5 do not work on Windows 98. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6370 && g_PlatformId == VER_PLATFORM_WIN32_NT
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6371 # endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6372 )
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6373 {
1686
c7c53db66b55 updated for version 7.2b-019
vimboss
parents: 1620
diff changeset
6374 # if defined(DEBUG) && _MSC_VER >= 1400
1569
9fbb40a1228a updated for version 7.1-282
vimboss
parents: 1443
diff changeset
6375 /* Work around an annoying assertion in the Microsoft debug CRT
9fbb40a1228a updated for version 7.1-282
vimboss
parents: 1443
diff changeset
6376 * when mode's text/binary setting doesn't match _get_fmode(). */
9fbb40a1228a updated for version 7.1-282
vimboss
parents: 1443
diff changeset
6377 char newMode = mode[strlen(mode) - 1];
9fbb40a1228a updated for version 7.1-282
vimboss
parents: 1443
diff changeset
6378 int oldMode = 0;
9fbb40a1228a updated for version 7.1-282
vimboss
parents: 1443
diff changeset
6379
9fbb40a1228a updated for version 7.1-282
vimboss
parents: 1443
diff changeset
6380 _get_fmode(&oldMode);
9fbb40a1228a updated for version 7.1-282
vimboss
parents: 1443
diff changeset
6381 if (newMode == 't')
9fbb40a1228a updated for version 7.1-282
vimboss
parents: 1443
diff changeset
6382 _set_fmode(_O_TEXT);
9fbb40a1228a updated for version 7.1-282
vimboss
parents: 1443
diff changeset
6383 else if (newMode == 'b')
9fbb40a1228a updated for version 7.1-282
vimboss
parents: 1443
diff changeset
6384 _set_fmode(_O_BINARY);
9fbb40a1228a updated for version 7.1-282
vimboss
parents: 1443
diff changeset
6385 # endif
1752
a8aae2e1d2ae updated for version 7.2-049
vimboss
parents: 1686
diff changeset
6386 wn = enc_to_utf16(name, NULL);
a8aae2e1d2ae updated for version 7.2-049
vimboss
parents: 1686
diff changeset
6387 wm = enc_to_utf16(mode, NULL);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6388 if (wn != NULL && wm != NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6389 f = _wfopen(wn, wm);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6390 vim_free(wn);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6391 vim_free(wm);
1569
9fbb40a1228a updated for version 7.1-282
vimboss
parents: 1443
diff changeset
6392
1686
c7c53db66b55 updated for version 7.2b-019
vimboss
parents: 1620
diff changeset
6393 # if defined(DEBUG) && _MSC_VER >= 1400
1569
9fbb40a1228a updated for version 7.1-282
vimboss
parents: 1443
diff changeset
6394 _set_fmode(oldMode);
9fbb40a1228a updated for version 7.1-282
vimboss
parents: 1443
diff changeset
6395 # endif
9fbb40a1228a updated for version 7.1-282
vimboss
parents: 1443
diff changeset
6396
5657
6b69d8dde19e updated for version 7.4.175
Bram Moolenaar <bram@vim.org>
parents: 5635
diff changeset
6397 if (f != NULL || g_PlatformId == VER_PLATFORM_WIN32_NT)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6398 return f;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6399 /* Retry with non-wide function (for Windows 98). Can't use
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6400 * GetLastError() here and it's unclear what errno gets set to if
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6401 * the _wfopen() fails for missing wide functions. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6402 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6403
6345
9bc6ce142cc3 updated for version 7.4.505
Bram Moolenaar <bram@vim.org>
parents: 6293
diff changeset
6404 /* fopen() can open a file which name is longer than _MAX_PATH bytes
9bc6ce142cc3 updated for version 7.4.505
Bram Moolenaar <bram@vim.org>
parents: 6293
diff changeset
6405 * and shorter than _MAX_PATH characters successfully, but sometimes it
9bc6ce142cc3 updated for version 7.4.505
Bram Moolenaar <bram@vim.org>
parents: 6293
diff changeset
6406 * causes unexpected error in another part. We make it an error explicitly
9bc6ce142cc3 updated for version 7.4.505
Bram Moolenaar <bram@vim.org>
parents: 6293
diff changeset
6407 * here. */
9bc6ce142cc3 updated for version 7.4.505
Bram Moolenaar <bram@vim.org>
parents: 6293
diff changeset
6408 if (strlen(name) >= _MAX_PATH)
9bc6ce142cc3 updated for version 7.4.505
Bram Moolenaar <bram@vim.org>
parents: 6293
diff changeset
6409 return NULL;
9bc6ce142cc3 updated for version 7.4.505
Bram Moolenaar <bram@vim.org>
parents: 6293
diff changeset
6410
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6411 return fopen(name, mode);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6412 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6413 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6414
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6415 #ifdef FEAT_MBYTE
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6416 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6417 * SUB STREAM (aka info stream) handling:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6418 *
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6419 * NTFS can have sub streams for each file. Normal contents of file is
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6420 * stored in the main stream, and extra contents (author information and
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6421 * title and so on) can be stored in sub stream. After Windows 2000, user
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6422 * can access and store those informations in sub streams via explorer's
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6423 * property menuitem in right click menu. Those informations in sub streams
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6424 * were lost when copying only the main stream. So we have to copy sub
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6425 * streams.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6426 *
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6427 * Incomplete explanation:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6428 * http://msdn.microsoft.com/library/en-us/dnw2k/html/ntfs5.asp
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6429 * More useful info and an example:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6430 * http://www.sysinternals.com/ntw2k/source/misc.shtml#streams
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6431 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6432
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6433 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6434 * Copy info stream data "substream". Read from the file with BackupRead(sh)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6435 * and write to stream "substream" of file "to".
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6436 * Errors are ignored.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6437 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6438 static void
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6439 copy_substream(HANDLE sh, void *context, WCHAR *to, WCHAR *substream, long len)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6440 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6441 HANDLE hTo;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6442 WCHAR *to_name;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6443
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6444 to_name = malloc((wcslen(to) + wcslen(substream) + 1) * sizeof(WCHAR));
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6445 wcscpy(to_name, to);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6446 wcscat(to_name, substream);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6447
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6448 hTo = CreateFileW(to_name, GENERIC_WRITE, 0, NULL, OPEN_ALWAYS,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6449 FILE_ATTRIBUTE_NORMAL, NULL);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6450 if (hTo != INVALID_HANDLE_VALUE)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6451 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6452 long done;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6453 DWORD todo;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6454 DWORD readcnt, written;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6455 char buf[4096];
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6456
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6457 /* Copy block of bytes at a time. Abort when something goes wrong. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6458 for (done = 0; done < len; done += written)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6459 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6460 /* (size_t) cast for Borland C 5.5 */
835
8bebcabccc2c updated for version 7.0e01
vimboss
parents: 819
diff changeset
6461 todo = (DWORD)((size_t)(len - done) > sizeof(buf) ? sizeof(buf)
8bebcabccc2c updated for version 7.0e01
vimboss
parents: 819
diff changeset
6462 : (size_t)(len - done));
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6463 if (!BackupRead(sh, (LPBYTE)buf, todo, &readcnt,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6464 FALSE, FALSE, context)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6465 || readcnt != todo
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6466 || !WriteFile(hTo, buf, todo, &written, NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6467 || written != todo)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6468 break;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6469 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6470 CloseHandle(hTo);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6471 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6472
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6473 free(to_name);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6474 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6475
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6476 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6477 * Copy info streams from file "from" to file "to".
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6478 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6479 static void
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6480 copy_infostreams(char_u *from, char_u *to)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6481 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6482 WCHAR *fromw;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6483 WCHAR *tow;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6484 HANDLE sh;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6485 WIN32_STREAM_ID sid;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6486 int headersize;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6487 WCHAR streamname[_MAX_PATH];
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6488 DWORD readcount;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6489 void *context = NULL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6490 DWORD lo, hi;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6491 int len;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6492
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6493 /* Convert the file names to wide characters. */
1752
a8aae2e1d2ae updated for version 7.2-049
vimboss
parents: 1686
diff changeset
6494 fromw = enc_to_utf16(from, NULL);
a8aae2e1d2ae updated for version 7.2-049
vimboss
parents: 1686
diff changeset
6495 tow = enc_to_utf16(to, NULL);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6496 if (fromw != NULL && tow != NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6497 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6498 /* Open the file for reading. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6499 sh = CreateFileW(fromw, GENERIC_READ, FILE_SHARE_READ, NULL,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6500 OPEN_EXISTING, FILE_FLAG_BACKUP_SEMANTICS, NULL);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6501 if (sh != INVALID_HANDLE_VALUE)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6502 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6503 /* Use BackupRead() to find the info streams. Repeat until we
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6504 * have done them all.*/
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6505 for (;;)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6506 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6507 /* Get the header to find the length of the stream name. If
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6508 * the "readcount" is zero we have done all info streams. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6509 ZeroMemory(&sid, sizeof(WIN32_STREAM_ID));
835
8bebcabccc2c updated for version 7.0e01
vimboss
parents: 819
diff changeset
6510 headersize = (int)((char *)&sid.cStreamName - (char *)&sid.dwStreamId);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6511 if (!BackupRead(sh, (LPBYTE)&sid, headersize,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6512 &readcount, FALSE, FALSE, &context)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6513 || readcount == 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6514 break;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6515
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6516 /* We only deal with streams that have a name. The normal
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6517 * file data appears to be without a name, even though docs
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6518 * suggest it is called "::$DATA". */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6519 if (sid.dwStreamNameSize > 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6520 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6521 /* Read the stream name. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6522 if (!BackupRead(sh, (LPBYTE)streamname,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6523 sid.dwStreamNameSize,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6524 &readcount, FALSE, FALSE, &context))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6525 break;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6526
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6527 /* Copy an info stream with a name ":anything:$DATA".
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6528 * Skip "::$DATA", it has no stream name (examples suggest
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6529 * it might be used for the normal file contents).
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6530 * Note that BackupRead() counts bytes, but the name is in
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6531 * wide characters. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6532 len = readcount / sizeof(WCHAR);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6533 streamname[len] = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6534 if (len > 7 && wcsicmp(streamname + len - 6,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6535 L":$DATA") == 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6536 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6537 streamname[len - 6] = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6538 copy_substream(sh, &context, tow, streamname,
10
4e2284e71352 updated for version 7.0002
vimboss
parents: 9
diff changeset
6539 (long)sid.Size.u.LowPart);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6540 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6541 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6542
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6543 /* Advance to the next stream. We might try seeking too far,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6544 * but BackupSeek() doesn't skip over stream borders, thus
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6545 * that's OK. */
323
03b3684919e3 updated for version 7.0084
vimboss
parents: 297
diff changeset
6546 (void)BackupSeek(sh, sid.Size.u.LowPart, sid.Size.u.HighPart,
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6547 &lo, &hi, &context);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6548 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6549
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6550 /* Clear the context. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6551 (void)BackupRead(sh, NULL, 0, &readcount, TRUE, FALSE, &context);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6552
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6553 CloseHandle(sh);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6554 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6555 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6556 vim_free(fromw);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6557 vim_free(tow);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6558 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6559 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6560
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6561 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6562 * Copy file attributes from file "from" to file "to".
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6563 * For Windows NT and later we copy info streams.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6564 * Always returns zero, errors are ignored.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6565 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6566 int
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6567 mch_copy_file_attribute(char_u *from, char_u *to)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6568 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6569 #ifdef FEAT_MBYTE
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6570 /* File streams only work on Windows NT and later. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6571 PlatformId();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6572 if (g_PlatformId == VER_PLATFORM_WIN32_NT)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6573 copy_infostreams(from, to);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6574 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6575 return 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6576 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6577
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6578 #if defined(MYRESETSTKOFLW) || defined(PROTO)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6579 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6580 * Recreate a destroyed stack guard page in win32.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6581 * Written by Benjamin Peterson.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6582 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6583
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6584 /* These magic numbers are from the MS header files */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6585 #define MIN_STACK_WIN9X 17
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6586 #define MIN_STACK_WINNT 2
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6587
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6588 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6589 * This function does the same thing as _resetstkoflw(), which is only
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6590 * available in DevStudio .net and later.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6591 * Returns 0 for failure, 1 for success.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6592 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6593 int
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6594 myresetstkoflw(void)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6595 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6596 BYTE *pStackPtr;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6597 BYTE *pGuardPage;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6598 BYTE *pStackBase;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6599 BYTE *pLowestPossiblePage;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6600 MEMORY_BASIC_INFORMATION mbi;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6601 SYSTEM_INFO si;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6602 DWORD nPageSize;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6603 DWORD dummy;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6604
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6605 /* This code will not work on win32s. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6606 PlatformId();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6607 if (g_PlatformId == VER_PLATFORM_WIN32s)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6608 return 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6609
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6610 /* We need to know the system page size. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6611 GetSystemInfo(&si);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6612 nPageSize = si.dwPageSize;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6613
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6614 /* ...and the current stack pointer */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6615 pStackPtr = (BYTE*)_alloca(1);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6616
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6617 /* ...and the base of the stack. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6618 if (VirtualQuery(pStackPtr, &mbi, sizeof mbi) == 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6619 return 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6620 pStackBase = (BYTE*)mbi.AllocationBase;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6621
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6622 /* ...and the page thats min_stack_req pages away from stack base; this is
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6623 * the lowest page we could use. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6624 pLowestPossiblePage = pStackBase + ((g_PlatformId == VER_PLATFORM_WIN32_NT)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6625 ? MIN_STACK_WINNT : MIN_STACK_WIN9X) * nPageSize;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6626
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6627 /* On Win95, we want the next page down from the end of the stack. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6628 if (g_PlatformId == VER_PLATFORM_WIN32_WINDOWS)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6629 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6630 /* Find the page that's only 1 page down from the page that the stack
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6631 * ptr is in. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6632 pGuardPage = (BYTE*)((DWORD)nPageSize * (((DWORD)pStackPtr
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6633 / (DWORD)nPageSize) - 1));
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6634 if (pGuardPage < pLowestPossiblePage)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6635 return 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6636
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6637 /* Apply the noaccess attribute to the page -- there's no guard
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6638 * attribute in win95-type OSes. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6639 if (!VirtualProtect(pGuardPage, nPageSize, PAGE_NOACCESS, &dummy))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6640 return 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6641 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6642 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6643 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6644 /* On NT, however, we want the first committed page in the stack Start
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6645 * at the stack base and move forward through memory until we find a
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6646 * committed block. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6647 BYTE *pBlock = pStackBase;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6648
406
aa550d9d2403 updated for version 7.0106
vimboss
parents: 368
diff changeset
6649 for (;;)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6650 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6651 if (VirtualQuery(pBlock, &mbi, sizeof mbi) == 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6652 return 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6653
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6654 pBlock += mbi.RegionSize;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6655
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6656 if (mbi.State & MEM_COMMIT)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6657 break;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6658 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6659
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6660 /* mbi now describes the first committed block in the stack. */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6661 if (mbi.Protect & PAGE_GUARD)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6662 return 1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6663
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6664 /* decide where the guard page should start */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6665 if ((long_u)(mbi.BaseAddress) < (long_u)pLowestPossiblePage)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6666 pGuardPage = pLowestPossiblePage;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6667 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6668 pGuardPage = (BYTE*)mbi.BaseAddress;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6669
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6670 /* allocate the guard page */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6671 if (!VirtualAlloc(pGuardPage, nPageSize, MEM_COMMIT, PAGE_READWRITE))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6672 return 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6673
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6674 /* apply the guard attribute to the page */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6675 if (!VirtualProtect(pGuardPage, nPageSize, PAGE_READWRITE | PAGE_GUARD,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6676 &dummy))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6677 return 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6678 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6679
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6680 return 1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6681 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6682 #endif
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6683
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6684
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6685 #if defined(FEAT_MBYTE) || defined(PROTO)
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6686 /*
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6687 * The command line arguments in UCS2
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6688 */
344
7033303ea0c0 updated for version 7.0089
vimboss
parents: 323
diff changeset
6689 static int nArgsW = 0;
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6690 static LPWSTR *ArglistW = NULL;
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6691 static int global_argc = 0;
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6692 static char **global_argv;
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6693
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6694 static int used_file_argc = 0; /* last argument in global_argv[] used
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6695 for the argument list. */
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6696 static int *used_file_indexes = NULL; /* indexes in global_argv[] for
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6697 command line arguments added to
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6698 the argument list */
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6699 static int used_file_count = 0; /* nr of entries in used_file_indexes */
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6700 static int used_file_literal = FALSE; /* take file names literally */
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6701 static int used_file_full_path = FALSE; /* file name was full path */
819
23f82b5d2814 updated for version 7.0c10
vimboss
parents: 797
diff changeset
6702 static int used_file_diff_mode = FALSE; /* file name was with diff mode */
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6703 static int used_alist_count = 0;
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6704
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6705
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6706 /*
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6707 * Get the command line arguments. Unicode version.
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6708 * Returns argc. Zero when something fails.
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6709 */
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6710 int
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6711 get_cmd_argsW(char ***argvp)
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6712 {
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6713 char **argv = NULL;
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6714 int argc = 0;
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6715 int i;
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6716
6193
59cd2b16f718 updated for version 7.4.432
Bram Moolenaar <bram@vim.org>
parents: 6185
diff changeset
6717 free_cmd_argsW();
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6718 ArglistW = CommandLineToArgvW(GetCommandLineW(), &nArgsW);
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6719 if (ArglistW != NULL)
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6720 {
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6721 argv = malloc((nArgsW + 1) * sizeof(char *));
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6722 if (argv != NULL)
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6723 {
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6724 argc = nArgsW;
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6725 argv[argc] = NULL;
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6726 for (i = 0; i < argc; ++i)
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6727 {
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6728 int len;
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6729
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6730 /* Convert each Unicode argument to the current codepage. */
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6731 WideCharToMultiByte_alloc(GetACP(), 0,
835
8bebcabccc2c updated for version 7.0e01
vimboss
parents: 819
diff changeset
6732 ArglistW[i], (int)wcslen(ArglistW[i]) + 1,
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6733 (LPSTR *)&argv[i], &len, 0, 0);
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6734 if (argv[i] == NULL)
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6735 {
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6736 /* Out of memory, clear everything. */
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6737 while (i > 0)
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6738 free(argv[--i]);
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6739 free(argv);
5529
0e21e2a38ec6 updated for version 7.4.113
Bram Moolenaar <bram@vim.org>
parents: 5494
diff changeset
6740 argv = NULL;
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6741 argc = 0;
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6742 }
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6743 }
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6744 }
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6745 }
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6746
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6747 global_argc = argc;
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6748 global_argv = argv;
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6749 if (argc > 0)
6193
59cd2b16f718 updated for version 7.4.432
Bram Moolenaar <bram@vim.org>
parents: 6185
diff changeset
6750 {
59cd2b16f718 updated for version 7.4.432
Bram Moolenaar <bram@vim.org>
parents: 6185
diff changeset
6751 if (used_file_indexes != NULL)
59cd2b16f718 updated for version 7.4.432
Bram Moolenaar <bram@vim.org>
parents: 6185
diff changeset
6752 free(used_file_indexes);
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6753 used_file_indexes = malloc(argc * sizeof(int));
6193
59cd2b16f718 updated for version 7.4.432
Bram Moolenaar <bram@vim.org>
parents: 6185
diff changeset
6754 }
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6755
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6756 if (argvp != NULL)
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6757 *argvp = argv;
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6758 return argc;
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6759 }
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6760
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6761 void
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6762 free_cmd_argsW(void)
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6763 {
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6764 if (ArglistW != NULL)
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6765 {
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6766 GlobalFree(ArglistW);
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6767 ArglistW = NULL;
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6768 }
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6769 }
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6770
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6771 /*
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6772 * Remember "name" is an argument that was added to the argument list.
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6773 * This avoids that we have to re-parse the argument list when fix_arg_enc()
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6774 * is called.
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6775 */
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6776 void
819
23f82b5d2814 updated for version 7.0c10
vimboss
parents: 797
diff changeset
6777 used_file_arg(char *name, int literal, int full_path, int diff_mode)
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6778 {
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6779 int i;
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6780
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6781 if (used_file_indexes == NULL)
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6782 return;
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6783 for (i = used_file_argc + 1; i < global_argc; ++i)
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6784 if (STRCMP(global_argv[i], name) == 0)
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6785 {
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6786 used_file_argc = i;
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6787 used_file_indexes[used_file_count++] = i;
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6788 break;
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6789 }
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6790 used_file_literal = literal;
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6791 used_file_full_path = full_path;
819
23f82b5d2814 updated for version 7.0c10
vimboss
parents: 797
diff changeset
6792 used_file_diff_mode = diff_mode;
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6793 }
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6794
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6795 /*
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6796 * Remember the length of the argument list as it was. If it changes then we
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6797 * leave it alone when 'encoding' is set.
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6798 */
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6799 void
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6800 set_alist_count(void)
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6801 {
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6802 used_alist_count = GARGCOUNT;
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6803 }
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6804
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6805 /*
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6806 * Fix the encoding of the command line arguments. Invoked when 'encoding'
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6807 * has been changed while starting up. Use the UCS-2 command line arguments
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6808 * and convert them to 'encoding'.
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6809 */
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6810 void
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6811 fix_arg_enc(void)
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6812 {
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6813 int i;
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6814 int idx;
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6815 char_u *str;
41
f529edb9bab3 updated for version 7.0025
vimboss
parents: 39
diff changeset
6816 int *fnum_list;
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6817
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6818 /* Safety checks:
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6819 * - if argument count differs between the wide and non-wide argument
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6820 * list, something must be wrong.
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6821 * - the file name arguments must have been located.
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6822 * - the length of the argument list wasn't changed by the user.
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6823 */
344
7033303ea0c0 updated for version 7.0089
vimboss
parents: 323
diff changeset
6824 if (global_argc != nArgsW
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6825 || ArglistW == NULL
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6826 || used_file_indexes == NULL
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6827 || used_file_count == 0
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6828 || used_alist_count != GARGCOUNT)
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6829 return;
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6830
41
f529edb9bab3 updated for version 7.0025
vimboss
parents: 39
diff changeset
6831 /* Remember the buffer numbers for the arguments. */
f529edb9bab3 updated for version 7.0025
vimboss
parents: 39
diff changeset
6832 fnum_list = (int *)alloc((int)sizeof(int) * GARGCOUNT);
f529edb9bab3 updated for version 7.0025
vimboss
parents: 39
diff changeset
6833 if (fnum_list == NULL)
f529edb9bab3 updated for version 7.0025
vimboss
parents: 39
diff changeset
6834 return; /* out of memory */
f529edb9bab3 updated for version 7.0025
vimboss
parents: 39
diff changeset
6835 for (i = 0; i < GARGCOUNT; ++i)
f529edb9bab3 updated for version 7.0025
vimboss
parents: 39
diff changeset
6836 fnum_list[i] = GARGLIST[i].ae_fnum;
f529edb9bab3 updated for version 7.0025
vimboss
parents: 39
diff changeset
6837
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6838 /* Clear the argument list. Make room for the new arguments. */
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6839 alist_clear(&global_alist);
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6840 if (ga_grow(&global_alist.al_ga, used_file_count) == FAIL)
41
f529edb9bab3 updated for version 7.0025
vimboss
parents: 39
diff changeset
6841 return; /* out of memory */
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6842
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6843 for (i = 0; i < used_file_count; ++i)
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6844 {
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6845 idx = used_file_indexes[i];
1752
a8aae2e1d2ae updated for version 7.2-049
vimboss
parents: 1686
diff changeset
6846 str = utf16_to_enc(ArglistW[idx], NULL);
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6847 if (str != NULL)
41
f529edb9bab3 updated for version 7.0025
vimboss
parents: 39
diff changeset
6848 {
819
23f82b5d2814 updated for version 7.0c10
vimboss
parents: 797
diff changeset
6849 #ifdef FEAT_DIFF
23f82b5d2814 updated for version 7.0c10
vimboss
parents: 797
diff changeset
6850 /* When using diff mode may need to concatenate file name to
23f82b5d2814 updated for version 7.0c10
vimboss
parents: 797
diff changeset
6851 * directory name. Just like it's done in main(). */
23f82b5d2814 updated for version 7.0c10
vimboss
parents: 797
diff changeset
6852 if (used_file_diff_mode && mch_isdir(str) && GARGCOUNT > 0
23f82b5d2814 updated for version 7.0c10
vimboss
parents: 797
diff changeset
6853 && !mch_isdir(alist_name(&GARGLIST[0])))
23f82b5d2814 updated for version 7.0c10
vimboss
parents: 797
diff changeset
6854 {
23f82b5d2814 updated for version 7.0c10
vimboss
parents: 797
diff changeset
6855 char_u *r;
23f82b5d2814 updated for version 7.0c10
vimboss
parents: 797
diff changeset
6856
23f82b5d2814 updated for version 7.0c10
vimboss
parents: 797
diff changeset
6857 r = concat_fnames(str, gettail(alist_name(&GARGLIST[0])), TRUE);
23f82b5d2814 updated for version 7.0c10
vimboss
parents: 797
diff changeset
6858 if (r != NULL)
23f82b5d2814 updated for version 7.0c10
vimboss
parents: 797
diff changeset
6859 {
23f82b5d2814 updated for version 7.0c10
vimboss
parents: 797
diff changeset
6860 vim_free(str);
23f82b5d2814 updated for version 7.0c10
vimboss
parents: 797
diff changeset
6861 str = r;
23f82b5d2814 updated for version 7.0c10
vimboss
parents: 797
diff changeset
6862 }
23f82b5d2814 updated for version 7.0c10
vimboss
parents: 797
diff changeset
6863 }
23f82b5d2814 updated for version 7.0c10
vimboss
parents: 797
diff changeset
6864 #endif
41
f529edb9bab3 updated for version 7.0025
vimboss
parents: 39
diff changeset
6865 /* Re-use the old buffer by renaming it. When not using literal
f529edb9bab3 updated for version 7.0025
vimboss
parents: 39
diff changeset
6866 * names it's done by alist_expand() below. */
f529edb9bab3 updated for version 7.0025
vimboss
parents: 39
diff changeset
6867 if (used_file_literal)
f529edb9bab3 updated for version 7.0025
vimboss
parents: 39
diff changeset
6868 buf_set_name(fnum_list[i], str);
f529edb9bab3 updated for version 7.0025
vimboss
parents: 39
diff changeset
6869
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6870 alist_add(&global_alist, str, used_file_literal ? 2 : 0);
41
f529edb9bab3 updated for version 7.0025
vimboss
parents: 39
diff changeset
6871 }
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6872 }
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6873
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6874 if (!used_file_literal)
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6875 {
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6876 /* Now expand wildcards in the arguments. */
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6877 /* Temporarily add '(' and ')' to 'isfname'. These are valid
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6878 * filename characters but are excluded from 'isfname' to make
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6879 * "gf" work on a file name in parenthesis (e.g.: see vim.h). */
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6880 do_cmdline_cmd((char_u *)":let SaVe_ISF = &isf|set isf+=(,)");
41
f529edb9bab3 updated for version 7.0025
vimboss
parents: 39
diff changeset
6881 alist_expand(fnum_list, used_alist_count);
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6882 do_cmdline_cmd((char_u *)":let &isf = SaVe_ISF|unlet SaVe_ISF");
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6883 }
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6884
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6885 /* If wildcard expansion failed, we are editing the first file of the
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6886 * arglist and there is no file name: Edit the first argument now. */
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6887 if (curwin->w_arg_idx == 0 && curbuf->b_fname == NULL)
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6888 {
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6889 do_cmdline_cmd((char_u *)":rewind");
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6890 if (GARGCOUNT == 1 && used_file_full_path)
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6891 (void)vim_chdirfile(alist_name(&GARGLIST[0]));
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6892 }
41
f529edb9bab3 updated for version 7.0025
vimboss
parents: 39
diff changeset
6893
f529edb9bab3 updated for version 7.0025
vimboss
parents: 39
diff changeset
6894 set_alist_count();
26
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6895 }
404aac550f35 updated for version 7.0017
vimboss
parents: 24
diff changeset
6896 #endif