vim: src/clientserver.c annotate

annotate src/clientserver.c @ 32268:e26c71f837f5 v9.0.1465

patch 9.0.1465: Haiku build fails Commit: https://github.com/vim/vim/commit/89f9ffbe810c4705439096d646681e734e353e3e Author: ichizok <gclient.gaap@gmail.com> Date: Tue Apr 18 17:20:08 2023 +0100 patch 9.0.1465: Haiku build fails Problem: Haiku build fails. Solution: Do not include globals.h and proto.h twice. (Ozaki Kiichi, closes #12273)

author	Bram Moolenaar <Bram@vim.org>
date	Tue, 18 Apr 2023 18:30:04 +0200
parents	b89cfd86e18e
children	2fee2d1b498e

rev	line source
19920 5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1 /* vi:set ts=8 sts=4 sw=4 noet:
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	2 *
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	3 * VIM - Vi IMproved by Bram Moolenaar
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	4 *
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	5 * Do ":help uganda" in Vim to read copying and usage conditions.
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	6 * Do ":help credits" in Vim to see a list of people who contributed.
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	7 * See README.txt for an overview of the Vim source code.
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	8 */
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	9
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	10 /*
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	11 * clientserver.c: functions for Client Server functionality
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	12 */
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	13
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	14 #include "vim.h"
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	15
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	16 #if defined(FEAT_CLIENTSERVER) \|\| defined(PROTO)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	17
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	18 static void cmdsrv_main(int argc, char argv, char_u serverName_arg, char_u **serverStr);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	19 static char_u serverMakeName(char_u arg, char *cmd);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	20
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	21 /*
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	22 * Replace termcodes such as <CR> and insert as key presses if there is room.
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	23 */
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	24 void
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	25 server_to_input_buf(char_u *str)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	26 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	27 char_u *ptr = NULL;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	28 char_u *cpo_save = p_cpo;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	29
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	30 // Set 'cpoptions' the way we want it.
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	31 // B set - backslashes are not treated specially
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	32 // k set - keycodes are not reverse-engineered
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	33 // < unset - <Key> sequences are interpreted
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	34 // The last but one parameter of replace_termcodes() is TRUE so that the
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	35 // <lt> sequence is recognised - needed for a real backslash.
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	36 p_cpo = (char_u *)"Bk";
27426 41e0dcf38521 patch 8.2.4241: some type casts are redundant Bram Moolenaar <Bram@vim.org> parents: 26966 diff changeset	37 str = replace_termcodes(str, &ptr, REPTERM_DO_LT, NULL);
19920 5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	38 p_cpo = cpo_save;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	39
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	40 if (*ptr != NUL) // trailing CTRL-V results in nothing
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	41 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	42 /*
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	43 * Add the string to the input stream.
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	44 * Can't use add_to_input_buf() here, we now have K_SPECIAL bytes.
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	45 *
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	46 * First clear typed characters from the typeahead buffer, there could
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	47 * be half a mapping there. Then append to the existing string, so
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	48 * that multiple commands from a client are concatenated.
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	49 */
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	50 if (typebuf.tb_maplen < typebuf.tb_len)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	51 del_typebuf(typebuf.tb_len - typebuf.tb_maplen, typebuf.tb_maplen);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	52 (void)ins_typebuf(str, REMAP_NONE, typebuf.tb_len, TRUE, FALSE);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	53
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	54 // Let input_available() know we inserted text in the typeahead
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	55 // buffer.
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	56 typebuf_was_filled = TRUE;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	57 }
27426 41e0dcf38521 patch 8.2.4241: some type casts are redundant Bram Moolenaar <Bram@vim.org> parents: 26966 diff changeset	58 vim_free(ptr);
19920 5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	59 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	60
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	61 /*
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	62 * Evaluate an expression that the client sent to a string.
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	63 */
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	64 char_u *
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	65 eval_client_expr_to_string(char_u *expr)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	66 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	67 char_u *res;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	68 int save_dbl = debug_break_level;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	69 int save_ro = redir_off;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	70 funccal_entry_T funccal_entry;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	71 int did_save_funccal = FALSE;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	72
31287 fa309d9af73c patch 9.0.0977: it is not easy to see what client-server commands are doing Bram Moolenaar <Bram@vim.org> parents: 30598 diff changeset	73 #if defined(FEAT_EVAL)
fa309d9af73c patch 9.0.0977: it is not easy to see what client-server commands are doing Bram Moolenaar <Bram@vim.org> parents: 30598 diff changeset	74 ch_log(NULL, "eval_client_expr_to_string(\"%s\")", expr);
fa309d9af73c patch 9.0.0977: it is not easy to see what client-server commands are doing Bram Moolenaar <Bram@vim.org> parents: 30598 diff changeset	75 #endif
fa309d9af73c patch 9.0.0977: it is not easy to see what client-server commands are doing Bram Moolenaar <Bram@vim.org> parents: 30598 diff changeset	76
19920 5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	77 // Evaluate the expression at the toplevel, don't use variables local to
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	78 // the calling function. Except when in debug mode.
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	79 if (!debug_mode)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	80 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	81 save_funccal(&funccal_entry);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	82 did_save_funccal = TRUE;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	83 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	84
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	85 // Disable debugging, otherwise Vim hangs, waiting for "cont" to be
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	86 // typed.
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	87 debug_break_level = -1;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	88 redir_off = 0;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	89 // Do not display error message, otherwise Vim hangs, waiting for "cont"
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	90 // to be typed. Do generate errors so that try/catch works.
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	91 ++emsg_silent;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	92
30598 37aa9fd2ed72 patch 9.0.0634: evaluating "expr" options has more overhead than needed Bram Moolenaar <Bram@vim.org> parents: 30154 diff changeset	93 res = eval_to_string(expr, TRUE, FALSE);
19920 5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	94
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	95 debug_break_level = save_dbl;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	96 redir_off = save_ro;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	97 --emsg_silent;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	98 if (emsg_silent < 0)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	99 emsg_silent = 0;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	100 if (did_save_funccal)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	101 restore_funccal();
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	102
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	103 // A client can tell us to redraw, but not to display the cursor, so do
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	104 // that here.
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	105 setcursor();
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	106 out_flush_cursor(FALSE, FALSE);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	107
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	108 return res;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	109 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	110
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	111 /*
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	112 * Evaluate a command or expression sent to ourselves.
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	113 */
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	114 int
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	115 sendToLocalVim(char_u cmd, int asExpr, char_u *result)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	116 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	117 if (asExpr)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	118 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	119 char_u *ret;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	120
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	121 ret = eval_client_expr_to_string(cmd);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	122 if (result != NULL)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	123 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	124 if (ret == NULL)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	125 {
26883 7f150a4936f2 patch 8.2.3970: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 25384 diff changeset	126 char *err = _(e_invalid_expression_received);
19920 5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	127 size_t len = STRLEN(cmd) + STRLEN(err) + 5;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	128 char_u *msg;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	129
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	130 msg = alloc(len);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	131 if (msg != NULL)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	132 vim_snprintf((char *)msg, len, "%s: \"%s\"", err, cmd);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	133 *result = msg;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	134 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	135 else
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	136 *result = ret;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	137 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	138 else
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	139 vim_free(ret);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	140 return ret == NULL ? -1 : 0;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	141 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	142 server_to_input_buf(cmd);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	143 return 0;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	144 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	145
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	146 /*
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	147 * If conversion is needed, convert "data" from "client_enc" to 'encoding' and
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	148 * return an allocated string. Otherwise return "data".
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	149 * "*tofree" is set to the result when it needs to be freed later.
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	150 */
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	151 char_u *
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	152 serverConvert(
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	153 char_u *client_enc UNUSED,
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	154 char_u *data,
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	155 char_u **tofree)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	156 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	157 char_u *res = data;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	158
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	159 *tofree = NULL;
31667 b89cfd86e18e patch 9.0.1166: code is indented more than necessary Bram Moolenaar <Bram@vim.org> parents: 31600 diff changeset	160 if (client_enc == NULL \|\| p_enc == NULL)
b89cfd86e18e patch 9.0.1166: code is indented more than necessary Bram Moolenaar <Bram@vim.org> parents: 31600 diff changeset	161 return res;
b89cfd86e18e patch 9.0.1166: code is indented more than necessary Bram Moolenaar <Bram@vim.org> parents: 31600 diff changeset	162
b89cfd86e18e patch 9.0.1166: code is indented more than necessary Bram Moolenaar <Bram@vim.org> parents: 31600 diff changeset	163 vimconv_T vimconv;
19920 5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	164
31667 b89cfd86e18e patch 9.0.1166: code is indented more than necessary Bram Moolenaar <Bram@vim.org> parents: 31600 diff changeset	165 vimconv.vc_type = CONV_NONE;
b89cfd86e18e patch 9.0.1166: code is indented more than necessary Bram Moolenaar <Bram@vim.org> parents: 31600 diff changeset	166 if (convert_setup(&vimconv, client_enc, p_enc) != FAIL
b89cfd86e18e patch 9.0.1166: code is indented more than necessary Bram Moolenaar <Bram@vim.org> parents: 31600 diff changeset	167 && vimconv.vc_type != CONV_NONE)
b89cfd86e18e patch 9.0.1166: code is indented more than necessary Bram Moolenaar <Bram@vim.org> parents: 31600 diff changeset	168 {
b89cfd86e18e patch 9.0.1166: code is indented more than necessary Bram Moolenaar <Bram@vim.org> parents: 31600 diff changeset	169 res = string_convert(&vimconv, data, NULL);
b89cfd86e18e patch 9.0.1166: code is indented more than necessary Bram Moolenaar <Bram@vim.org> parents: 31600 diff changeset	170 if (res == NULL)
b89cfd86e18e patch 9.0.1166: code is indented more than necessary Bram Moolenaar <Bram@vim.org> parents: 31600 diff changeset	171 res = data;
b89cfd86e18e patch 9.0.1166: code is indented more than necessary Bram Moolenaar <Bram@vim.org> parents: 31600 diff changeset	172 else
b89cfd86e18e patch 9.0.1166: code is indented more than necessary Bram Moolenaar <Bram@vim.org> parents: 31600 diff changeset	173 *tofree = res;
19920 5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	174 }
31667 b89cfd86e18e patch 9.0.1166: code is indented more than necessary Bram Moolenaar <Bram@vim.org> parents: 31600 diff changeset	175 convert_setup(&vimconv, NULL, NULL);
19920 5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	176 return res;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	177 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	178 #endif
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	179
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	180 #if (defined(FEAT_CLIENTSERVER) && !defined(NO_VIM_MAIN)) \|\| defined(PROTO)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	181
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	182 /*
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	183 * Common code for the X command server and the Win32 command server.
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	184 */
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	185
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	186 static char_u build_drop_cmd(int filec, char *filev, int tabs, int sendReply);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	187
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	188 /*
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	189 * Do the client-server stuff, unless "--servername ''" was used.
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	190 */
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	191 void
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	192 exec_on_server(mparm_T *parmp)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	193 {
31600 f1d5ad2b978e patch 9.0.1132: code is indented more than needed Bram Moolenaar <Bram@vim.org> parents: 31287 diff changeset	194 if (parmp->serverName_arg != NULL && *parmp->serverName_arg == NUL)
f1d5ad2b978e patch 9.0.1132: code is indented more than needed Bram Moolenaar <Bram@vim.org> parents: 31287 diff changeset	195 return;
f1d5ad2b978e patch 9.0.1132: code is indented more than needed Bram Moolenaar <Bram@vim.org> parents: 31287 diff changeset	196
19920 5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	197 # ifdef MSWIN
31600 f1d5ad2b978e patch 9.0.1132: code is indented more than needed Bram Moolenaar <Bram@vim.org> parents: 31287 diff changeset	198 // Initialise the client/server messaging infrastructure.
f1d5ad2b978e patch 9.0.1132: code is indented more than needed Bram Moolenaar <Bram@vim.org> parents: 31287 diff changeset	199 serverInitMessaging();
19920 5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	200 # endif
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	201
31600 f1d5ad2b978e patch 9.0.1132: code is indented more than needed Bram Moolenaar <Bram@vim.org> parents: 31287 diff changeset	202 /*
f1d5ad2b978e patch 9.0.1132: code is indented more than needed Bram Moolenaar <Bram@vim.org> parents: 31287 diff changeset	203 * When a command server argument was found, execute it. This may
f1d5ad2b978e patch 9.0.1132: code is indented more than needed Bram Moolenaar <Bram@vim.org> parents: 31287 diff changeset	204 * exit Vim when it was successful. Otherwise it's executed further
f1d5ad2b978e patch 9.0.1132: code is indented more than needed Bram Moolenaar <Bram@vim.org> parents: 31287 diff changeset	205 * on. Remember the encoding used here in "serverStrEnc".
f1d5ad2b978e patch 9.0.1132: code is indented more than needed Bram Moolenaar <Bram@vim.org> parents: 31287 diff changeset	206 */
f1d5ad2b978e patch 9.0.1132: code is indented more than needed Bram Moolenaar <Bram@vim.org> parents: 31287 diff changeset	207 if (parmp->serverArg)
f1d5ad2b978e patch 9.0.1132: code is indented more than needed Bram Moolenaar <Bram@vim.org> parents: 31287 diff changeset	208 {
f1d5ad2b978e patch 9.0.1132: code is indented more than needed Bram Moolenaar <Bram@vim.org> parents: 31287 diff changeset	209 cmdsrv_main(&parmp->argc, parmp->argv,
f1d5ad2b978e patch 9.0.1132: code is indented more than needed Bram Moolenaar <Bram@vim.org> parents: 31287 diff changeset	210 parmp->serverName_arg, &parmp->serverStr);
f1d5ad2b978e patch 9.0.1132: code is indented more than needed Bram Moolenaar <Bram@vim.org> parents: 31287 diff changeset	211 parmp->serverStrEnc = vim_strsave(p_enc);
f1d5ad2b978e patch 9.0.1132: code is indented more than needed Bram Moolenaar <Bram@vim.org> parents: 31287 diff changeset	212 }
19920 5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	213
31600 f1d5ad2b978e patch 9.0.1132: code is indented more than needed Bram Moolenaar <Bram@vim.org> parents: 31287 diff changeset	214 // If we're still running, get the name to register ourselves.
f1d5ad2b978e patch 9.0.1132: code is indented more than needed Bram Moolenaar <Bram@vim.org> parents: 31287 diff changeset	215 // On Win32 can register right now, for X11 need to setup the
f1d5ad2b978e patch 9.0.1132: code is indented more than needed Bram Moolenaar <Bram@vim.org> parents: 31287 diff changeset	216 // clipboard first, it's further down.
f1d5ad2b978e patch 9.0.1132: code is indented more than needed Bram Moolenaar <Bram@vim.org> parents: 31287 diff changeset	217 parmp->servername = serverMakeName(parmp->serverName_arg,
f1d5ad2b978e patch 9.0.1132: code is indented more than needed Bram Moolenaar <Bram@vim.org> parents: 31287 diff changeset	218 parmp->argv[0]);
19920 5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	219 # ifdef MSWIN
31600 f1d5ad2b978e patch 9.0.1132: code is indented more than needed Bram Moolenaar <Bram@vim.org> parents: 31287 diff changeset	220 if (parmp->servername != NULL)
f1d5ad2b978e patch 9.0.1132: code is indented more than needed Bram Moolenaar <Bram@vim.org> parents: 31287 diff changeset	221 {
f1d5ad2b978e patch 9.0.1132: code is indented more than needed Bram Moolenaar <Bram@vim.org> parents: 31287 diff changeset	222 serverSetName(parmp->servername);
f1d5ad2b978e patch 9.0.1132: code is indented more than needed Bram Moolenaar <Bram@vim.org> parents: 31287 diff changeset	223 vim_free(parmp->servername);
f1d5ad2b978e patch 9.0.1132: code is indented more than needed Bram Moolenaar <Bram@vim.org> parents: 31287 diff changeset	224 }
19920 5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	225 # endif
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	226 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	227
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	228 /*
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	229 * Prepare for running as a Vim server.
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	230 */
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	231 void
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	232 prepare_server(mparm_T *parmp)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	233 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	234 # if defined(FEAT_X11)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	235 /*
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	236 * Register for remote command execution with :serversend and --remote
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	237 * unless there was a -X or a --servername '' on the command line.
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	238 * Only register nongui-vim's with an explicit --servername argument,
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	239 * or when compiling with autoservername.
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	240 * When running as root --servername is also required.
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	241 */
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	242 if (X_DISPLAY != NULL && parmp->servername != NULL && (
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	243 # if defined(FEAT_AUTOSERVERNAME) \|\| defined(FEAT_GUI)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	244 (
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	245 # if defined(FEAT_AUTOSERVERNAME)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	246 1
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	247 # else
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	248 gui.in_use
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	249 # endif
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	250 # ifdef UNIX
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	251 && getuid() != ROOT_UID
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	252 # endif
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	253 ) \|\|
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	254 # endif
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	255 parmp->serverName_arg != NULL))
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	256 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	257 (void)serverRegisterName(X_DISPLAY, parmp->servername);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	258 vim_free(parmp->servername);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	259 TIME_MSG("register server name");
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	260 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	261 else
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	262 serverDelayedStartName = parmp->servername;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	263 # endif
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	264
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	265 /*
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	266 * Execute command ourselves if we're here because the send failed (or
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	267 * else we would have exited above).
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	268 */
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	269 if (parmp->serverStr != NULL)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	270 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	271 char_u *p;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	272
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	273 server_to_input_buf(serverConvert(parmp->serverStrEnc,
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	274 parmp->serverStr, &p));
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	275 vim_free(p);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	276 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	277 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	278
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	279 static void
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	280 cmdsrv_main(
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	281 int *argc,
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	282 char **argv,
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	283 char_u *serverName_arg,
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	284 char_u **serverStr)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	285 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	286 char_u *res;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	287 int i;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	288 char_u *sname;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	289 int ret;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	290 int didone = FALSE;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	291 int exiterr = 0;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	292 char **newArgV = argv + 1;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	293 int newArgC = 1,
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	294 Argc = *argc;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	295 int argtype;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	296 #define ARGTYPE_OTHER 0
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	297 #define ARGTYPE_EDIT 1
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	298 #define ARGTYPE_EDIT_WAIT 2
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	299 #define ARGTYPE_SEND 3
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	300 int silent = FALSE;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	301 int tabs = FALSE;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	302 # ifndef FEAT_X11
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	303 HWND srv;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	304 # else
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	305 Window srv;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	306
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	307 setup_term_clip();
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	308 # endif
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	309
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	310 sname = serverMakeName(serverName_arg, argv[0]);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	311 if (sname == NULL)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	312 return;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	313
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	314 /*
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	315 * Execute the command server related arguments and remove them
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	316 * from the argc/argv array; We may have to return into main()
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	317 */
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	318 for (i = 1; i < Argc; i++)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	319 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	320 res = NULL;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	321 if (STRCMP(argv[i], "--") == 0) // end of option arguments
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	322 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	323 for (; i < *argc; i++)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	324 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	325 *newArgV++ = argv[i];
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	326 newArgC++;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	327 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	328 break;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	329 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	330
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	331 if (STRICMP(argv[i], "--remote-send") == 0)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	332 argtype = ARGTYPE_SEND;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	333 else if (STRNICMP(argv[i], "--remote", 8) == 0)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	334 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	335 char *p = argv[i] + 8;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	336
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	337 argtype = ARGTYPE_EDIT;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	338 while (*p != NUL)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	339 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	340 if (STRNICMP(p, "-wait", 5) == 0)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	341 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	342 argtype = ARGTYPE_EDIT_WAIT;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	343 p += 5;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	344 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	345 else if (STRNICMP(p, "-silent", 7) == 0)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	346 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	347 silent = TRUE;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	348 p += 7;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	349 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	350 else if (STRNICMP(p, "-tab", 4) == 0)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	351 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	352 tabs = TRUE;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	353 p += 4;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	354 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	355 else
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	356 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	357 argtype = ARGTYPE_OTHER;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	358 break;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	359 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	360 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	361 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	362 else
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	363 argtype = ARGTYPE_OTHER;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	364
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	365 if (argtype != ARGTYPE_OTHER)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	366 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	367 if (i == *argc - 1)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	368 mainerr_arg_missing((char_u *)argv[i]);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	369 if (argtype == ARGTYPE_SEND)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	370 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	371 serverStr = (char_u )argv[i + 1];
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	372 i++;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	373 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	374 else
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	375 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	376 serverStr = build_drop_cmd(argc - i - 1, argv + i + 1,
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	377 tabs, argtype == ARGTYPE_EDIT_WAIT);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	378 if (*serverStr == NULL)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	379 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	380 // Probably out of memory, exit.
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	381 didone = TRUE;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	382 exiterr = 1;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	383 break;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	384 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	385 Argc = i;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	386 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	387 # ifdef FEAT_X11
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	388 if (xterm_dpy == NULL)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	389 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	390 mch_errmsg(_("No display"));
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	391 ret = -1;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	392 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	393 else
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	394 ret = serverSendToVim(xterm_dpy, sname, *serverStr,
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	395 NULL, &srv, 0, 0, 0, silent);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	396 # else
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	397 // Win32 always works?
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	398 ret = serverSendToVim(sname, *serverStr, NULL, &srv, 0, 0, silent);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	399 # endif
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	400 if (ret < 0)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	401 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	402 if (argtype == ARGTYPE_SEND)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	403 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	404 // Failed to send, abort.
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	405 mch_errmsg(_(": Send failed.\n"));
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	406 didone = TRUE;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	407 exiterr = 1;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	408 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	409 else if (!silent)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	410 // Let vim start normally.
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	411 mch_errmsg(_(": Send failed. Trying to execute locally\n"));
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	412 break;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	413 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	414
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	415 # ifdef FEAT_GUI_MSWIN
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	416 // Guess that when the server name starts with "g" it's a GUI
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	417 // server, which we can bring to the foreground here.
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	418 // Foreground() in the server doesn't work very well.
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	419 if (argtype != ARGTYPE_SEND && TOUPPER_ASC(*sname) == 'G')
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	420 SetForegroundWindow(srv);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	421 # endif
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	422
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	423 /*
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	424 * For --remote-wait: Wait until the server did edit each
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	425 * file. Also detect that the server no longer runs.
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	426 */
28169 bef82285dda0 patch 8.2.4610: some conditions are always true Bram Moolenaar <Bram@vim.org> parents: 28162 diff changeset	427 if (argtype == ARGTYPE_EDIT_WAIT)
19920 5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	428 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	429 int numFiles = *argc - i - 1;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	430 char_u *done = alloc(numFiles);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	431 # ifdef FEAT_GUI_MSWIN
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	432 NOTIFYICONDATA ni;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	433 int count = 0;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	434 extern HWND message_window;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	435 # endif
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	436
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	437 if (numFiles > 0 && argv[i + 1][0] == '+')
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	438 // Skip "+cmd" argument, don't wait for it to be edited.
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	439 --numFiles;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	440
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	441 # ifdef FEAT_GUI_MSWIN
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	442 ni.cbSize = sizeof(ni);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	443 ni.hWnd = message_window;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	444 ni.uID = 0;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	445 ni.uFlags = NIF_ICON\|NIF_TIP;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	446 ni.hIcon = LoadIcon((HINSTANCE)GetModuleHandle(0), "IDR_VIM");
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	447 sprintf(ni.szTip, _("%d of %d edited"), count, numFiles);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	448 Shell_NotifyIcon(NIM_ADD, &ni);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	449 # endif
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	450
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	451 // Wait for all files to unload in remote
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	452 vim_memset(done, 0, numFiles);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	453 while (memchr(done, 0, numFiles) != NULL)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	454 {
30154 9137d2bc93bf patch 9.0.0413: ASAN reports a memory leak Bram Moolenaar <Bram@vim.org> parents: 28169 diff changeset	455 char_u *p;
9137d2bc93bf patch 9.0.0413: ASAN reports a memory leak Bram Moolenaar <Bram@vim.org> parents: 28169 diff changeset	456 int j;
19920 5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	457 # ifdef MSWIN
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	458 p = serverGetReply(srv, NULL, TRUE, TRUE, 0);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	459 if (p == NULL)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	460 break;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	461 # else
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	462 if (serverReadReply(xterm_dpy, srv, &p, TRUE, -1) < 0)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	463 break;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	464 # endif
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	465 j = atoi((char *)p);
30154 9137d2bc93bf patch 9.0.0413: ASAN reports a memory leak Bram Moolenaar <Bram@vim.org> parents: 28169 diff changeset	466 vim_free(p);
19920 5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	467 if (j >= 0 && j < numFiles)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	468 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	469 # ifdef FEAT_GUI_MSWIN
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	470 ++count;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	471 sprintf(ni.szTip, _("%d of %d edited"),
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	472 count, numFiles);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	473 Shell_NotifyIcon(NIM_MODIFY, &ni);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	474 # endif
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	475 done[j] = 1;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	476 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	477 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	478 # ifdef FEAT_GUI_MSWIN
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	479 Shell_NotifyIcon(NIM_DELETE, &ni);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	480 # endif
20174 72b437855299 patch 8.2.0642: Vim9: using invalid index Bram Moolenaar <Bram@vim.org> parents: 19920 diff changeset	481 vim_free(done);
19920 5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	482 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	483 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	484 else if (STRICMP(argv[i], "--remote-expr") == 0)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	485 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	486 if (i == *argc - 1)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	487 mainerr_arg_missing((char_u *)argv[i]);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	488 # ifdef MSWIN
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	489 // Win32 always works?
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	490 if (serverSendToVim(sname, (char_u *)argv[i + 1],
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	491 &res, NULL, 1, 0, FALSE) < 0)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	492 # else
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	493 if (xterm_dpy == NULL)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	494 mch_errmsg(_("No display: Send expression failed.\n"));
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	495 else if (serverSendToVim(xterm_dpy, sname, (char_u *)argv[i + 1],
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	496 &res, NULL, 1, 0, 1, FALSE) < 0)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	497 # endif
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	498 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	499 if (res != NULL && *res != NUL)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	500 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	501 // Output error from remote
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	502 mch_errmsg((char *)res);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	503 VIM_CLEAR(res);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	504 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	505 mch_errmsg(_(": Send expression failed.\n"));
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	506 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	507 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	508 else if (STRICMP(argv[i], "--serverlist") == 0)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	509 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	510 # ifdef MSWIN
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	511 // Win32 always works?
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	512 res = serverGetVimNames();
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	513 # else
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	514 if (xterm_dpy != NULL)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	515 res = serverGetVimNames(xterm_dpy);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	516 # endif
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	517 if (did_emsg)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	518 mch_errmsg("\n");
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	519 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	520 else if (STRICMP(argv[i], "--servername") == 0)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	521 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	522 // Already processed. Take it out of the command line
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	523 i++;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	524 continue;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	525 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	526 else
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	527 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	528 *newArgV++ = argv[i];
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	529 newArgC++;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	530 continue;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	531 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	532 didone = TRUE;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	533 if (res != NULL && *res != NUL)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	534 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	535 mch_msg((char *)res);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	536 if (res[STRLEN(res) - 1] != '\n')
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	537 mch_msg("\n");
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	538 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	539 vim_free(res);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	540 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	541
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	542 if (didone)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	543 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	544 display_errors(); // display any collected messages
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	545 exit(exiterr); // Mission accomplished - get out
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	546 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	547
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	548 // Return back into main()
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	549 *argc = newArgC;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	550 vim_free(sname);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	551 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	552
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	553 /*
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	554 * Build a ":drop" command to send to a Vim server.
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	555 */
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	556 static char_u *
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	557 build_drop_cmd(
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	558 int filec,
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	559 char **filev,
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	560 int tabs, // Use ":tab drop" instead of ":drop".
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	561 int sendReply)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	562 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	563 garray_T ga;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	564 int i;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	565 char_u *inicmd = NULL;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	566 char_u *p;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	567 char_u *cdp;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	568 char_u *cwd;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	569
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	570 if (filec > 0 && filev[0][0] == '+')
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	571 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	572 inicmd = (char_u *)filev[0] + 1;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	573 filev++;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	574 filec--;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	575 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	576 // Check if we have at least one argument.
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	577 if (filec <= 0)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	578 mainerr_arg_missing((char_u *)filev[-1]);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	579
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	580 // Temporarily cd to the current directory to handle relative file names.
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	581 cwd = alloc(MAXPATHL);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	582 if (cwd == NULL)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	583 return NULL;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	584 if (mch_dirname(cwd, MAXPATHL) != OK)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	585 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	586 vim_free(cwd);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	587 return NULL;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	588 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	589 cdp = vim_strsave_escaped_ext(cwd,
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	590 #ifdef BACKSLASH_IN_FILENAME
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	591 (char_u *)"", // rem_backslash() will tell what chars to escape
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	592 #else
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	593 PATH_ESC_CHARS,
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	594 #endif
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	595 '\\', TRUE);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	596 vim_free(cwd);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	597 if (cdp == NULL)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	598 return NULL;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	599 ga_init2(&ga, 1, 100);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	600 ga_concat(&ga, (char_u *)"<C-\\><C-N>:cd ");
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	601 ga_concat(&ga, cdp);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	602
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	603 // Call inputsave() so that a prompt for an encryption key works.
21723 5b0796787cb2 patch 8.2.1411: when splitting a window localdir is copied but prevdir is not Bram Moolenaar <Bram@vim.org> parents: 20996 diff changeset	604 ga_concat(&ga, (char_u *)
5b0796787cb2 patch 8.2.1411: when splitting a window localdir is copied but prevdir is not Bram Moolenaar <Bram@vim.org> parents: 20996 diff changeset	605 "<CR>:if exists('*inputsave')\|call inputsave()\|endif\|");
19920 5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	606 if (tabs)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	607 ga_concat(&ga, (char_u *)"tab ");
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	608 ga_concat(&ga, (char_u *)"drop");
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	609 for (i = 0; i < filec; i++)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	610 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	611 // On Unix the shell has already expanded the wildcards, don't want to
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	612 // do it again in the Vim server. On MS-Windows only escape
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	613 // non-wildcard characters.
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	614 p = vim_strsave_escaped((char_u *)filev[i],
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	615 #ifdef UNIX
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	616 PATH_ESC_CHARS
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	617 #else
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	618 (char_u *)" \t%#"
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	619 #endif
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	620 );
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	621 if (p == NULL)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	622 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	623 vim_free(ga.ga_data);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	624 return NULL;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	625 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	626 ga_concat(&ga, (char_u *)" ");
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	627 ga_concat(&ga, p);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	628 vim_free(p);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	629 }
21723 5b0796787cb2 patch 8.2.1411: when splitting a window localdir is copied but prevdir is not Bram Moolenaar <Bram@vim.org> parents: 20996 diff changeset	630 ga_concat(&ga, (char_u *)
5b0796787cb2 patch 8.2.1411: when splitting a window localdir is copied but prevdir is not Bram Moolenaar <Bram@vim.org> parents: 20996 diff changeset	631 "\|if exists('*inputrestore')\|call inputrestore()\|endif<CR>");
19920 5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	632
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	633 // The :drop commands goes to Insert mode when 'insertmode' is set, use
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	634 // CTRL-\ CTRL-N again.
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	635 ga_concat(&ga, (char_u *)"<C-\\><C-N>");
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	636
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	637 // Switch back to the correct current directory (prior to temporary path
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	638 // switch) unless 'autochdir' is set, in which case it will already be
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	639 // correct after the :drop command. With line breaks and spaces:
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	640 // if !exists('+acd') \|\| !&acd
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	641 // if haslocaldir()
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	642 // cd -
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	643 // lcd -
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	644 // elseif getcwd() ==# 'current path'
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	645 // cd -
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	646 // endif
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	647 // endif
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	648 ga_concat(&ga, (char_u *)":if !exists('+acd')\|\|!&acd\|if haslocaldir()\|");
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	649 ga_concat(&ga, (char_u *)"cd -\|lcd -\|elseif getcwd() ==# '");
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	650 ga_concat(&ga, cdp);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	651 ga_concat(&ga, (char_u *)"'\|cd -\|endif\|endif<CR>");
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	652 vim_free(cdp);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	653
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	654 if (sendReply)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	655 ga_concat(&ga, (char_u *)":call SetupRemoteReplies()<CR>");
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	656 ga_concat(&ga, (char_u *)":");
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	657 if (inicmd != NULL)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	658 {
27583 d4921b91542c patch 8.2.4318: various comment and indent mistakes, returning wrong zero Bram Moolenaar <Bram@vim.org> parents: 27426 diff changeset	659 // Can't use <CR> after "inicmd", because a "startinsert" would cause
19920 5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	660 // the following commands to be inserted as text. Use a "\|",
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	661 // hopefully "inicmd" does allow this...
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	662 ga_concat(&ga, inicmd);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	663 ga_concat(&ga, (char_u *)"\|");
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	664 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	665 // Bring the window to the foreground, goto Insert mode when 'im' set and
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	666 // clear command line.
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	667 ga_concat(&ga, (char_u *)"cal foreground()\|if &im\|star\|en\|redr\|f<CR>");
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	668 ga_append(&ga, NUL);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	669 return ga.ga_data;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	670 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	671
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	672 /*
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	673 * Make our basic server name: use the specified "arg" if given, otherwise use
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	674 * the tail of the command "cmd" we were started with.
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	675 * Return the name in allocated memory. This doesn't include a serial number.
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	676 */
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	677 static char_u *
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	678 serverMakeName(char_u arg, char cmd)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	679 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	680 char_u *p;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	681
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	682 if (arg != NULL && *arg != NUL)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	683 p = vim_strsave_up(arg);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	684 else
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	685 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	686 p = vim_strsave_up(gettail((char_u *)cmd));
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	687 // Remove .exe or .bat from the name.
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	688 if (p != NULL && vim_strchr(p, '.') != NULL)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	689 *vim_strchr(p, '.') = NUL;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	690 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	691 return p;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	692 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	693 #endif // FEAT_CLIENTSERVER
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	694
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	695 #if defined(FEAT_CLIENTSERVER) && defined(FEAT_X11)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	696 static void
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	697 make_connection(void)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	698 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	699 if (X_DISPLAY == NULL
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	700 # ifdef FEAT_GUI
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	701 && !gui.in_use
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	702 # endif
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	703 )
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	704 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	705 x_force_connect = TRUE;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	706 setup_term_clip();
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	707 x_force_connect = FALSE;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	708 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	709 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	710
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	711 static int
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	712 check_connection(void)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	713 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	714 make_connection();
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	715 if (X_DISPLAY == NULL)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	716 {
26893 79c76ca2c53c patch 8.2.3975: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 26883 diff changeset	717 emsg(_(e_no_connection_to_x_server));
19920 5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	718 return FAIL;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	719 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	720 return OK;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	721 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	722 #endif
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	723
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	724 #ifdef FEAT_CLIENTSERVER
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	725 static void
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	726 remote_common(typval_T argvars, typval_T rettv, int expr)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	727 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	728 char_u *server_name;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	729 char_u *keys;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	730 char_u *r = NULL;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	731 char_u buf[NUMBUFLEN];
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	732 int timeout = 0;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	733 # ifdef MSWIN
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	734 HWND w;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	735 # else
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	736 Window w;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	737 # endif
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	738
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	739 if (check_restricted() \|\| check_secure())
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	740 return;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	741
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	742 # ifdef FEAT_X11
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	743 if (check_connection() == FAIL)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	744 return;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	745 # endif
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	746 if (argvars[2].v_type != VAR_UNKNOWN
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	747 && argvars[3].v_type != VAR_UNKNOWN)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	748 timeout = tv_get_number(&argvars[3]);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	749
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	750 server_name = tv_get_string_chk(&argvars[0]);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	751 if (server_name == NULL)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	752 return; // type error; errmsg already given
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	753 keys = tv_get_string_buf(&argvars[1], buf);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	754 # ifdef MSWIN
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	755 if (serverSendToVim(server_name, keys, &r, &w, expr, timeout, TRUE) < 0)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	756 # else
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	757 if (serverSendToVim(X_DISPLAY, server_name, keys, &r, &w, expr, timeout,
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	758 0, TRUE) < 0)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	759 # endif
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	760 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	761 if (r != NULL)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	762 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	763 emsg((char *)r); // sending worked but evaluation failed
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	764 vim_free(r);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	765 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	766 else
26893 79c76ca2c53c patch 8.2.3975: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 26883 diff changeset	767 semsg(_(e_unable_to_send_to_str), server_name);
19920 5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	768 return;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	769 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	770
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	771 rettv->vval.v_string = r;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	772
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	773 if (argvars[2].v_type != VAR_UNKNOWN)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	774 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	775 dictitem_T v;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	776 char_u str[30];
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	777 char_u *idvar;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	778
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	779 idvar = tv_get_string_chk(&argvars[2]);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	780 if (idvar != NULL && *idvar != NUL)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	781 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	782 sprintf((char *)str, PRINTF_HEX_LONG_U, (long_u)w);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	783 v.di_tv.v_type = VAR_STRING;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	784 v.di_tv.vval.v_string = vim_strsave(str);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	785 set_var(idvar, &v.di_tv, FALSE);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	786 vim_free(v.di_tv.vval.v_string);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	787 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	788 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	789 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	790 #endif
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	791
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	792 #if defined(FEAT_EVAL) \|\| defined(PROTO)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	793 /*
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	794 * "remote_expr()" function
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	795 */
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	796 void
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	797 f_remote_expr(typval_T argvars UNUSED, typval_T rettv)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	798 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	799 rettv->v_type = VAR_STRING;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	800 rettv->vval.v_string = NULL;
25302 4d3c68196d05 patch 8.2.3188: Vim9: argument types are not checked at compile time Bram Moolenaar <Bram@vim.org> parents: 25252 diff changeset	801
28162 6e431b1c51d5 patch 8.2.4606: test fails because of changed error message Bram Moolenaar <Bram@vim.org> parents: 27583 diff changeset	802 #ifdef FEAT_CLIENTSERVER
25302 4d3c68196d05 patch 8.2.3188: Vim9: argument types are not checked at compile time Bram Moolenaar <Bram@vim.org> parents: 25252 diff changeset	803 if (in_vim9script()
4d3c68196d05 patch 8.2.3188: Vim9: argument types are not checked at compile time Bram Moolenaar <Bram@vim.org> parents: 25252 diff changeset	804 && (check_for_string_arg(argvars, 0) == FAIL
4d3c68196d05 patch 8.2.3188: Vim9: argument types are not checked at compile time Bram Moolenaar <Bram@vim.org> parents: 25252 diff changeset	805 \|\| check_for_string_arg(argvars, 1) == FAIL
4d3c68196d05 patch 8.2.3188: Vim9: argument types are not checked at compile time Bram Moolenaar <Bram@vim.org> parents: 25252 diff changeset	806 \|\| check_for_opt_string_arg(argvars, 2) == FAIL
4d3c68196d05 patch 8.2.3188: Vim9: argument types are not checked at compile time Bram Moolenaar <Bram@vim.org> parents: 25252 diff changeset	807 \|\| (argvars[2].v_type != VAR_UNKNOWN
4d3c68196d05 patch 8.2.3188: Vim9: argument types are not checked at compile time Bram Moolenaar <Bram@vim.org> parents: 25252 diff changeset	808 && check_for_opt_number_arg(argvars, 3) == FAIL)))
4d3c68196d05 patch 8.2.3188: Vim9: argument types are not checked at compile time Bram Moolenaar <Bram@vim.org> parents: 25252 diff changeset	809 return;
4d3c68196d05 patch 8.2.3188: Vim9: argument types are not checked at compile time Bram Moolenaar <Bram@vim.org> parents: 25252 diff changeset	810
19920 5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	811 remote_common(argvars, rettv, TRUE);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	812 #endif
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	813 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	814
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	815 /*
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	816 * "remote_foreground()" function
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	817 */
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	818 void
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	819 f_remote_foreground(typval_T argvars UNUSED, typval_T rettv UNUSED)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	820 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	821 #ifdef FEAT_CLIENTSERVER
25384 e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same Bram Moolenaar <Bram@vim.org> parents: 25302 diff changeset	822 if (in_vim9script() && check_for_string_arg(argvars, 0) == FAIL)
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same Bram Moolenaar <Bram@vim.org> parents: 25302 diff changeset	823 return;
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same Bram Moolenaar <Bram@vim.org> parents: 25302 diff changeset	824
19920 5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	825 # ifdef MSWIN
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	826 // On Win32 it's done in this application.
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	827 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	828 char_u *server_name = tv_get_string_chk(&argvars[0]);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	829
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	830 if (server_name != NULL)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	831 serverForeground(server_name);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	832 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	833 # else
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	834 // Send a foreground() expression to the server.
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	835 argvars[1].v_type = VAR_STRING;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	836 argvars[1].vval.v_string = vim_strsave((char_u *)"foreground()");
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	837 argvars[2].v_type = VAR_UNKNOWN;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	838 rettv->v_type = VAR_STRING;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	839 rettv->vval.v_string = NULL;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	840 remote_common(argvars, rettv, TRUE);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	841 vim_free(argvars[1].vval.v_string);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	842 # endif
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	843 #endif
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	844 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	845
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	846 void
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	847 f_remote_peek(typval_T argvars UNUSED, typval_T rettv)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	848 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	849 #ifdef FEAT_CLIENTSERVER
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	850 dictitem_T v;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	851 char_u *s = NULL;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	852 # ifdef MSWIN
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	853 long_u n = 0;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	854 # endif
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	855 char_u *serverid;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	856
25384 e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same Bram Moolenaar <Bram@vim.org> parents: 25302 diff changeset	857 rettv->vval.v_number = -1;
19920 5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	858 if (check_restricted() \|\| check_secure())
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	859 return;
25384 e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same Bram Moolenaar <Bram@vim.org> parents: 25302 diff changeset	860
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same Bram Moolenaar <Bram@vim.org> parents: 25302 diff changeset	861 if (in_vim9script()
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same Bram Moolenaar <Bram@vim.org> parents: 25302 diff changeset	862 && (check_for_string_arg(argvars, 0) == FAIL
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same Bram Moolenaar <Bram@vim.org> parents: 25302 diff changeset	863 \|\| check_for_opt_string_arg(argvars, 1) == FAIL))
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same Bram Moolenaar <Bram@vim.org> parents: 25302 diff changeset	864 return;
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same Bram Moolenaar <Bram@vim.org> parents: 25302 diff changeset	865
19920 5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	866 serverid = tv_get_string_chk(&argvars[0]);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	867 if (serverid == NULL)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	868 return; // type error; errmsg already given
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	869 # ifdef MSWIN
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	870 sscanf((const char *)serverid, SCANF_HEX_LONG_U, &n);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	871 if (n == 0)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	872 rettv->vval.v_number = -1;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	873 else
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	874 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	875 s = serverGetReply((HWND)n, FALSE, FALSE, FALSE, 0);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	876 rettv->vval.v_number = (s != NULL);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	877 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	878 # else
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	879 if (check_connection() == FAIL)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	880 return;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	881
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	882 rettv->vval.v_number = serverPeekReply(X_DISPLAY,
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	883 serverStrToWin(serverid), &s);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	884 # endif
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	885
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	886 if (argvars[1].v_type != VAR_UNKNOWN && rettv->vval.v_number > 0)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	887 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	888 char_u *retvar;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	889
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	890 v.di_tv.v_type = VAR_STRING;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	891 v.di_tv.vval.v_string = vim_strsave(s);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	892 retvar = tv_get_string_chk(&argvars[1]);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	893 if (retvar != NULL)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	894 set_var(retvar, &v.di_tv, FALSE);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	895 vim_free(v.di_tv.vval.v_string);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	896 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	897 #else
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	898 rettv->vval.v_number = -1;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	899 #endif
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	900 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	901
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	902 void
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	903 f_remote_read(typval_T argvars UNUSED, typval_T rettv)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	904 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	905 char_u *r = NULL;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	906
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	907 #ifdef FEAT_CLIENTSERVER
25252 acda780ffc3e patch 8.2.3162: Vim9: argument types are not checked at compile time Bram Moolenaar <Bram@vim.org> parents: 21723 diff changeset	908 char_u *serverid;
19920 5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	909
25252 acda780ffc3e patch 8.2.3162: Vim9: argument types are not checked at compile time Bram Moolenaar <Bram@vim.org> parents: 21723 diff changeset	910 if (in_vim9script()
acda780ffc3e patch 8.2.3162: Vim9: argument types are not checked at compile time Bram Moolenaar <Bram@vim.org> parents: 21723 diff changeset	911 && (check_for_string_arg(argvars, 0) == FAIL
25302 4d3c68196d05 patch 8.2.3188: Vim9: argument types are not checked at compile time Bram Moolenaar <Bram@vim.org> parents: 25252 diff changeset	912 \|\| check_for_opt_number_arg(argvars, 1) == FAIL))
25252 acda780ffc3e patch 8.2.3162: Vim9: argument types are not checked at compile time Bram Moolenaar <Bram@vim.org> parents: 21723 diff changeset	913 return;
acda780ffc3e patch 8.2.3162: Vim9: argument types are not checked at compile time Bram Moolenaar <Bram@vim.org> parents: 21723 diff changeset	914
acda780ffc3e patch 8.2.3162: Vim9: argument types are not checked at compile time Bram Moolenaar <Bram@vim.org> parents: 21723 diff changeset	915 serverid = tv_get_string_chk(&argvars[0]);
19920 5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	916 if (serverid != NULL && !check_restricted() && !check_secure())
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	917 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	918 int timeout = 0;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	919 # ifdef MSWIN
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	920 // The server's HWND is encoded in the 'id' parameter
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	921 long_u n = 0;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	922 # endif
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	923
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	924 if (argvars[1].v_type != VAR_UNKNOWN)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	925 timeout = tv_get_number(&argvars[1]);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	926
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	927 # ifdef MSWIN
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	928 sscanf((char *)serverid, SCANF_HEX_LONG_U, &n);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	929 if (n != 0)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	930 r = serverGetReply((HWND)n, FALSE, TRUE, TRUE, timeout);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	931 if (r == NULL)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	932 # else
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	933 if (check_connection() == FAIL
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	934 \|\| serverReadReply(X_DISPLAY, serverStrToWin(serverid),
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	935 &r, FALSE, timeout) < 0)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	936 # endif
26897 d02d40f0261c patch 8.2.3977: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 26893 diff changeset	937 emsg(_(e_unable_to_read_server_reply));
19920 5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	938 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	939 #endif
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	940 rettv->v_type = VAR_STRING;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	941 rettv->vval.v_string = r;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	942 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	943
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	944 /*
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	945 * "remote_send()" function
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	946 */
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	947 void
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	948 f_remote_send(typval_T argvars UNUSED, typval_T rettv)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	949 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	950 rettv->v_type = VAR_STRING;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	951 rettv->vval.v_string = NULL;
25302 4d3c68196d05 patch 8.2.3188: Vim9: argument types are not checked at compile time Bram Moolenaar <Bram@vim.org> parents: 25252 diff changeset	952
28162 6e431b1c51d5 patch 8.2.4606: test fails because of changed error message Bram Moolenaar <Bram@vim.org> parents: 27583 diff changeset	953 #ifdef FEAT_CLIENTSERVER
25302 4d3c68196d05 patch 8.2.3188: Vim9: argument types are not checked at compile time Bram Moolenaar <Bram@vim.org> parents: 25252 diff changeset	954 if (in_vim9script()
4d3c68196d05 patch 8.2.3188: Vim9: argument types are not checked at compile time Bram Moolenaar <Bram@vim.org> parents: 25252 diff changeset	955 && (check_for_string_arg(argvars, 0) == FAIL
4d3c68196d05 patch 8.2.3188: Vim9: argument types are not checked at compile time Bram Moolenaar <Bram@vim.org> parents: 25252 diff changeset	956 \|\| check_for_string_arg(argvars, 1) == FAIL
4d3c68196d05 patch 8.2.3188: Vim9: argument types are not checked at compile time Bram Moolenaar <Bram@vim.org> parents: 25252 diff changeset	957 \|\| check_for_opt_string_arg(argvars, 2) == FAIL))
4d3c68196d05 patch 8.2.3188: Vim9: argument types are not checked at compile time Bram Moolenaar <Bram@vim.org> parents: 25252 diff changeset	958 return;
4d3c68196d05 patch 8.2.3188: Vim9: argument types are not checked at compile time Bram Moolenaar <Bram@vim.org> parents: 25252 diff changeset	959
19920 5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	960 remote_common(argvars, rettv, FALSE);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	961 #endif
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	962 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	963
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	964 /*
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	965 * "remote_startserver()" function
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	966 */
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	967 void
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	968 f_remote_startserver(typval_T argvars UNUSED, typval_T rettv UNUSED)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	969 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	970 #ifdef FEAT_CLIENTSERVER
25384 e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same Bram Moolenaar <Bram@vim.org> parents: 25302 diff changeset	971 char_u *server;
19920 5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	972
25384 e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same Bram Moolenaar <Bram@vim.org> parents: 25302 diff changeset	973 if (in_vim9script() && check_for_string_arg(argvars, 0) == FAIL)
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same Bram Moolenaar <Bram@vim.org> parents: 25302 diff changeset	974 return;
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same Bram Moolenaar <Bram@vim.org> parents: 25302 diff changeset	975
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same Bram Moolenaar <Bram@vim.org> parents: 25302 diff changeset	976 server = tv_get_string_chk(&argvars[0]);
19920 5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	977 if (server == NULL)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	978 return; // type error; errmsg already given
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	979 if (serverName != NULL)
26966 ac75c145f0a9 patch 8.2.4012: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 26897 diff changeset	980 emsg(_(e_already_started_server));
19920 5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	981 else
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	982 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	983 # ifdef FEAT_X11
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	984 if (check_connection() == OK)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	985 serverRegisterName(X_DISPLAY, server);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	986 # else
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	987 serverSetName(server);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	988 # endif
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	989 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	990 #else
26966 ac75c145f0a9 patch 8.2.4012: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 26897 diff changeset	991 emsg(_(e_clientserver_feature_not_available));
19920 5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	992 #endif
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	993 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	994
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	995 void
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	996 f_server2client(typval_T argvars UNUSED, typval_T rettv)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	997 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	998 #ifdef FEAT_CLIENTSERVER
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	999 char_u buf[NUMBUFLEN];
25384 e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same Bram Moolenaar <Bram@vim.org> parents: 25302 diff changeset	1000 char_u *server;
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same Bram Moolenaar <Bram@vim.org> parents: 25302 diff changeset	1001 char_u *reply;
19920 5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1002
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1003 rettv->vval.v_number = -1;
25384 e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same Bram Moolenaar <Bram@vim.org> parents: 25302 diff changeset	1004 if (check_restricted() \|\| check_secure())
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same Bram Moolenaar <Bram@vim.org> parents: 25302 diff changeset	1005 return;
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same Bram Moolenaar <Bram@vim.org> parents: 25302 diff changeset	1006
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same Bram Moolenaar <Bram@vim.org> parents: 25302 diff changeset	1007 if (in_vim9script()
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same Bram Moolenaar <Bram@vim.org> parents: 25302 diff changeset	1008 && (check_for_string_arg(argvars, 0) == FAIL
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same Bram Moolenaar <Bram@vim.org> parents: 25302 diff changeset	1009 \|\| check_for_string_arg(argvars, 1) == FAIL))
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same Bram Moolenaar <Bram@vim.org> parents: 25302 diff changeset	1010 return;
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same Bram Moolenaar <Bram@vim.org> parents: 25302 diff changeset	1011
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same Bram Moolenaar <Bram@vim.org> parents: 25302 diff changeset	1012 server = tv_get_string_chk(&argvars[0]);
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same Bram Moolenaar <Bram@vim.org> parents: 25302 diff changeset	1013 reply = tv_get_string_buf_chk(&argvars[1], buf);
19920 5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1014 if (server == NULL \|\| reply == NULL)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1015 return;
25384 e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same Bram Moolenaar <Bram@vim.org> parents: 25302 diff changeset	1016
19920 5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1017 # ifdef FEAT_X11
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1018 if (check_connection() == FAIL)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1019 return;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1020 # endif
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1021
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1022 if (serverSendReply(server, reply) < 0)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1023 {
26893 79c76ca2c53c patch 8.2.3975: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 26883 diff changeset	1024 emsg(_(e_unable_to_send_to_client));
19920 5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1025 return;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1026 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1027 rettv->vval.v_number = 0;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1028 #else
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1029 rettv->vval.v_number = -1;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1030 #endif
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1031 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1032
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1033 void
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1034 f_serverlist(typval_T argvars UNUSED, typval_T rettv)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1035 {
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1036 char_u *r = NULL;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1037
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1038 #ifdef FEAT_CLIENTSERVER
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1039 # ifdef MSWIN
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1040 r = serverGetVimNames();
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1041 # else
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1042 make_connection();
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1043 if (X_DISPLAY != NULL)
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1044 r = serverGetVimNames(X_DISPLAY);
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1045 # endif
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1046 #endif
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1047 rettv->v_type = VAR_STRING;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1048 rettv->vval.v_string = r;
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1049 }
5e41b2e63c73 patch 8.2.0516: client-server code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1050 #endif

Mercurial > vim

annotate src/clientserver.c @ 32268:e26c71f837f5 v9.0.1465