| /* vi:set ts=8 sts=4 sw=4 noet: |
| * |
| * VIM - Vi IMproved by Bram Moolenaar |
| * this file by Vince Negri |
| * |
| * Do ":help uganda" in Vim to read copying and usage conditions. |
| * Do ":help credits" in Vim to see a list of people who contributed. |
| * See README.txt for an overview of the Vim source code. |
| */ |
| |
| /* |
| * vimrun.c - Tiny Win32 program to safely run an external command in a |
| * DOS console. |
| * This program is required to avoid that typing CTRL-C in the DOS |
| * console kills Vim. Now it only kills vimrun. |
| */ |
| |
| #include <stdio.h> |
| #include <stdlib.h> |
| #include <conio.h> |
| #ifndef WIN32_LEAN_AND_MEAN |
| # define WIN32_LEAN_AND_MEAN |
| #endif |
| #include <windows.h> |
| |
| #ifdef __BORLANDC__ |
| # define _kbhit kbhit |
| # define _getch getch |
| #endif |
| |
| int |
| main(void) |
| { |
| const wchar_t *p; |
| int retval; |
| int inquote = 0; |
| int silent = 0; |
| HANDLE hstdout; |
| DWORD written; |
| |
| p = (const wchar_t *)GetCommandLineW(); |
| |
| /* |
| * Skip the executable name, which might be in "". |
| */ |
| while (*p) |
| { |
| if (*p == L'"') |
| inquote = !inquote; |
| else if (!inquote && *p == L' ') |
| { |
| ++p; |
| break; |
| } |
| ++p; |
| } |
| while (*p == L' ') |
| ++p; |
| |
| /* |
| * "-s" argument: don't wait for a key hit. |
| */ |
| if (p[0] == L'-' && p[1] == L's' && p[2] == L' ') |
| { |
| silent = 1; |
| p += 3; |
| while (*p == L' ') |
| ++p; |
| } |
| |
| /* Print the command, including quotes and redirection. */ |
| hstdout = GetStdHandle(STD_OUTPUT_HANDLE); |
| WriteConsoleW(hstdout, p, wcslen(p), &written, NULL); |
| WriteConsoleW(hstdout, L"\r\n", 2, &written, NULL); |
| |
| /* |
| * Do it! |
| */ |
| retval = _wsystem(p); |
| |
| if (retval == -1) |
| perror("vimrun system(): "); |
| else if (retval != 0) |
| printf("shell returned %d\n", retval); |
| |
| if (!silent) |
| { |
| puts("Hit any key to close this window..."); |
| |
| while (_kbhit()) |
| (void)_getch(); |
| (void)_getch(); |
| } |
| |
| return retval; |
| } |