vim: src/quickfix.c annotate

annotate src/quickfix.c @ 14864:40ef13331e02

Update runtime files. commit https://github.com/vim/vim/commit/95bafa296ae97bf420d5c74dd6db517b404c5df7 Author: Bram Moolenaar <Bram@vim.org> Date: Tue Oct 2 13:26:25 2018 +0200 Update runtime files.

author	Christian Brabandt <cb@256bit.org>
date	Tue, 02 Oct 2018 13:30:07 +0200
parents	3c8a4b25427c
children	863bdbc8465b

rev	line source
10042 4aead6a9b7a9 commit https://github.com/vim/vim/commit/edf3f97ae2af024708ebb4ac614227327033ca47 Christian Brabandt <cb@256bit.org> parents: 9982 diff changeset	1 /* vi:set ts=8 sts=4 sw=4 noet:
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2 *
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3 * VIM - Vi IMproved by Bram Moolenaar
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4 *
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5 * Do ":help uganda" in Vim to read copying and usage conditions.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6 * Do ":help credits" in Vim to see a list of people who contributed.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	7 * See README.txt for an overview of the Vim source code.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	8 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	9
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	10 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	11 * quickfix.c: functions for quickfix mode, using a file with error messages
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	12 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	13
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	14 #include "vim.h"
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	15
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	16 #if defined(FEAT_QUICKFIX) \|\| defined(PROTO)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	17
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	18 struct dir_stack_T
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	19 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	20 struct dir_stack_T *next;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	21 char_u *dirname;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	22 };
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	23
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	24 /*
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	25 * For each error the next struct is allocated and linked in a list.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	26 */
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	27 typedef struct qfline_S qfline_T;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	28 struct qfline_S
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	29 {
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	30 qfline_T qf_next; / pointer to next error in the list */
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	31 qfline_T qf_prev; / pointer to previous error in the list */
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	32 linenr_T qf_lnum; /* line number where the error occurred */
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	33 int qf_fnum; /* file number for the line */
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	34 int qf_col; /* column where the error occurred */
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	35 int qf_nr; /* error number */
13821 98274127d675 patch 8.0.1782: no simple way to label quickfix entries Christian Brabandt <cb@256bit.org> parents: 13819 diff changeset	36 char_u qf_module; / module name for this error */
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	37 char_u qf_pattern; / search pattern for the error */
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	38 char_u qf_text; / description of the error */
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	39 char_u qf_viscol; /* set to TRUE if qf_col is screen column */
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	40 char_u qf_cleared; /* set to TRUE if line has been deleted */
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	41 char_u qf_type; /* type of the error (mostly 'E'); 1 for
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	42 :helpgrep */
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	43 char_u qf_valid; /* valid error message detected */
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	44 };
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	45
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	46 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	47 * There is a stack of error lists.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	48 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	49 #define LISTCOUNT 10
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	50 #define INVALID_QFIDX (-1)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	51
11549 f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	52 /*
f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	53 * Quickfix/Location list definition
f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	54 * Contains a list of entries (qfline_T). qf_start points to the first entry
f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	55 * and qf_last points to the last entry. qf_count contains the list size.
f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	56 *
f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	57 * Usually the list contains one or more entries. But an empty list can be
f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	58 * created using setqflist()/setloclist() with a title and/or user context
f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	59 * information and entries can be added later using setqflist()/setloclist().
f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	60 */
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	61 typedef struct qf_list_S
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	62 {
12287 20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	63 int_u qf_id; /* Unique identifier for this list */
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	64 qfline_T qf_start; / pointer to the first error */
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	65 qfline_T qf_last; / pointer to the last error */
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	66 qfline_T qf_ptr; / pointer to the current error */
11549 f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	67 int qf_count; /* number of errors (0 means empty list) */
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	68 int qf_index; /* current index in the error list */
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	69 int qf_nonevalid; /* TRUE if not a single valid entry found */
2411 68e394361ca3 Add "q" item for 'statusline'. Add w:quickfix_title. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2296 diff changeset	70 char_u qf_title; / title derived from the command that created
11549 f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	71 * the error list or set by setqflist */
11412 84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	72 typval_T qf_ctx; / context set by setqflist/setloclist */
11700 dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	73
dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	74 struct dir_stack_T *qf_dir_stack;
dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	75 char_u *qf_directory;
dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	76 struct dir_stack_T *qf_file_stack;
dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	77 char_u *qf_currfile;
dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	78 int qf_multiline;
dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	79 int qf_multiignore;
dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	80 int qf_multiscan;
13062 6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	81 long qf_changedtick;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	82 } qf_list_T;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	83
11549 f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	84 /*
f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	85 * Quickfix/Location list stack definition
f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	86 * Contains a list of quickfix/location lists (qf_list_T)
f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	87 */
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	88 struct qf_info_S
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	89 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	90 /*
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	91 * Count of references to this list. Used only for location lists.
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	92 * When a location list window reference this list, qf_refcount
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	93 * will be 2. Otherwise, qf_refcount will be 1. When qf_refcount
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	94 * reaches 0, the list is freed.
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	95 */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	96 int qf_refcount;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	97 int qf_listcount; /* current number of lists */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	98 int qf_curlist; /* current error list */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	99 qf_list_T qf_lists[LISTCOUNT];
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	100 };
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	101
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	102 static qf_info_T ql_info; /* global quickfix list */
12287 20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	103 static int_u last_qf_id = 0; /* Last used quickfix list id */
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	104
13821 98274127d675 patch 8.0.1782: no simple way to label quickfix entries Christian Brabandt <cb@256bit.org> parents: 13819 diff changeset	105 #define FMT_PATTERNS 11 /* maximum number of % recognized */
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	106
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	107 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	108 * Structure used to hold the info of one part of 'errorformat'
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	109 */
789 b29b006d52d2 updated for version 7.0230 vimboss parents: 729 diff changeset	110 typedef struct efm_S efm_T;
b29b006d52d2 updated for version 7.0230 vimboss parents: 729 diff changeset	111 struct efm_S
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	112 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	113 regprog_T prog; / pre-formatted part of 'errorformat' */
789 b29b006d52d2 updated for version 7.0230 vimboss parents: 729 diff changeset	114 efm_T next; / pointer to next (NULL if last) */
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	115 char_u addr[FMT_PATTERNS]; /* indices of used % patterns */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	116 char_u prefix; /* prefix of this format line: */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	117 /* 'D' enter directory */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	118 /* 'X' leave directory */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	119 /* 'A' start of multi-line message */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	120 /* 'E' error message */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	121 /* 'W' warning message */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	122 /* 'I' informational message */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	123 /* 'C' continuation line */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	124 /* 'Z' end of multi-line message */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	125 /* 'G' general, unspecific message */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	126 /* 'P' push file (partial) message */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	127 /* 'Q' pop/quit file (partial) message */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	128 /* 'O' overread (partial) message */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	129 char_u flags; /* additional flags given in prefix */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	130 /* '-' do not include this line */
625 81fe2ccc1207 updated for version 7.0179 vimboss parents: 581 diff changeset	131 /* '+' include whole line in message */
789 b29b006d52d2 updated for version 7.0230 vimboss parents: 729 diff changeset	132 int conthere; /* %> used */
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	133 };
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	134
10367 4e4e116e3689 commit https://github.com/vim/vim/commit/63bed3d319b5d90765dbdae93a3579b6322d79fb Christian Brabandt <cb@256bit.org> parents: 10359 diff changeset	135 static efm_T fmt_start = NULL; / cached across qf_parse_line() calls */
4e4e116e3689 commit https://github.com/vim/vim/commit/63bed3d319b5d90765dbdae93a3579b6322d79fb Christian Brabandt <cb@256bit.org> parents: 10359 diff changeset	136
7805 0b6c37dd858d commit https://github.com/vim/vim/commit/baaa7e9ec7398a813e21285c272fa99792642077 Christian Brabandt <cb@256bit.org> parents: 7710 diff changeset	137 static void qf_new_list(qf_info_T qi, char_u qf_title);
13821 98274127d675 patch 8.0.1782: no simple way to label quickfix entries Christian Brabandt <cb@256bit.org> parents: 13819 diff changeset	138 static int qf_add_entry(qf_info_T qi, int qf_idx, char_u dir, char_u fname, char_u module, int bufnum, char_u mesg, long lnum, int col, int vis_col, char_u pattern, int nr, int type, int valid);
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	139 static void qf_free(qf_list_T *qfl);
7805 0b6c37dd858d commit https://github.com/vim/vim/commit/baaa7e9ec7398a813e21285c272fa99792642077 Christian Brabandt <cb@256bit.org> parents: 7710 diff changeset	140 static char_u *qf_types(int, int);
11700 dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	141 static int qf_get_fnum(qf_info_T qi, int qf_idx, char_u , char_u *);
9397 e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	142 static char_u qf_push_dir(char_u , struct dir_stack_T **, int is_file_stack);
7805 0b6c37dd858d commit https://github.com/vim/vim/commit/baaa7e9ec7398a813e21285c272fa99792642077 Christian Brabandt <cb@256bit.org> parents: 7710 diff changeset	143 static char_u qf_pop_dir(struct dir_stack_T *);
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	144 static char_u qf_guess_filepath(qf_list_T qfl, char_u *);
7805 0b6c37dd858d commit https://github.com/vim/vim/commit/baaa7e9ec7398a813e21285c272fa99792642077 Christian Brabandt <cb@256bit.org> parents: 7710 diff changeset	145 static void qf_fmt_text(char_u text, char_u buf, int bufsize);
0b6c37dd858d commit https://github.com/vim/vim/commit/baaa7e9ec7398a813e21285c272fa99792642077 Christian Brabandt <cb@256bit.org> parents: 7710 diff changeset	146 static int qf_win_pos_update(qf_info_T *qi, int old_qf_index);
0b6c37dd858d commit https://github.com/vim/vim/commit/baaa7e9ec7398a813e21285c272fa99792642077 Christian Brabandt <cb@256bit.org> parents: 7710 diff changeset	147 static win_T qf_find_win(qf_info_T qi);
0b6c37dd858d commit https://github.com/vim/vim/commit/baaa7e9ec7398a813e21285c272fa99792642077 Christian Brabandt <cb@256bit.org> parents: 7710 diff changeset	148 static buf_T qf_find_buf(qf_info_T qi);
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	149 static void qf_update_buffer(qf_info_T qi, qfline_T old_last);
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	150 static void qf_fill_buffer(qf_info_T qi, buf_T buf, qfline_T *old_last);
7805 0b6c37dd858d commit https://github.com/vim/vim/commit/baaa7e9ec7398a813e21285c272fa99792642077 Christian Brabandt <cb@256bit.org> parents: 7710 diff changeset	151 static buf_T load_dummy_buffer(char_u fname, char_u dirname_start, char_u resulting_dir);
0b6c37dd858d commit https://github.com/vim/vim/commit/baaa7e9ec7398a813e21285c272fa99792642077 Christian Brabandt <cb@256bit.org> parents: 7710 diff changeset	152 static void wipe_dummy_buffer(buf_T buf, char_u dirname_start);
0b6c37dd858d commit https://github.com/vim/vim/commit/baaa7e9ec7398a813e21285c272fa99792642077 Christian Brabandt <cb@256bit.org> parents: 7710 diff changeset	153 static void unload_dummy_buffer(buf_T buf, char_u dirname_start);
0b6c37dd858d commit https://github.com/vim/vim/commit/baaa7e9ec7398a813e21285c272fa99792642077 Christian Brabandt <cb@256bit.org> parents: 7710 diff changeset	154 static qf_info_T ll_get_or_alloc_list(win_T );
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	155
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	156 /* Quickfix window check helper macro */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	157 #define IS_QF_WINDOW(wp) (bt_quickfix(wp->w_buffer) && wp->w_llist_ref == NULL)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	158 /* Location list window check helper macro */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	159 #define IS_LL_WINDOW(wp) (bt_quickfix(wp->w_buffer) && wp->w_llist_ref != NULL)
14560 8413e66d00a1 patch 8.1.0293: checks for type of stack is cryptic Christian Brabandt <cb@256bit.org> parents: 14552 diff changeset	160
8413e66d00a1 patch 8.1.0293: checks for type of stack is cryptic Christian Brabandt <cb@256bit.org> parents: 14552 diff changeset	161 // Quickfix and location list stack check helper macros
8413e66d00a1 patch 8.1.0293: checks for type of stack is cryptic Christian Brabandt <cb@256bit.org> parents: 14552 diff changeset	162 #define IS_QF_STACK(qi) (qi == &ql_info)
8413e66d00a1 patch 8.1.0293: checks for type of stack is cryptic Christian Brabandt <cb@256bit.org> parents: 14552 diff changeset	163 #define IS_LL_STACK(qi) (qi != &ql_info)
8413e66d00a1 patch 8.1.0293: checks for type of stack is cryptic Christian Brabandt <cb@256bit.org> parents: 14552 diff changeset	164
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	165 /*
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	166 * Return location list for window 'wp'
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	167 * For location list window, return the referenced location list
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	168 */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	169 #define GET_LOC_LIST(wp) (IS_LL_WINDOW(wp) ? wp->w_llist_ref : wp->w_llist)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	170
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	171 /*
11443 30b3775addb2 patch 8.0.0605: the quickfix cached buffer may become invalid Christian Brabandt <cb@256bit.org> parents: 11426 diff changeset	172 * Looking up a buffer can be slow if there are many. Remember the last one
30b3775addb2 patch 8.0.0605: the quickfix cached buffer may become invalid Christian Brabandt <cb@256bit.org> parents: 11426 diff changeset	173 * to make this a lot faster if there are multiple matches in the same file.
30b3775addb2 patch 8.0.0605: the quickfix cached buffer may become invalid Christian Brabandt <cb@256bit.org> parents: 11426 diff changeset	174 */
11447 698ee9d4fe9f patch 8.0.0607: after :bwipe + :new bufref might still be valid Christian Brabandt <cb@256bit.org> parents: 11445 diff changeset	175 static char_u *qf_last_bufname = NULL;
698ee9d4fe9f patch 8.0.0607: after :bwipe + :new bufref might still be valid Christian Brabandt <cb@256bit.org> parents: 11445 diff changeset	176 static bufref_T qf_last_bufref = {NULL, 0, 0};
11443 30b3775addb2 patch 8.0.0605: the quickfix cached buffer may become invalid Christian Brabandt <cb@256bit.org> parents: 11426 diff changeset	177
13090 a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	178 static char *e_loc_list_changed =
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	179 N_("E926: Current location list was changed");
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	180
11443 30b3775addb2 patch 8.0.0605: the quickfix cached buffer may become invalid Christian Brabandt <cb@256bit.org> parents: 11426 diff changeset	181 /*
9033 0536d1469b67 commit https://github.com/vim/vim/commit/6be8c8e165204b8aa4eeb8a52be87a58d8b41b9e Christian Brabandt <cb@256bit.org> parents: 8932 diff changeset	182 * Maximum number of bytes allowed per line while reading a errorfile.
0536d1469b67 commit https://github.com/vim/vim/commit/6be8c8e165204b8aa4eeb8a52be87a58d8b41b9e Christian Brabandt <cb@256bit.org> parents: 8932 diff changeset	183 */
0536d1469b67 commit https://github.com/vim/vim/commit/6be8c8e165204b8aa4eeb8a52be87a58d8b41b9e Christian Brabandt <cb@256bit.org> parents: 8932 diff changeset	184 #define LINE_MAXLEN 4096
0536d1469b67 commit https://github.com/vim/vim/commit/6be8c8e165204b8aa4eeb8a52be87a58d8b41b9e Christian Brabandt <cb@256bit.org> parents: 8932 diff changeset	185
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	186 static struct fmtpattern
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	187 {
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	188 char_u convchar;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	189 char *pattern;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	190 } fmt_pat[FMT_PATTERNS] =
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	191 {
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	192 {'f', ".\\+"}, /* only used when at end */
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	193 {'n', "\\d\\+"},
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	194 {'l', "\\d\\+"},
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	195 {'c', "\\d\\+"},
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	196 {'t', "."},
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	197 {'m', ".\\+"},
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	198 {'r', ".*"},
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	199 {'p', "[- .]*"},
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	200 {'v', "\\d\\+"},
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	201 {'s', ".\\+"},
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	202 {'o', ".\\+"}
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	203 };
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	204
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	205 /*
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	206 * Convert an errorformat pattern to a regular expression pattern.
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	207 * See fmt_pat definition above for the list of supported patterns. The
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	208 * pattern specifier is supplied in "efmpat". The converted pattern is stored
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	209 * in "regpat". Returns a pointer to the location after the pattern.
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	210 */
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	211 static char_u *
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	212 efmpat_to_regpat(
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	213 char_u *efmpat,
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	214 char_u *regpat,
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	215 efm_T *efminfo,
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	216 int idx,
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	217 int round,
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	218 char_u *errmsg)
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	219 {
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	220 char_u *srcptr;
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	221
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	222 if (efminfo->addr[idx])
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	223 {
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	224 /* Each errorformat pattern can occur only once */
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	225 sprintf((char *)errmsg,
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	226 _("E372: Too many %%%c in format string"), *efmpat);
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	227 EMSG(errmsg);
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	228 return NULL;
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	229 }
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	230 if ((idx && idx < 6
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	231 && vim_strchr((char_u *)"DXOPQ", efminfo->prefix) != NULL)
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	232 \|\| (idx == 6
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	233 && vim_strchr((char_u *)"OPQ", efminfo->prefix) == NULL))
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	234 {
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	235 sprintf((char *)errmsg,
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	236 _("E373: Unexpected %%%c in format string"), *efmpat);
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	237 EMSG(errmsg);
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	238 return NULL;
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	239 }
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	240 efminfo->addr[idx] = (char_u)++round;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	241 *regpat++ = '\\';
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	242 *regpat++ = '(';
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	243 #ifdef BACKSLASH_IN_FILENAME
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	244 if (*efmpat == 'f')
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	245 {
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	246 /* Also match "c:" in the file name, even when
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	247 * checking for a colon next: "%f:".
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	248 * "\%(\a:\)\=" */
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	249 STRCPY(regpat, "\\%(\\a:\\)\\=");
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	250 regpat += 10;
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	251 }
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	252 #endif
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	253 if (*efmpat == 'f' && efmpat[1] != NUL)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	254 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	255 if (efmpat[1] != '\\' && efmpat[1] != '%')
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	256 {
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	257 /* A file name may contain spaces, but this isn't
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	258 * in "\f". For "%f:%l:%m" there may be a ":" in
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	259 * the file name. Use ".\{-1,}x" instead (x is
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	260 * the next character), the requirement that :999:
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	261 * follows should work. */
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	262 STRCPY(regpat, ".\\{-1,}");
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	263 regpat += 7;
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	264 }
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	265 else
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	266 {
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	267 /* File name followed by '\\' or '%': include as
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	268 * many file name chars as possible. */
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	269 STRCPY(regpat, "\\f\\+");
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	270 regpat += 4;
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	271 }
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	272 }
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	273 else
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	274 {
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	275 srcptr = (char_u *)fmt_pat[idx].pattern;
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	276 while ((regpat = srcptr++) != NUL)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	277 ++regpat;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	278 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	279 *regpat++ = '\\';
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	280 *regpat++ = ')';
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	281
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	282 return regpat;
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	283 }
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	284
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	285 /*
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	286 * Convert a scanf like format in 'errorformat' to a regular expression.
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	287 * Returns a pointer to the location after the pattern.
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	288 */
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	289 static char_u *
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	290 scanf_fmt_to_regpat(
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	291 char_u **pefmp,
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	292 char_u *efm,
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	293 int len,
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	294 char_u *regpat,
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	295 char_u *errmsg)
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	296 {
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	297 char_u efmp = pefmp;
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	298
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	299 if (efmp == '[' \|\| efmp == '\\')
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	300 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	301 if ((regpat++ = efmp) == '[') /* %[^a-z0-9] etc. /
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	302 {
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	303 if (efmp[1] == '^')
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	304 regpat++ = ++efmp;
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	305 if (efmp < efm + len)
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	306 {
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	307 regpat++ = ++efmp; /* could be ']' */
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	308 while (efmp < efm + len
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	309 && (regpat++ = ++efmp) != ']')
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	310 /* skip */;
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	311 if (efmp == efm + len)
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	312 {
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	313 EMSG(_("E374: Missing ] in format string"));
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	314 return NULL;
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	315 }
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	316 }
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	317 }
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	318 else if (efmp < efm + len) /* %\D, %\s etc. */
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	319 regpat++ = ++efmp;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	320 *regpat++ = '\\';
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	321 *regpat++ = '+';
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	322 }
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	323 else
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	324 {
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	325 /* TODO: scanf()-like: %ud, %3c, %f, ... ? /
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	326 sprintf((char *)errmsg,
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	327 _("E375: Unsupported %%%c in format string"), *efmp);
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	328 EMSG(errmsg);
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	329 return NULL;
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	330 }
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	331
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	332 *pefmp = efmp;
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	333
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	334 return regpat;
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	335 }
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	336
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	337 /*
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	338 * Analyze/parse an errorformat prefix.
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	339 */
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	340 static char_u *
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	341 efm_analyze_prefix(char_u efmp, efm_T efminfo, char_u *errmsg)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	342 {
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	343 if (vim_strchr((char_u )"+-", efmp) != NULL)
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	344 efminfo->flags = *efmp++;
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	345 if (vim_strchr((char_u )"DXAEWICZGOPQ", efmp) != NULL)
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	346 efminfo->prefix = *efmp;
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	347 else
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	348 {
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	349 sprintf((char *)errmsg,
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	350 _("E376: Invalid %%%c in format string prefix"), *efmp);
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	351 EMSG(errmsg);
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	352 return NULL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	353 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	354
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	355 return efmp;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	356 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	357
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	358 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	359 * Converts a 'errorformat' string part in 'efm' to a regular expression
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	360 * pattern. The resulting regex pattern is returned in "regpat". Additional
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	361 * information about the 'erroformat' pattern is returned in "fmt_ptr".
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	362 * Returns OK or FAIL.
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	363 */
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	364 static int
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	365 efm_to_regpat(
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	366 char_u *efm,
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	367 int len,
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	368 efm_T *fmt_ptr,
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	369 char_u *regpat,
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	370 char_u *errmsg)
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	371 {
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	372 char_u *ptr;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	373 char_u *efmp;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	374 int round;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	375 int idx = 0;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	376
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	377 /*
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	378 * Build a regexp pattern for a 'errorformat' option part
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	379 */
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	380 ptr = regpat;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	381 *ptr++ = '^';
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	382 round = 0;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	383 for (efmp = efm; efmp < efm + len; ++efmp)
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	384 {
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	385 if (*efmp == '%')
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	386 {
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	387 ++efmp;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	388 for (idx = 0; idx < FMT_PATTERNS; ++idx)
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	389 if (fmt_pat[idx].convchar == *efmp)
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	390 break;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	391 if (idx < FMT_PATTERNS)
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	392 {
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	393 ptr = efmpat_to_regpat(efmp, ptr, fmt_ptr, idx, round,
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	394 errmsg);
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	395 if (ptr == NULL)
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	396 return FAIL;
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	397 round++;
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	398 }
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	399 else if (efmp == '')
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	400 {
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	401 ++efmp;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	402 ptr = scanf_fmt_to_regpat(&efmp, efm, len, ptr, errmsg);
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	403 if (ptr == NULL)
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	404 return FAIL;
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	405 }
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	406 else if (vim_strchr((char_u )"%\\.^$~[", efmp) != NULL)
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	407 ptr++ = efmp; /* regexp magic characters */
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	408 else if (*efmp == '#')
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	409 ptr++ = '';
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	410 else if (*efmp == '>')
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	411 fmt_ptr->conthere = TRUE;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	412 else if (efmp == efm + 1) /* analyse prefix */
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	413 {
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	414 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	415 * prefix is allowed only at the beginning of the errorformat
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	416 * option part
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	417 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	418 efmp = efm_analyze_prefix(efmp, fmt_ptr, errmsg);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	419 if (efmp == NULL)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	420 return FAIL;
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	421 }
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	422 else
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	423 {
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	424 sprintf((char *)errmsg,
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	425 _("E377: Invalid %%%c in format string"), *efmp);
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	426 EMSG(errmsg);
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	427 return FAIL;
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	428 }
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	429 }
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	430 else /* copy normal character */
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	431 {
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	432 if (*efmp == '\\' && efmp + 1 < efm + len)
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	433 ++efmp;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	434 else if (vim_strchr((char_u )".^$~[", *efmp) != NULL)
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	435 ptr++ = '\\'; / escape regexp atoms */
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	436 if (*efmp)
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	437 ptr++ = efmp;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	438 }
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	439 }
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	440 *ptr++ = '$';
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	441 *ptr = NUL;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	442
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	443 return OK;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	444 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	445
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	446 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	447 * Free the 'errorformat' information list
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	448 */
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	449 static void
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	450 free_efm_list(efm_T **efm_first)
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	451 {
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	452 efm_T *efm_ptr;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	453
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	454 for (efm_ptr = efm_first; efm_ptr != NULL; efm_ptr = efm_first)
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	455 {
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	456 *efm_first = efm_ptr->next;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	457 vim_regfree(efm_ptr->prog);
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	458 vim_free(efm_ptr);
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	459 }
10367 4e4e116e3689 commit https://github.com/vim/vim/commit/63bed3d319b5d90765dbdae93a3579b6322d79fb Christian Brabandt <cb@256bit.org> parents: 10359 diff changeset	460 fmt_start = NULL;
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	461 }
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	462
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	463 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	464 * Compute the size of the buffer used to convert a 'errorformat' pattern into
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	465 * a regular expression pattern.
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	466 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	467 static int
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	468 efm_regpat_bufsz(char_u *efm)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	469 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	470 int sz;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	471 int i;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	472
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	473 sz = (FMT_PATTERNS * 3) + ((int)STRLEN(efm) << 2);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	474 for (i = FMT_PATTERNS; i > 0; )
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	475 sz += (int)STRLEN(fmt_pat[--i].pattern);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	476 #ifdef BACKSLASH_IN_FILENAME
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	477 sz += 12; /* "%f" can become twelve chars longer (see efm_to_regpat) */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	478 #else
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	479 sz += 2; /* "%f" can become two chars longer */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	480 #endif
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	481
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	482 return sz;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	483 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	484
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	485 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	486 * Return the length of a 'errorformat' option part (separated by ",").
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	487 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	488 static int
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	489 efm_option_part_len(char_u *efm)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	490 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	491 int len;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	492
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	493 for (len = 0; efm[len] != NUL && efm[len] != ','; ++len)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	494 if (efm[len] == '\\' && efm[len + 1] != NUL)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	495 ++len;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	496
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	497 return len;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	498 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	499
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	500 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	501 * Parse the 'errorformat' option. Multiple parts in the 'errorformat' option
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	502 * are parsed and converted to regular expressions. Returns information about
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	503 * the parsed 'errorformat' option.
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	504 */
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	505 static efm_T *
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	506 parse_efm_option(char_u *efm)
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	507 {
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	508 char_u *errmsg = NULL;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	509 int errmsglen;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	510 efm_T *fmt_ptr = NULL;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	511 efm_T *fmt_first = NULL;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	512 efm_T *fmt_last = NULL;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	513 char_u *fmtstr = NULL;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	514 int len;
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	515 int sz;
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	516
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	517 errmsglen = CMDBUFFSIZE + 1;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	518 errmsg = alloc_id(errmsglen, aid_qf_errmsg);
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	519 if (errmsg == NULL)
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	520 goto parse_efm_end;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	521
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	522 /*
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	523 * Each part of the format string is copied and modified from errorformat
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	524 * to regex prog. Only a few % characters are allowed.
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	525 */
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	526
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	527 /*
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	528 * Get some space to modify the format string into.
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	529 */
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	530 sz = efm_regpat_bufsz(efm);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	531 if ((fmtstr = alloc(sz)) == NULL)
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	532 goto parse_efm_error;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	533
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	534 while (efm[0] != NUL)
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	535 {
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	536 /*
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	537 * Allocate a new eformat structure and put it at the end of the list
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	538 */
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	539 fmt_ptr = (efm_T *)alloc_clear((unsigned)sizeof(efm_T));
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	540 if (fmt_ptr == NULL)
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	541 goto parse_efm_error;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	542 if (fmt_first == NULL) /* first one */
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	543 fmt_first = fmt_ptr;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	544 else
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	545 fmt_last->next = fmt_ptr;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	546 fmt_last = fmt_ptr;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	547
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	548 /*
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	549 * Isolate one part in the 'errorformat' option
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	550 */
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	551 len = efm_option_part_len(efm);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	552
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	553 if (efm_to_regpat(efm, len, fmt_ptr, fmtstr, errmsg) == FAIL)
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	554 goto parse_efm_error;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	555 if ((fmt_ptr->prog = vim_regcomp(fmtstr, RE_MAGIC + RE_STRING)) == NULL)
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	556 goto parse_efm_error;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	557 /*
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	558 * Advance to next part
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	559 */
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	560 efm = skip_to_option_part(efm + len); /* skip comma and spaces */
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	561 }
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	562
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	563 if (fmt_first == NULL) /* nothing found */
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	564 EMSG(_("E378: 'errorformat' contains no pattern"));
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	565
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	566 goto parse_efm_end;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	567
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	568 parse_efm_error:
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	569 free_efm_list(&fmt_first);
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	570
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	571 parse_efm_end:
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	572 vim_free(fmtstr);
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	573 vim_free(errmsg);
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	574
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	575 return fmt_first;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	576 }
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	577
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	578 enum {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	579 QF_FAIL = 0,
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	580 QF_OK = 1,
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	581 QF_END_OF_INPUT = 2,
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	582 QF_NOMEM = 3,
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	583 QF_IGNORE_LINE = 4,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	584 QF_MULTISCAN = 5,
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	585 };
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	586
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	587 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	588 * State information used to parse lines and add entries to a quickfix/location
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	589 * list.
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	590 */
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	591 typedef struct {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	592 char_u *linebuf;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	593 int linelen;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	594 char_u *growbuf;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	595 int growbufsiz;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	596 FILE *fd;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	597 typval_T *tv;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	598 char_u *p_str;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	599 listitem_T *p_li;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	600 buf_T *buf;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	601 linenr_T buflnum;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	602 linenr_T lnumlast;
11063 e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	603 vimconv_T vc;
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	604 } qfstate_T;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	605
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	606 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	607 * Allocate more memory for the line buffer used for parsing lines.
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	608 */
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	609 static char_u *
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	610 qf_grow_linebuf(qfstate_T *state, int newsz)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	611 {
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	612 char_u *p;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	613
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	614 /*
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	615 * If the line exceeds LINE_MAXLEN exclude the last
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	616 * byte since it's not a NL character.
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	617 */
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	618 state->linelen = newsz > LINE_MAXLEN ? LINE_MAXLEN - 1 : newsz;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	619 if (state->growbuf == NULL)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	620 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	621 state->growbuf = alloc(state->linelen + 1);
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	622 if (state->growbuf == NULL)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	623 return NULL;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	624 state->growbufsiz = state->linelen;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	625 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	626 else if (state->linelen > state->growbufsiz)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	627 {
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	628 if ((p = vim_realloc(state->growbuf, state->linelen + 1)) == NULL)
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	629 return NULL;
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	630 state->growbuf = p;
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	631 state->growbufsiz = state->linelen;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	632 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	633 return state->growbuf;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	634 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	635
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	636 /*
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	637 * Get the next string (separated by newline) from state->p_str.
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	638 */
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	639 static int
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	640 qf_get_next_str_line(qfstate_T *state)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	641 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	642 /* Get the next line from the supplied string */
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	643 char_u *p_str = state->p_str;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	644 char_u *p;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	645 int len;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	646
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	647 if (p_str == NUL) / Reached the end of the string */
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	648 return QF_END_OF_INPUT;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	649
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	650 p = vim_strchr(p_str, '\n');
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	651 if (p != NULL)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	652 len = (int)(p - p_str) + 1;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	653 else
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	654 len = (int)STRLEN(p_str);
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	655
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	656 if (len > IOSIZE - 2)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	657 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	658 state->linebuf = qf_grow_linebuf(state, len);
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	659 if (state->linebuf == NULL)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	660 return QF_NOMEM;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	661 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	662 else
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	663 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	664 state->linebuf = IObuff;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	665 state->linelen = len;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	666 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	667 vim_strncpy(state->linebuf, p_str, state->linelen);
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	668
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	669 /*
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	670 * Increment using len in order to discard the rest of the
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	671 * line if it exceeds LINE_MAXLEN.
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	672 */
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	673 p_str += len;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	674 state->p_str = p_str;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	675
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	676 return QF_OK;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	677 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	678
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	679 /*
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	680 * Get the next string from state->p_Li.
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	681 */
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	682 static int
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	683 qf_get_next_list_line(qfstate_T *state)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	684 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	685 listitem_T *p_li = state->p_li;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	686 int len;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	687
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	688 while (p_li != NULL
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	689 && (p_li->li_tv.v_type != VAR_STRING
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	690 \|\| p_li->li_tv.vval.v_string == NULL))
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	691 p_li = p_li->li_next; /* Skip non-string items */
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	692
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	693 if (p_li == NULL) /* End of the list */
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	694 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	695 state->p_li = NULL;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	696 return QF_END_OF_INPUT;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	697 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	698
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	699 len = (int)STRLEN(p_li->li_tv.vval.v_string);
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	700 if (len > IOSIZE - 2)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	701 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	702 state->linebuf = qf_grow_linebuf(state, len);
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	703 if (state->linebuf == NULL)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	704 return QF_NOMEM;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	705 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	706 else
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	707 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	708 state->linebuf = IObuff;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	709 state->linelen = len;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	710 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	711
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	712 vim_strncpy(state->linebuf, p_li->li_tv.vval.v_string, state->linelen);
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	713
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	714 state->p_li = p_li->li_next; /* next item */
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	715 return QF_OK;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	716 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	717
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	718 /*
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	719 * Get the next string from state->buf.
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	720 */
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	721 static int
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	722 qf_get_next_buf_line(qfstate_T *state)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	723 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	724 char_u *p_buf = NULL;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	725 int len;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	726
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	727 /* Get the next line from the supplied buffer */
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	728 if (state->buflnum > state->lnumlast)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	729 return QF_END_OF_INPUT;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	730
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	731 p_buf = ml_get_buf(state->buf, state->buflnum, FALSE);
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	732 state->buflnum += 1;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	733
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	734 len = (int)STRLEN(p_buf);
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	735 if (len > IOSIZE - 2)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	736 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	737 state->linebuf = qf_grow_linebuf(state, len);
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	738 if (state->linebuf == NULL)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	739 return QF_NOMEM;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	740 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	741 else
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	742 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	743 state->linebuf = IObuff;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	744 state->linelen = len;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	745 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	746 vim_strncpy(state->linebuf, p_buf, state->linelen);
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	747
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	748 return QF_OK;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	749 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	750
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	751 /*
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	752 * Get the next string from file state->fd.
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	753 */
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	754 static int
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	755 qf_get_next_file_line(qfstate_T *state)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	756 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	757 int discard;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	758 int growbuflen;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	759
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	760 if (fgets((char *)IObuff, IOSIZE, state->fd) == NULL)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	761 return QF_END_OF_INPUT;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	762
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	763 discard = FALSE;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	764 state->linelen = (int)STRLEN(IObuff);
9738 6818e3c96473 commit https://github.com/vim/vim/commit/796aa9c804f09276bd3cc45123f4a191a001dec2 Christian Brabandt <cb@256bit.org> parents: 9649 diff changeset	765 if (state->linelen == IOSIZE - 1 && !(IObuff[state->linelen - 1] == '\n'))
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	766 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	767 /*
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	768 * The current line exceeds IObuff, continue reading using
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	769 * growbuf until EOL or LINE_MAXLEN bytes is read.
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	770 */
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	771 if (state->growbuf == NULL)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	772 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	773 state->growbufsiz = 2 * (IOSIZE - 1);
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	774 state->growbuf = alloc(state->growbufsiz);
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	775 if (state->growbuf == NULL)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	776 return QF_NOMEM;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	777 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	778
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	779 /* Copy the read part of the line, excluding null-terminator */
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	780 memcpy(state->growbuf, IObuff, IOSIZE - 1);
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	781 growbuflen = state->linelen;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	782
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	783 for (;;)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	784 {
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	785 char_u *p;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	786
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	787 if (fgets((char *)state->growbuf + growbuflen,
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	788 state->growbufsiz - growbuflen, state->fd) == NULL)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	789 break;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	790 state->linelen = (int)STRLEN(state->growbuf + growbuflen);
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	791 growbuflen += state->linelen;
9738 6818e3c96473 commit https://github.com/vim/vim/commit/796aa9c804f09276bd3cc45123f4a191a001dec2 Christian Brabandt <cb@256bit.org> parents: 9649 diff changeset	792 if ((state->growbuf)[growbuflen - 1] == '\n')
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	793 break;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	794 if (state->growbufsiz == LINE_MAXLEN)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	795 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	796 discard = TRUE;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	797 break;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	798 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	799
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	800 state->growbufsiz = 2 * state->growbufsiz < LINE_MAXLEN
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	801 ? 2 * state->growbufsiz : LINE_MAXLEN;
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	802 if ((p = vim_realloc(state->growbuf, state->growbufsiz)) == NULL)
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	803 return QF_NOMEM;
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	804 state->growbuf = p;
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	805 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	806
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	807 while (discard)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	808 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	809 /*
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	810 * The current line is longer than LINE_MAXLEN, continue
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	811 * reading but discard everything until EOL or EOF is
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	812 * reached.
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	813 */
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	814 if (fgets((char *)IObuff, IOSIZE, state->fd) == NULL
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	815 \|\| (int)STRLEN(IObuff) < IOSIZE - 1
9738 6818e3c96473 commit https://github.com/vim/vim/commit/796aa9c804f09276bd3cc45123f4a191a001dec2 Christian Brabandt <cb@256bit.org> parents: 9649 diff changeset	816 \|\| IObuff[IOSIZE - 1] == '\n')
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	817 break;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	818 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	819
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	820 state->linebuf = state->growbuf;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	821 state->linelen = growbuflen;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	822 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	823 else
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	824 state->linebuf = IObuff;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	825
11063 e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	826 #ifdef FEAT_MBYTE
e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	827 /* Convert a line if it contains a non-ASCII character. */
11263 ae5f9f26f81c patch 8.0.0517: there is no way to remove quickfix lists Christian Brabandt <cb@256bit.org> parents: 11195 diff changeset	828 if (state->vc.vc_type != CONV_NONE && has_non_ascii(state->linebuf))
ae5f9f26f81c patch 8.0.0517: there is no way to remove quickfix lists Christian Brabandt <cb@256bit.org> parents: 11195 diff changeset	829 {
11063 e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	830 char_u *line;
e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	831
e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	832 line = string_convert(&state->vc, state->linebuf, &state->linelen);
e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	833 if (line != NULL)
e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	834 {
e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	835 if (state->linelen < IOSIZE)
e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	836 {
e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	837 STRCPY(state->linebuf, line);
e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	838 vim_free(line);
e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	839 }
e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	840 else
e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	841 {
e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	842 vim_free(state->growbuf);
e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	843 state->linebuf = state->growbuf = line;
e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	844 state->growbufsiz = state->linelen < LINE_MAXLEN
e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	845 ? state->linelen : LINE_MAXLEN;
e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	846 }
e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	847 }
e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	848 }
e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	849 #endif
e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	850
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	851 return QF_OK;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	852 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	853
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	854 /*
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	855 * Get the next string from a file/buffer/list/string.
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	856 */
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	857 static int
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	858 qf_get_nextline(qfstate_T *state)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	859 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	860 int status = QF_FAIL;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	861
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	862 if (state->fd == NULL)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	863 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	864 if (state->tv != NULL)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	865 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	866 if (state->tv->v_type == VAR_STRING)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	867 /* Get the next line from the supplied string */
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	868 status = qf_get_next_str_line(state);
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	869 else if (state->tv->v_type == VAR_LIST)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	870 /* Get the next line from the supplied list */
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	871 status = qf_get_next_list_line(state);
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	872 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	873 else
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	874 /* Get the next line from the supplied buffer */
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	875 status = qf_get_next_buf_line(state);
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	876 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	877 else
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	878 /* Get the next line from the supplied file */
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	879 status = qf_get_next_file_line(state);
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	880
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	881 if (status != QF_OK)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	882 return status;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	883
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	884 /* remove newline/CR from the line */
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	885 if (state->linelen > 0 && state->linebuf[state->linelen - 1] == '\n')
9738 6818e3c96473 commit https://github.com/vim/vim/commit/796aa9c804f09276bd3cc45123f4a191a001dec2 Christian Brabandt <cb@256bit.org> parents: 9649 diff changeset	886 {
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	887 state->linebuf[state->linelen - 1] = NUL;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	888 #ifdef USE_CRNL
9738 6818e3c96473 commit https://github.com/vim/vim/commit/796aa9c804f09276bd3cc45123f4a191a001dec2 Christian Brabandt <cb@256bit.org> parents: 9649 diff changeset	889 if (state->linelen > 1 && state->linebuf[state->linelen - 2] == '\r')
6818e3c96473 commit https://github.com/vim/vim/commit/796aa9c804f09276bd3cc45123f4a191a001dec2 Christian Brabandt <cb@256bit.org> parents: 9649 diff changeset	890 state->linebuf[state->linelen - 2] = NUL;
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	891 #endif
9738 6818e3c96473 commit https://github.com/vim/vim/commit/796aa9c804f09276bd3cc45123f4a191a001dec2 Christian Brabandt <cb@256bit.org> parents: 9649 diff changeset	892 }
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	893
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	894 #ifdef FEAT_MBYTE
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	895 remove_bom(state->linebuf);
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	896 #endif
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	897
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	898 return QF_OK;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	899 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	900
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	901 typedef struct {
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	902 char_u *namebuf;
13821 98274127d675 patch 8.0.1782: no simple way to label quickfix entries Christian Brabandt <cb@256bit.org> parents: 13819 diff changeset	903 char_u *module;
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	904 char_u *errmsg;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	905 int errmsglen;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	906 long lnum;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	907 int col;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	908 char_u use_viscol;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	909 char_u *pattern;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	910 int enr;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	911 int type;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	912 int valid;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	913 } qffields_T;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	914
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	915 /*
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	916 * Parse the match for filename ('%f') pattern in regmatch.
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	917 * Return the matched value in "fields->namebuf".
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	918 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	919 static int
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	920 qf_parse_fmt_f(regmatch_T rmp, int midx, qffields_T fields, int prefix)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	921 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	922 int c;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	923
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	924 if (rmp->startp[midx] == NULL \|\| rmp->endp[midx] == NULL)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	925 return QF_FAIL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	926
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	927 /* Expand ~/file and $HOME/file to full path. */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	928 c = *rmp->endp[midx];
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	929 *rmp->endp[midx] = NUL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	930 expand_env(rmp->startp[midx], fields->namebuf, CMDBUFFSIZE);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	931 *rmp->endp[midx] = c;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	932
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	933 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	934 * For separate filename patterns (%O, %P and %Q), the specified file
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	935 * should exist.
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	936 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	937 if (vim_strchr((char_u *)"OPQ", prefix) != NULL
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	938 && mch_getperm(fields->namebuf) == -1)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	939 return QF_FAIL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	940
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	941 return QF_OK;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	942 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	943
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	944 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	945 * Parse the match for error number ('%n') pattern in regmatch.
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	946 * Return the matched value in "fields->enr".
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	947 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	948 static int
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	949 qf_parse_fmt_n(regmatch_T rmp, int midx, qffields_T fields)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	950 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	951 if (rmp->startp[midx] == NULL)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	952 return QF_FAIL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	953 fields->enr = (int)atol((char *)rmp->startp[midx]);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	954 return QF_OK;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	955 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	956
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	957 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	958 * Parse the match for line number (%l') pattern in regmatch.
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	959 * Return the matched value in "fields->lnum".
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	960 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	961 static int
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	962 qf_parse_fmt_l(regmatch_T rmp, int midx, qffields_T fields)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	963 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	964 if (rmp->startp[midx] == NULL)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	965 return QF_FAIL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	966 fields->lnum = atol((char *)rmp->startp[midx]);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	967 return QF_OK;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	968 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	969
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	970 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	971 * Parse the match for column number ('%c') pattern in regmatch.
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	972 * Return the matched value in "fields->col".
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	973 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	974 static int
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	975 qf_parse_fmt_c(regmatch_T rmp, int midx, qffields_T fields)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	976 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	977 if (rmp->startp[midx] == NULL)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	978 return QF_FAIL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	979 fields->col = (int)atol((char *)rmp->startp[midx]);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	980 return QF_OK;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	981 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	982
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	983 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	984 * Parse the match for error type ('%t') pattern in regmatch.
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	985 * Return the matched value in "fields->type".
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	986 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	987 static int
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	988 qf_parse_fmt_t(regmatch_T rmp, int midx, qffields_T fields)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	989 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	990 if (rmp->startp[midx] == NULL)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	991 return QF_FAIL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	992 fields->type = *rmp->startp[midx];
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	993 return QF_OK;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	994 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	995
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	996 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	997 * Parse the match for '%+' format pattern. The whole matching line is included
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	998 * in the error string. Return the matched line in "fields->errmsg".
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	999 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1000 static int
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1001 qf_parse_fmt_plus(char_u linebuf, int linelen, qffields_T fields)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1002 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1003 char_u *p;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1004
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1005 if (linelen >= fields->errmsglen)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1006 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1007 /* linelen + null terminator */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1008 if ((p = vim_realloc(fields->errmsg, linelen + 1)) == NULL)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1009 return QF_NOMEM;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1010 fields->errmsg = p;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1011 fields->errmsglen = linelen + 1;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1012 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1013 vim_strncpy(fields->errmsg, linebuf, linelen);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1014 return QF_OK;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1015 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1016
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1017 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1018 * Parse the match for error message ('%m') pattern in regmatch.
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1019 * Return the matched value in "fields->errmsg".
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1020 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1021 static int
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1022 qf_parse_fmt_m(regmatch_T rmp, int midx, qffields_T fields)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1023 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1024 char_u *p;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1025 int len;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1026
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1027 if (rmp->startp[midx] == NULL \|\| rmp->endp[midx] == NULL)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1028 return QF_FAIL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1029 len = (int)(rmp->endp[midx] - rmp->startp[midx]);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1030 if (len >= fields->errmsglen)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1031 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1032 /* len + null terminator */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1033 if ((p = vim_realloc(fields->errmsg, len + 1)) == NULL)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1034 return QF_NOMEM;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1035 fields->errmsg = p;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1036 fields->errmsglen = len + 1;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1037 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1038 vim_strncpy(fields->errmsg, rmp->startp[midx], len);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1039 return QF_OK;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1040 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1041
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1042 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1043 * Parse the match for rest of a single-line file message ('%r') pattern.
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1044 * Return the matched value in "tail".
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1045 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1046 static int
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1047 qf_parse_fmt_r(regmatch_T rmp, int midx, char_u *tail)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1048 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1049 if (rmp->startp[midx] == NULL)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1050 return QF_FAIL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1051 *tail = rmp->startp[midx];
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1052 return QF_OK;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1053 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1054
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1055 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1056 * Parse the match for the pointer line ('%p') pattern in regmatch.
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1057 * Return the matched value in "fields->col".
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1058 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1059 static int
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1060 qf_parse_fmt_p(regmatch_T rmp, int midx, qffields_T fields)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1061 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1062 char_u *match_ptr;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1063
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1064 if (rmp->startp[midx] == NULL \|\| rmp->endp[midx] == NULL)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1065 return QF_FAIL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1066 fields->col = 0;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1067 for (match_ptr = rmp->startp[midx]; match_ptr != rmp->endp[midx];
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1068 ++match_ptr)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1069 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1070 ++fields->col;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1071 if (*match_ptr == TAB)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1072 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1073 fields->col += 7;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1074 fields->col -= fields->col % 8;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1075 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1076 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1077 ++fields->col;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1078 fields->use_viscol = TRUE;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1079 return QF_OK;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1080 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1081
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1082 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1083 * Parse the match for the virtual column number ('%v') pattern in regmatch.
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1084 * Return the matched value in "fields->col".
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1085 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1086 static int
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1087 qf_parse_fmt_v(regmatch_T rmp, int midx, qffields_T fields)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1088 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1089 if (rmp->startp[midx] == NULL)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1090 return QF_FAIL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1091 fields->col = (int)atol((char *)rmp->startp[midx]);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1092 fields->use_viscol = TRUE;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1093 return QF_OK;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1094 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1095
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1096 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1097 * Parse the match for the search text ('%s') pattern in regmatch.
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1098 * Return the matched value in "fields->pattern".
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1099 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1100 static int
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1101 qf_parse_fmt_s(regmatch_T rmp, int midx, qffields_T fields)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1102 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1103 int len;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1104
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1105 if (rmp->startp[midx] == NULL \|\| rmp->endp[midx] == NULL)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1106 return QF_FAIL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1107 len = (int)(rmp->endp[midx] - rmp->startp[midx]);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1108 if (len > CMDBUFFSIZE - 5)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1109 len = CMDBUFFSIZE - 5;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1110 STRCPY(fields->pattern, "^\\V");
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1111 STRNCAT(fields->pattern, rmp->startp[midx], len);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1112 fields->pattern[len + 3] = '\\';
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1113 fields->pattern[len + 4] = '$';
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1114 fields->pattern[len + 5] = NUL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1115 return QF_OK;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1116 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1117
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1118 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1119 * Parse the match for the module ('%o') pattern in regmatch.
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1120 * Return the matched value in "fields->module".
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1121 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1122 static int
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1123 qf_parse_fmt_o(regmatch_T rmp, int midx, qffields_T fields)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1124 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1125 int len;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1126
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1127 if (rmp->startp[midx] == NULL \|\| rmp->endp[midx] == NULL)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1128 return QF_FAIL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1129 len = (int)(rmp->endp[midx] - rmp->startp[midx]);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1130 if (len > CMDBUFFSIZE)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1131 len = CMDBUFFSIZE;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1132 STRNCAT(fields->module, rmp->startp[midx], len);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1133 return QF_OK;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1134 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1135
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1136 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1137 * 'errorformat' format pattern parser functions.
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1138 * The '%f' and '%r' formats are parsed differently from other formats.
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1139 * See qf_parse_match() for details.
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1140 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1141 static int (qf_parse_fmt[FMT_PATTERNS])(regmatch_T , int, qffields_T *) =
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1142 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1143 NULL,
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1144 qf_parse_fmt_n,
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1145 qf_parse_fmt_l,
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1146 qf_parse_fmt_c,
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1147 qf_parse_fmt_t,
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1148 qf_parse_fmt_m,
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1149 NULL,
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1150 qf_parse_fmt_p,
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1151 qf_parse_fmt_v,
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1152 qf_parse_fmt_s,
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1153 qf_parse_fmt_o
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1154 };
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1155
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1156 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1157 * Parse the error format pattern matches in "regmatch" and set the values in
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1158 * "fields". fmt_ptr contains the 'efm' format specifiers/prefixes that have a
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1159 * match. Returns QF_OK if all the matches are successfully parsed. On
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1160 * failure, returns QF_FAIL or QF_NOMEM.
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1161 */
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1162 static int
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1163 qf_parse_match(
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1164 char_u *linebuf,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1165 int linelen,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1166 efm_T *fmt_ptr,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1167 regmatch_T *regmatch,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1168 qffields_T *fields,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1169 int qf_multiline,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1170 int qf_multiscan,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1171 char_u **tail)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1172 {
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1173 int idx = fmt_ptr->prefix;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1174 int i;
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1175 int midx;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1176 int status;
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1177
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1178 if ((idx == 'C' \|\| idx == 'Z') && !qf_multiline)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1179 return QF_FAIL;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1180 if (vim_strchr((char_u *)"EWI", idx) != NULL)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1181 fields->type = idx;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1182 else
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1183 fields->type = 0;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1184 /*
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1185 * Extract error message data from matched line.
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1186 * We check for an actual submatch, because "\[" and "\]" in
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1187 * the 'errorformat' may cause the wrong submatch to be used.
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1188 */
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1189 for (i = 0; i < FMT_PATTERNS; i++)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1190 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1191 status = QF_OK;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1192 midx = (int)fmt_ptr->addr[i];
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1193 if (i == 0 && midx > 0) /* %f */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1194 status = qf_parse_fmt_f(regmatch, midx, fields, idx);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1195 else if (i == 5)
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1196 {
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1197 if (fmt_ptr->flags == '+' && !qf_multiscan) /* %+ */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1198 status = qf_parse_fmt_plus(linebuf, linelen, fields);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1199 else if (midx > 0) /* %m */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1200 status = qf_parse_fmt_m(regmatch, midx, fields);
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1201 }
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1202 else if (i == 6 && midx > 0) /* %r */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1203 status = qf_parse_fmt_r(regmatch, midx, tail);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1204 else if (midx > 0) /* others */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1205 status = (qf_parse_fmt[i])(regmatch, midx, fields);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1206
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1207 if (status != QF_OK)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1208 return status;
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1209 }
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1210
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1211 return QF_OK;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1212 }
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1213
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1214 /*
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1215 * Parse an error line in 'linebuf' using a single error format string in
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1216 * 'fmt_ptr->prog' and return the matching values in 'fields'.
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1217 * Returns QF_OK if the efm format matches completely and the fields are
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1218 * successfully copied. Otherwise returns QF_FAIL or QF_NOMEM.
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1219 */
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1220 static int
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1221 qf_parse_get_fields(
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1222 char_u *linebuf,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1223 int linelen,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1224 efm_T *fmt_ptr,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1225 qffields_T *fields,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1226 int qf_multiline,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1227 int qf_multiscan,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1228 char_u **tail)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1229 {
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1230 regmatch_T regmatch;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1231 int status = QF_FAIL;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1232 int r;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1233
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1234 if (qf_multiscan &&
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1235 vim_strchr((char_u *)"OPQ", fmt_ptr->prefix) == NULL)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1236 return QF_FAIL;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1237
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1238 fields->namebuf[0] = NUL;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1239 fields->module[0] = NUL;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1240 fields->pattern[0] = NUL;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1241 if (!qf_multiscan)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1242 fields->errmsg[0] = NUL;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1243 fields->lnum = 0;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1244 fields->col = 0;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1245 fields->use_viscol = FALSE;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1246 fields->enr = -1;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1247 fields->type = 0;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1248 *tail = NULL;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1249
13921 3b6c29f8c1a2 patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':' Christian Brabandt <cb@256bit.org> parents: 13882 diff changeset	1250 /* Always ignore case when looking for a matching error. */
3b6c29f8c1a2 patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':' Christian Brabandt <cb@256bit.org> parents: 13882 diff changeset	1251 regmatch.rm_ic = TRUE;
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1252 regmatch.regprog = fmt_ptr->prog;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1253 r = vim_regexec(&regmatch, linebuf, (colnr_T)0);
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1254 fmt_ptr->prog = regmatch.regprog;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1255 if (r)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1256 status = qf_parse_match(linebuf, linelen, fmt_ptr, &regmatch,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1257 fields, qf_multiline, qf_multiscan, tail);
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1258
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1259 return status;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1260 }
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1261
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1262 /*
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1263 * Parse directory error format prefixes (%D and %X).
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1264 * Push and pop directories from the directory stack when scanning directory
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1265 * names.
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1266 */
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1267 static int
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1268 qf_parse_dir_pfx(int idx, qffields_T fields, qf_list_T qfl)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1269 {
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1270 if (idx == 'D') /* enter directory */
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1271 {
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1272 if (*fields->namebuf == NUL)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1273 {
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1274 EMSG(_("E379: Missing or empty directory name"));
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1275 return QF_FAIL;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1276 }
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1277 qfl->qf_directory =
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1278 qf_push_dir(fields->namebuf, &qfl->qf_dir_stack, FALSE);
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1279 if (qfl->qf_directory == NULL)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1280 return QF_FAIL;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1281 }
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1282 else if (idx == 'X') /* leave directory */
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1283 qfl->qf_directory = qf_pop_dir(&qfl->qf_dir_stack);
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1284
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1285 return QF_OK;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1286 }
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1287
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1288 /*
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1289 * Parse global file name error format prefixes (%O, %P and %Q).
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1290 */
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1291 static int
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1292 qf_parse_file_pfx(
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1293 int idx,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1294 qffields_T *fields,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1295 qf_list_T *qfl,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1296 char_u *tail)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1297 {
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1298 fields->valid = FALSE;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1299 if (*fields->namebuf == NUL \|\| mch_getperm(fields->namebuf) >= 0)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1300 {
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1301 if (*fields->namebuf && idx == 'P')
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1302 qfl->qf_currfile =
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1303 qf_push_dir(fields->namebuf, &qfl->qf_file_stack, TRUE);
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1304 else if (idx == 'Q')
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1305 qfl->qf_currfile = qf_pop_dir(&qfl->qf_file_stack);
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1306 *fields->namebuf = NUL;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1307 if (tail && *tail)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1308 {
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1309 STRMOVE(IObuff, skipwhite(tail));
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1310 qfl->qf_multiscan = TRUE;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1311 return QF_MULTISCAN;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1312 }
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1313 }
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1314
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1315 return QF_OK;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1316 }
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1317
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1318 /*
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1319 * Parse a non-error line (a line which doesn't match any of the error
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1320 * format in 'efm').
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1321 */
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1322 static int
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1323 qf_parse_line_nomatch(char_u linebuf, int linelen, qffields_T fields)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1324 {
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1325 char_u *p;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1326
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1327 fields->namebuf[0] = NUL; /* no match found, remove file name */
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1328 fields->lnum = 0; /* don't jump to this line */
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1329 fields->valid = FALSE;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1330 if (linelen >= fields->errmsglen)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1331 {
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1332 /* linelen + null terminator */
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1333 if ((p = vim_realloc(fields->errmsg, linelen + 1)) == NULL)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1334 return QF_NOMEM;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1335 fields->errmsg = p;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1336 fields->errmsglen = linelen + 1;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1337 }
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1338 /* copy whole line to error message */
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1339 vim_strncpy(fields->errmsg, linebuf, linelen);
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1340
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1341 return QF_OK;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1342 }
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1343
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1344 /*
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1345 * Parse multi-line error format prefixes (%C and %Z)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1346 */
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1347 static int
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1348 qf_parse_multiline_pfx(
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1349 qf_info_T *qi,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1350 int qf_idx,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1351 int idx,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1352 qf_list_T *qfl,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1353 qffields_T *fields)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1354 {
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1355 char_u *ptr;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1356 int len;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1357
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1358 if (!qfl->qf_multiignore)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1359 {
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1360 qfline_T *qfprev = qfl->qf_last;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1361
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1362 if (qfprev == NULL)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1363 return QF_FAIL;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1364 if (*fields->errmsg && !qfl->qf_multiignore)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1365 {
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1366 len = (int)STRLEN(qfprev->qf_text);
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1367 if ((ptr = alloc((unsigned)(len + STRLEN(fields->errmsg) + 2)))
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1368 == NULL)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1369 return QF_FAIL;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1370 STRCPY(ptr, qfprev->qf_text);
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1371 vim_free(qfprev->qf_text);
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1372 qfprev->qf_text = ptr;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1373 *(ptr += len) = '\n';
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1374 STRCPY(++ptr, fields->errmsg);
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1375 }
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1376 if (qfprev->qf_nr == -1)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1377 qfprev->qf_nr = fields->enr;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1378 if (vim_isprintc(fields->type) && !qfprev->qf_type)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1379 /* only printable chars allowed */
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1380 qfprev->qf_type = fields->type;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1381
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1382 if (!qfprev->qf_lnum)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1383 qfprev->qf_lnum = fields->lnum;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1384 if (!qfprev->qf_col)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1385 qfprev->qf_col = fields->col;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1386 qfprev->qf_viscol = fields->use_viscol;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1387 if (!qfprev->qf_fnum)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1388 qfprev->qf_fnum = qf_get_fnum(qi, qf_idx,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1389 qfl->qf_directory,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1390 *fields->namebuf \|\| qfl->qf_directory != NULL
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1391 ? fields->namebuf
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1392 : qfl->qf_currfile != NULL && fields->valid
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1393 ? qfl->qf_currfile : 0);
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1394 }
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1395 if (idx == 'Z')
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1396 qfl->qf_multiline = qfl->qf_multiignore = FALSE;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1397 line_breakcheck();
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1398
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1399 return QF_IGNORE_LINE;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1400 }
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1401
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1402 /*
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1403 * Parse a line and get the quickfix fields.
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1404 * Return the QF_ status.
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1405 */
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1406 static int
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1407 qf_parse_line(
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1408 qf_info_T *qi,
11700 dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	1409 int qf_idx,
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1410 char_u *linebuf,
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1411 int linelen,
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1412 efm_T *fmt_first,
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1413 qffields_T *fields)
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1414 {
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1415 efm_T *fmt_ptr;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1416 int idx = 0;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1417 char_u *tail = NULL;
11700 dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	1418 qf_list_T *qfl = &qi->qf_lists[qf_idx];
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1419 int status;
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1420
13612 89223f5d5d12 patch 8.0.1678: errorformat "%r" implies "%>" Christian Brabandt <cb@256bit.org> parents: 13594 diff changeset	1421 restofline:
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1422 /* If there was no %> item start at the first pattern */
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1423 if (fmt_start == NULL)
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1424 fmt_ptr = fmt_first;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1425 else
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1426 {
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1427 /* Otherwise start from the last used pattern */
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1428 fmt_ptr = fmt_start;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1429 fmt_start = NULL;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1430 }
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1431
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1432 /*
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1433 * Try to match each part of 'errorformat' until we find a complete
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1434 * match or no match.
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1435 */
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1436 fields->valid = TRUE;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1437 for ( ; fmt_ptr != NULL; fmt_ptr = fmt_ptr->next)
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1438 {
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1439 idx = fmt_ptr->prefix;
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1440 status = qf_parse_get_fields(linebuf, linelen, fmt_ptr, fields,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1441 qfl->qf_multiline, qfl->qf_multiscan, &tail);
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1442 if (status == QF_NOMEM)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1443 return status;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1444 if (status == QF_OK)
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1445 break;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1446 }
11700 dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	1447 qfl->qf_multiscan = FALSE;
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1448
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1449 if (fmt_ptr == NULL \|\| idx == 'D' \|\| idx == 'X')
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1450 {
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1451 if (fmt_ptr != NULL)
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1452 {
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1453 /* 'D' and 'X' directory specifiers */
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1454 status = qf_parse_dir_pfx(idx, fields, qfl);
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1455 if (status != QF_OK)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1456 return status;
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1457 }
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1458
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1459 status = qf_parse_line_nomatch(linebuf, linelen, fields);
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1460 if (status != QF_OK)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1461 return status;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1462
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1463 if (fmt_ptr == NULL)
11700 dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	1464 qfl->qf_multiline = qfl->qf_multiignore = FALSE;
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1465 }
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1466 else if (fmt_ptr != NULL)
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1467 {
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1468 /* honor %> item */
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1469 if (fmt_ptr->conthere)
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1470 fmt_start = fmt_ptr;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1471
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1472 if (vim_strchr((char_u *)"AEWI", idx) != NULL)
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1473 {
11700 dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	1474 qfl->qf_multiline = TRUE; /* start of a multi-line message */
dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	1475 qfl->qf_multiignore = FALSE;/* reset continuation */
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1476 }
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1477 else if (vim_strchr((char_u *)"CZ", idx) != NULL)
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1478 { /* continuation of multi-line msg */
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1479 status = qf_parse_multiline_pfx(qi, qf_idx, idx, qfl, fields);
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1480 if (status != QF_OK)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1481 return status;
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1482 }
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1483 else if (vim_strchr((char_u *)"OPQ", idx) != NULL)
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1484 { /* global file names */
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1485 status = qf_parse_file_pfx(idx, fields, qfl, tail);
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1486 if (status == QF_MULTISCAN)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1487 goto restofline;
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1488 }
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1489 if (fmt_ptr->flags == '-') /* generally exclude this line */
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1490 {
11700 dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	1491 if (qfl->qf_multiline)
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1492 /* also exclude continuation lines */
11700 dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	1493 qfl->qf_multiignore = TRUE;
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1494 return QF_IGNORE_LINE;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1495 }
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1496 }
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1497
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1498 return QF_OK;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1499 }
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1500
9033 0536d1469b67 commit https://github.com/vim/vim/commit/6be8c8e165204b8aa4eeb8a52be87a58d8b41b9e Christian Brabandt <cb@256bit.org> parents: 8932 diff changeset	1501 /*
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1502 * Returns TRUE if the specified quickfix/location list is empty.
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1503 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1504 static int
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1505 qf_list_empty(qf_info_T *qi, int qf_idx)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1506 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1507 if (qi == NULL \|\| qf_idx < 0 \|\| qf_idx >= LISTCOUNT)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1508 return TRUE;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1509 return qi->qf_lists[qf_idx].qf_count <= 0;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1510 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1511
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1512 /*
13992 710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1513 * Allocate the fields used for parsing lines and populating a quickfix list.
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1514 */
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1515 static int
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1516 qf_alloc_fields(qffields_T *pfields)
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1517 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1518 pfields->namebuf = alloc_id(CMDBUFFSIZE + 1, aid_qf_namebuf);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1519 pfields->module = alloc_id(CMDBUFFSIZE + 1, aid_qf_module);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1520 pfields->errmsglen = CMDBUFFSIZE + 1;
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1521 pfields->errmsg = alloc_id(pfields->errmsglen, aid_qf_errmsg);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1522 pfields->pattern = alloc_id(CMDBUFFSIZE + 1, aid_qf_pattern);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1523 if (pfields->namebuf == NULL \|\| pfields->errmsg == NULL
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1524 \|\| pfields->pattern == NULL \|\| pfields->module == NULL)
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1525 return FAIL;
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1526
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1527 return OK;
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1528 }
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1529
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1530 /*
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1531 * Free the fields used for parsing lines and populating a quickfix list.
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1532 */
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1533 static void
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1534 qf_free_fields(qffields_T *pfields)
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1535 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1536 vim_free(pfields->namebuf);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1537 vim_free(pfields->module);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1538 vim_free(pfields->errmsg);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1539 vim_free(pfields->pattern);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1540 }
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1541
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1542 /*
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1543 * Setup the state information used for parsing lines and populating a
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1544 * quickfix list.
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1545 */
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1546 static int
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1547 qf_setup_state(
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1548 qfstate_T *pstate,
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1549 char_u *enc,
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1550 char_u *efile,
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1551 typval_T *tv,
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1552 buf_T *buf,
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1553 linenr_T lnumfirst,
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1554 linenr_T lnumlast)
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1555 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1556 #ifdef FEAT_MBYTE
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1557 pstate->vc.vc_type = CONV_NONE;
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1558 if (enc != NULL && *enc != NUL)
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1559 convert_setup(&pstate->vc, enc, p_enc);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1560 #endif
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1561
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1562 if (efile != NULL && (pstate->fd = mch_fopen((char *)efile, "r")) == NULL)
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1563 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1564 EMSG2(_(e_openerrf), efile);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1565 return FAIL;
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1566 }
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1567
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1568 if (tv != NULL)
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1569 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1570 if (tv->v_type == VAR_STRING)
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1571 pstate->p_str = tv->vval.v_string;
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1572 else if (tv->v_type == VAR_LIST)
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1573 pstate->p_li = tv->vval.v_list->lv_first;
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1574 pstate->tv = tv;
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1575 }
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1576 pstate->buf = buf;
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1577 pstate->buflnum = lnumfirst;
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1578 pstate->lnumlast = lnumlast;
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1579
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1580 return OK;
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1581 }
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1582
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1583 /*
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1584 * Cleanup the state information used for parsing lines and populating a
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1585 * quickfix list.
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1586 */
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1587 static void
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1588 qf_cleanup_state(qfstate_T *pstate)
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1589 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1590 if (pstate->fd != NULL)
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1591 fclose(pstate->fd);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1592
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1593 vim_free(pstate->growbuf);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1594 #ifdef FEAT_MBYTE
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1595 if (pstate->vc.vc_type != CONV_NONE)
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1596 convert_setup(&pstate->vc, NULL, NULL);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1597 #endif
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1598 }
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1599
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1600 /*
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	1601 * Read the errorfile "efile" into memory, line by line, building the error
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	1602 * list.
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	1603 * Alternative: when "efile" is NULL read errors from buffer "buf".
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	1604 * Alternative: when "tv" is not NULL get errors from the string or list.
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	1605 * Always use 'errorformat' from "buf" if there is a local value.
2411 68e394361ca3 Add "q" item for 'statusline'. Add w:quickfix_title. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2296 diff changeset	1606 * Then "lnumfirst" and "lnumlast" specify the range of lines to use.
68e394361ca3 Add "q" item for 'statusline'. Add w:quickfix_title. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2296 diff changeset	1607 * Set the title of the list to "qf_title".
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	1608 * Return -1 for error, number of errors for success.
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	1609 */
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	1610 static int
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1611 qf_init_ext(
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1612 qf_info_T *qi,
11700 dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	1613 int qf_idx,
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1614 char_u *efile,
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1615 buf_T *buf,
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1616 typval_T *tv,
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1617 char_u *errorformat,
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1618 int newlist, /* TRUE: start a new error list */
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1619 linenr_T lnumfirst, /* first line number to use */
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1620 linenr_T lnumlast, /* last line number to use */
11063 e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	1621 char_u *qf_title,
e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	1622 char_u *enc)
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	1623 {
11700 dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	1624 qf_list_T *qfl;
11063 e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	1625 qfstate_T state;
e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	1626 qffields_T fields;
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	1627 qfline_T *old_last = NULL;
10369 4e5b307638cb commit https://github.com/vim/vim/commit/2b946c9f9b0e0fd805fb8f3e4c16e0a68ae13129 Christian Brabandt <cb@256bit.org> parents: 10367 diff changeset	1628 int adding = FALSE;
9397 e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	1629 static efm_T *fmt_first = NULL;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1630 char_u *efm;
9397 e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	1631 static char_u *last_efm = NULL;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1632 int retval = -1; /* default: return error flag */
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	1633 int status;
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1634
11443 30b3775addb2 patch 8.0.0605: the quickfix cached buffer may become invalid Christian Brabandt <cb@256bit.org> parents: 11426 diff changeset	1635 /* Do not used the cached buffer, it may have been wiped out. */
13244 ac42c4b11dbc patch 8.0.1496: clearing a pointer takes two lines Christian Brabandt <cb@256bit.org> parents: 13115 diff changeset	1636 VIM_CLEAR(qf_last_bufname);
11443 30b3775addb2 patch 8.0.0605: the quickfix cached buffer may become invalid Christian Brabandt <cb@256bit.org> parents: 11426 diff changeset	1637
11063 e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	1638 vim_memset(&state, 0, sizeof(state));
e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	1639 vim_memset(&fields, 0, sizeof(fields));
13992 710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1640 if ((qf_alloc_fields(&fields) == FAIL) \|\|
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1641 (qf_setup_state(&state, enc, efile, tv, buf,
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1642 lnumfirst, lnumlast) == FAIL))
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1643 goto qf_init_end;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1644
11700 dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	1645 if (newlist \|\| qf_idx == qi->qf_listcount)
dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	1646 {
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1647 /* make place for a new list */
3965 eccae034465b updated for version 7.3.738 Bram Moolenaar <bram@vim.org> parents: 3949 diff changeset	1648 qf_new_list(qi, qf_title);
11700 dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	1649 qf_idx = qi->qf_curlist;
dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	1650 }
11609 6f11697fb92c patch 8.0.0687: minor issues related to quickfix Christian Brabandt <cb@256bit.org> parents: 11589 diff changeset	1651 else
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	1652 {
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	1653 /* Adding to existing list, use last entry. */
10369 4e5b307638cb commit https://github.com/vim/vim/commit/2b946c9f9b0e0fd805fb8f3e4c16e0a68ae13129 Christian Brabandt <cb@256bit.org> parents: 10367 diff changeset	1654 adding = TRUE;
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1655 if (!qf_list_empty(qi, qf_idx))
11700 dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	1656 old_last = qi->qf_lists[qf_idx].qf_last;
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	1657 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1658
11700 dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	1659 qfl = &qi->qf_lists[qf_idx];
dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	1660
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1661 /* Use the local value of 'errorformat' if it's set. */
446 7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	1662 if (errorformat == p_efm && tv == NULL && *buf->b_p_efm != NUL)
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	1663 efm = buf->b_p_efm;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1664 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1665 efm = errorformat;
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	1666
9397 e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	1667 /*
e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	1668 * If the errorformat didn't change between calls, then reuse the
e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	1669 * previously parsed values.
e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	1670 */
e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	1671 if (last_efm == NULL \|\| (STRCMP(last_efm, efm) != 0))
e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	1672 {
e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	1673 /* free the previously parsed data */
13244 ac42c4b11dbc patch 8.0.1496: clearing a pointer takes two lines Christian Brabandt <cb@256bit.org> parents: 13115 diff changeset	1674 VIM_CLEAR(last_efm);
9397 e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	1675 free_efm_list(&fmt_first);
e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	1676
e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	1677 /* parse the current 'efm' */
e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	1678 fmt_first = parse_efm_option(efm);
e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	1679 if (fmt_first != NULL)
e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	1680 last_efm = vim_strsave(efm);
e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	1681 }
e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	1682
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	1683 if (fmt_first == NULL) /* nothing found */
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1684 goto error2;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1685
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1686 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1687 * got_int is reset here, because it was probably set when killing the
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1688 * ":make" command, but we still want to read the errorfile then.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1689 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1690 got_int = FALSE;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1691
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1692 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1693 * Read the lines in the error file one by one.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1694 * Try to recognize one of the error formats in each line.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1695 */
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	1696 while (!got_int)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1697 {
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	1698 /* Get the next line from a file/buffer/list/string */
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	1699 status = qf_get_nextline(&state);
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	1700 if (status == QF_NOMEM) /* memory alloc failure */
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	1701 goto qf_init_end;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	1702 if (status == QF_END_OF_INPUT) /* end of input */
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	1703 break;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1704
11700 dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	1705 status = qf_parse_line(qi, qf_idx, state.linebuf, state.linelen,
dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	1706 fmt_first, &fields);
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1707 if (status == QF_FAIL)
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1708 goto error2;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1709 if (status == QF_NOMEM)
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1710 goto qf_init_end;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1711 if (status == QF_IGNORE_LINE)
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1712 continue;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1713
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	1714 if (qf_add_entry(qi,
11700 dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	1715 qf_idx,
dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	1716 qfl->qf_directory,
dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	1717 (*fields.namebuf \|\| qfl->qf_directory != NULL)
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1718 ? fields.namebuf
11700 dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	1719 : ((qfl->qf_currfile != NULL && fields.valid)
dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	1720 ? qfl->qf_currfile : (char_u *)NULL),
13821 98274127d675 patch 8.0.1782: no simple way to label quickfix entries Christian Brabandt <cb@256bit.org> parents: 13819 diff changeset	1721 fields.module,
1065 caa550fe4457 updated for version 7.0-191 vimboss parents: 1020 diff changeset	1722 0,
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1723 fields.errmsg,
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1724 fields.lnum,
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1725 fields.col,
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1726 fields.use_viscol,
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1727 fields.pattern,
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1728 fields.enr,
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1729 fields.type,
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1730 fields.valid) == FAIL)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1731 goto error2;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1732 line_breakcheck();
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1733 }
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	1734 if (state.fd == NULL \|\| !ferror(state.fd))
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1735 {
11700 dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	1736 if (qfl->qf_index == 0)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1737 {
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1738 /* no valid entry found */
11700 dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	1739 qfl->qf_ptr = qfl->qf_start;
dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	1740 qfl->qf_index = 1;
dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	1741 qfl->qf_nonevalid = TRUE;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1742 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1743 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1744 {
11700 dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	1745 qfl->qf_nonevalid = FALSE;
dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	1746 if (qfl->qf_ptr == NULL)
dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	1747 qfl->qf_ptr = qfl->qf_start;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1748 }
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1749 /* return number of matches */
11700 dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	1750 retval = qfl->qf_count;
9369 ce5b79b005ec commit https://github.com/vim/vim/commit/bcf7772a23624edc0942120e564f6b4ac95604ad Christian Brabandt <cb@256bit.org> parents: 9365 diff changeset	1751 goto qf_init_end;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1752 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1753 EMSG(_(e_readerrf));
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1754 error2:
10369 4e5b307638cb commit https://github.com/vim/vim/commit/2b946c9f9b0e0fd805fb8f3e4c16e0a68ae13129 Christian Brabandt <cb@256bit.org> parents: 10367 diff changeset	1755 if (!adding)
4e5b307638cb commit https://github.com/vim/vim/commit/2b946c9f9b0e0fd805fb8f3e4c16e0a68ae13129 Christian Brabandt <cb@256bit.org> parents: 10367 diff changeset	1756 {
11700 dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	1757 /* Error when creating a new list. Free the new list */
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	1758 qf_free(&qi->qf_lists[qi->qf_curlist]);
10369 4e5b307638cb commit https://github.com/vim/vim/commit/2b946c9f9b0e0fd805fb8f3e4c16e0a68ae13129 Christian Brabandt <cb@256bit.org> parents: 10367 diff changeset	1759 qi->qf_listcount--;
4e5b307638cb commit https://github.com/vim/vim/commit/2b946c9f9b0e0fd805fb8f3e4c16e0a68ae13129 Christian Brabandt <cb@256bit.org> parents: 10367 diff changeset	1760 if (qi->qf_curlist > 0)
4e5b307638cb commit https://github.com/vim/vim/commit/2b946c9f9b0e0fd805fb8f3e4c16e0a68ae13129 Christian Brabandt <cb@256bit.org> parents: 10367 diff changeset	1761 --qi->qf_curlist;
4e5b307638cb commit https://github.com/vim/vim/commit/2b946c9f9b0e0fd805fb8f3e4c16e0a68ae13129 Christian Brabandt <cb@256bit.org> parents: 10367 diff changeset	1762 }
9369 ce5b79b005ec commit https://github.com/vim/vim/commit/bcf7772a23624edc0942120e564f6b4ac95604ad Christian Brabandt <cb@256bit.org> parents: 9365 diff changeset	1763 qf_init_end:
11700 dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	1764 if (qf_idx == qi->qf_curlist)
dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	1765 qf_update_buffer(qi, old_last);
13992 710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1766 qf_cleanup_state(&state);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1767 qf_free_fields(&fields);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1768
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1769 return retval;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1770 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1771
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1772 /*
13992 710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1773 * Read the errorfile "efile" into memory, line by line, building the error
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1774 * list. Set the error list's title to qf_title.
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1775 * Return -1 for error, number of errors for success.
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1776 */
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1777 int
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1778 qf_init(win_T *wp,
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1779 char_u *efile,
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1780 char_u *errorformat,
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1781 int newlist, /* TRUE: start a new error list */
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1782 char_u *qf_title,
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1783 char_u *enc)
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1784 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1785 qf_info_T *qi = &ql_info;
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1786
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1787 if (wp != NULL)
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1788 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1789 qi = ll_get_or_alloc_list(wp);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1790 if (qi == NULL)
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1791 return FAIL;
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1792 }
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1793
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1794 return qf_init_ext(qi, qi->qf_curlist, efile, curbuf, NULL, errorformat,
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1795 newlist, (linenr_T)0, (linenr_T)0, qf_title, enc);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1796 }
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1797
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1798 /*
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1799 * Set the title of the specified quickfix list. Frees the previous title.
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1800 * Prepends ':' to the title.
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1801 */
6079 75ae211df37d updated for version 7.4.378 Bram Moolenaar <bram@vim.org> parents: 5753 diff changeset	1802 static void
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	1803 qf_store_title(qf_list_T qfl, char_u title)
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	1804 {
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	1805 VIM_CLEAR(qfl->qf_title);
11549 f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	1806
6079 75ae211df37d updated for version 7.4.378 Bram Moolenaar <bram@vim.org> parents: 5753 diff changeset	1807 if (title != NULL)
75ae211df37d updated for version 7.4.378 Bram Moolenaar <bram@vim.org> parents: 5753 diff changeset	1808 {
75ae211df37d updated for version 7.4.378 Bram Moolenaar <bram@vim.org> parents: 5753 diff changeset	1809 char_u *p = alloc((int)STRLEN(title) + 2);
75ae211df37d updated for version 7.4.378 Bram Moolenaar <bram@vim.org> parents: 5753 diff changeset	1810
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	1811 qfl->qf_title = p;
6079 75ae211df37d updated for version 7.4.378 Bram Moolenaar <bram@vim.org> parents: 5753 diff changeset	1812 if (p != NULL)
13921 3b6c29f8c1a2 patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':' Christian Brabandt <cb@256bit.org> parents: 13882 diff changeset	1813 STRCPY(p, title);
3b6c29f8c1a2 patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':' Christian Brabandt <cb@256bit.org> parents: 13882 diff changeset	1814 }
3b6c29f8c1a2 patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':' Christian Brabandt <cb@256bit.org> parents: 13882 diff changeset	1815 }
3b6c29f8c1a2 patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':' Christian Brabandt <cb@256bit.org> parents: 13882 diff changeset	1816
3b6c29f8c1a2 patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':' Christian Brabandt <cb@256bit.org> parents: 13882 diff changeset	1817 /*
3b6c29f8c1a2 patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':' Christian Brabandt <cb@256bit.org> parents: 13882 diff changeset	1818 * The title of a quickfix/location list is set, by default, to the command
3b6c29f8c1a2 patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':' Christian Brabandt <cb@256bit.org> parents: 13882 diff changeset	1819 * that created the quickfix list with the ":" prefix.
3b6c29f8c1a2 patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':' Christian Brabandt <cb@256bit.org> parents: 13882 diff changeset	1820 * Create a quickfix list title string by prepending ":" to a user command.
3b6c29f8c1a2 patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':' Christian Brabandt <cb@256bit.org> parents: 13882 diff changeset	1821 * Returns a pointer to a static buffer with the title.
3b6c29f8c1a2 patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':' Christian Brabandt <cb@256bit.org> parents: 13882 diff changeset	1822 */
3b6c29f8c1a2 patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':' Christian Brabandt <cb@256bit.org> parents: 13882 diff changeset	1823 static char_u *
3b6c29f8c1a2 patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':' Christian Brabandt <cb@256bit.org> parents: 13882 diff changeset	1824 qf_cmdtitle(char_u *cmd)
3b6c29f8c1a2 patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':' Christian Brabandt <cb@256bit.org> parents: 13882 diff changeset	1825 {
3b6c29f8c1a2 patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':' Christian Brabandt <cb@256bit.org> parents: 13882 diff changeset	1826 static char_u qftitle_str[IOSIZE];
3b6c29f8c1a2 patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':' Christian Brabandt <cb@256bit.org> parents: 13882 diff changeset	1827
3b6c29f8c1a2 patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':' Christian Brabandt <cb@256bit.org> parents: 13882 diff changeset	1828 vim_snprintf((char )qftitle_str, IOSIZE, ":%s", (char )cmd);
3b6c29f8c1a2 patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':' Christian Brabandt <cb@256bit.org> parents: 13882 diff changeset	1829 return qftitle_str;
6079 75ae211df37d updated for version 7.4.378 Bram Moolenaar <bram@vim.org> parents: 5753 diff changeset	1830 }
75ae211df37d updated for version 7.4.378 Bram Moolenaar <bram@vim.org> parents: 5753 diff changeset	1831
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1832 /*
12084 69ce6b3f0834 patch 8.0.0922: quickfix list always added after current one Christian Brabandt <cb@256bit.org> parents: 12048 diff changeset	1833 * Prepare for adding a new quickfix list. If the current list is in the
69ce6b3f0834 patch 8.0.0922: quickfix list always added after current one Christian Brabandt <cb@256bit.org> parents: 12048 diff changeset	1834 * middle of the stack, then all the following lists are freed and then
69ce6b3f0834 patch 8.0.0922: quickfix list always added after current one Christian Brabandt <cb@256bit.org> parents: 12048 diff changeset	1835 * the new list is added.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1836 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1837 static void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1838 qf_new_list(qf_info_T qi, char_u qf_title)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1839 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1840 int i;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1841
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1842 /*
6079 75ae211df37d updated for version 7.4.378 Bram Moolenaar <bram@vim.org> parents: 5753 diff changeset	1843 * If the current entry is not the last entry, delete entries beyond
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1844 * the current entry. This makes it possible to browse in a tree-like
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1845 * way with ":grep'.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1846 */
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1847 while (qi->qf_listcount > qi->qf_curlist + 1)
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	1848 qf_free(&qi->qf_lists[--qi->qf_listcount]);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1849
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1850 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1851 * When the stack is full, remove to oldest entry
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1852 * Otherwise, add a new entry.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1853 */
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1854 if (qi->qf_listcount == LISTCOUNT)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1855 {
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	1856 qf_free(&qi->qf_lists[0]);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1857 for (i = 1; i < LISTCOUNT; ++i)
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1858 qi->qf_lists[i - 1] = qi->qf_lists[i];
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1859 qi->qf_curlist = LISTCOUNT - 1;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1860 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1861 else
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1862 qi->qf_curlist = qi->qf_listcount++;
3259 9eb7fdfb5e63 updated for version 7.3.398 Bram Moolenaar <bram@vim.org> parents: 3257 diff changeset	1863 vim_memset(&qi->qf_lists[qi->qf_curlist], 0, (size_t)(sizeof(qf_list_T)));
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	1864 qf_store_title(&qi->qf_lists[qi->qf_curlist], qf_title);
12287 20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	1865 qi->qf_lists[qi->qf_curlist].qf_id = ++last_qf_id;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1866 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1867
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1868 /*
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	1869 * Free a location list stack
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1870 */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1871 static void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1872 ll_free_all(qf_info_T **pqi)
359 6c62b9b939bd updated for version 7.0093 vimboss parents: 297 diff changeset	1873 {
6c62b9b939bd updated for version 7.0093 vimboss parents: 297 diff changeset	1874 int i;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1875 qf_info_T *qi;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1876
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1877 qi = *pqi;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1878 if (qi == NULL)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1879 return;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1880 pqi = NULL; / Remove reference to this list */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1881
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1882 qi->qf_refcount--;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1883 if (qi->qf_refcount < 1)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1884 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1885 /* No references to this location list */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1886 for (i = 0; i < qi->qf_listcount; ++i)
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	1887 qf_free(&qi->qf_lists[i]);
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1888 vim_free(qi);
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1889 }
359 6c62b9b939bd updated for version 7.0093 vimboss parents: 297 diff changeset	1890 }
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1891
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1892 /*
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1893 * Free all the quickfix/location lists in the stack.
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1894 */
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1895 void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1896 qf_free_all(win_T *wp)
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1897 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1898 int i;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1899 qf_info_T *qi = &ql_info;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1900
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1901 if (wp != NULL)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1902 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1903 /* location list */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1904 ll_free_all(&wp->w_llist);
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1905 ll_free_all(&wp->w_llist_ref);
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1906 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1907 else
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1908 /* quickfix list */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1909 for (i = 0; i < qi->qf_listcount; ++i)
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	1910 qf_free(&qi->qf_lists[i]);
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1911 }
359 6c62b9b939bd updated for version 7.0093 vimboss parents: 297 diff changeset	1912
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1913 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1914 * Add an entry to the end of the list of errors.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1915 * Returns OK or FAIL.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1916 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1917 static int
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1918 qf_add_entry(
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1919 qf_info_T qi, / quickfix list */
11449 d2f00eb352b9 patch 8.0.0608: cannot manipulate other than the current quickfix list Christian Brabandt <cb@256bit.org> parents: 11447 diff changeset	1920 int qf_idx, /* list index */
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1921 char_u dir, / optional directory name */
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1922 char_u fname, / file name or NULL */
13821 98274127d675 patch 8.0.1782: no simple way to label quickfix entries Christian Brabandt <cb@256bit.org> parents: 13819 diff changeset	1923 char_u module, / module name or NULL */
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1924 int bufnum, /* buffer number or zero */
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1925 char_u mesg, / message */
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1926 long lnum, /* line number */
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1927 int col, /* column */
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1928 int vis_col, /* using visual column */
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1929 char_u pattern, / search pattern */
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1930 int nr, /* error number */
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1931 int type, /* type character */
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1932 int valid) /* valid entry */
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1933 {
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	1934 qf_list_T *qfl = &qi->qf_lists[qf_idx];
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	1935 qfline_T *qfp;
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	1936 qfline_T *lastp; / pointer to qf_last or NULL */
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1937
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	1938 if ((qfp = (qfline_T *)alloc((unsigned)sizeof(qfline_T))) == NULL)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1939 return FAIL;
1065 caa550fe4457 updated for version 7.0-191 vimboss parents: 1020 diff changeset	1940 if (bufnum != 0)
9201 692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	1941 {
692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	1942 buf_T *buf = buflist_findnr(bufnum);
692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	1943
1065 caa550fe4457 updated for version 7.0-191 vimboss parents: 1020 diff changeset	1944 qfp->qf_fnum = bufnum;
9201 692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	1945 if (buf != NULL)
9608 fa64afb99dda commit https://github.com/vim/vim/commit/c1542744e788d96fed24dd421f43009288092504 Christian Brabandt <cb@256bit.org> parents: 9579 diff changeset	1946 buf->b_has_qf_entry \|=
14560 8413e66d00a1 patch 8.1.0293: checks for type of stack is cryptic Christian Brabandt <cb@256bit.org> parents: 14552 diff changeset	1947 IS_QF_STACK(qi) ? BUF_HAS_QF_ENTRY : BUF_HAS_LL_ENTRY;
9201 692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	1948 }
1065 caa550fe4457 updated for version 7.0-191 vimboss parents: 1020 diff changeset	1949 else
11700 dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	1950 qfp->qf_fnum = qf_get_fnum(qi, qf_idx, dir, fname);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1951 if ((qfp->qf_text = vim_strsave(mesg)) == NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1952 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1953 vim_free(qfp);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1954 return FAIL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1955 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1956 qfp->qf_lnum = lnum;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1957 qfp->qf_col = col;
170 8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	1958 qfp->qf_viscol = vis_col;
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	1959 if (pattern == NULL \|\| *pattern == NUL)
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	1960 qfp->qf_pattern = NULL;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	1961 else if ((qfp->qf_pattern = vim_strsave(pattern)) == NULL)
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	1962 {
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	1963 vim_free(qfp->qf_text);
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	1964 vim_free(qfp);
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	1965 return FAIL;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	1966 }
13821 98274127d675 patch 8.0.1782: no simple way to label quickfix entries Christian Brabandt <cb@256bit.org> parents: 13819 diff changeset	1967 if (module == NULL \|\| *module == NUL)
98274127d675 patch 8.0.1782: no simple way to label quickfix entries Christian Brabandt <cb@256bit.org> parents: 13819 diff changeset	1968 qfp->qf_module = NULL;
98274127d675 patch 8.0.1782: no simple way to label quickfix entries Christian Brabandt <cb@256bit.org> parents: 13819 diff changeset	1969 else if ((qfp->qf_module = vim_strsave(module)) == NULL)
98274127d675 patch 8.0.1782: no simple way to label quickfix entries Christian Brabandt <cb@256bit.org> parents: 13819 diff changeset	1970 {
98274127d675 patch 8.0.1782: no simple way to label quickfix entries Christian Brabandt <cb@256bit.org> parents: 13819 diff changeset	1971 vim_free(qfp->qf_text);
98274127d675 patch 8.0.1782: no simple way to label quickfix entries Christian Brabandt <cb@256bit.org> parents: 13819 diff changeset	1972 vim_free(qfp->qf_pattern);
98274127d675 patch 8.0.1782: no simple way to label quickfix entries Christian Brabandt <cb@256bit.org> parents: 13819 diff changeset	1973 vim_free(qfp);
98274127d675 patch 8.0.1782: no simple way to label quickfix entries Christian Brabandt <cb@256bit.org> parents: 13819 diff changeset	1974 return FAIL;
98274127d675 patch 8.0.1782: no simple way to label quickfix entries Christian Brabandt <cb@256bit.org> parents: 13819 diff changeset	1975 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1976 qfp->qf_nr = nr;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1977 if (type != 1 && !vim_isprintc(type)) /* only printable chars allowed */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1978 type = 0;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1979 qfp->qf_type = type;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1980 qfp->qf_valid = valid;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1981
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	1982 lastp = &qfl->qf_last;
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1983 if (qf_list_empty(qi, qf_idx)) /* first element in the list */
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1984 {
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	1985 qfl->qf_start = qfp;
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	1986 qfl->qf_ptr = qfp;
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	1987 qfl->qf_index = 0;
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	1988 qfp->qf_prev = NULL;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1989 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1990 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1991 {
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	1992 qfp->qf_prev = *lastp;
543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	1993 (*lastp)->qf_next = qfp;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1994 }
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	1995 qfp->qf_next = NULL;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1996 qfp->qf_cleared = FALSE;
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	1997 *lastp = qfp;
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	1998 ++qfl->qf_count;
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	1999 if (qfl->qf_index == 0 && qfp->qf_valid)
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2000 /* first valid entry */
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2001 {
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2002 qfl->qf_index = qfl->qf_count;
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2003 qfl->qf_ptr = qfp;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2004 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2005
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2006 return OK;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2007 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2008
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2009 /*
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2010 * Allocate a new location list stack
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2011 */
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	2012 static qf_info_T *
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	2013 ll_new_list(void)
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2014 {
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	2015 qf_info_T *qi;
d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	2016
14495 178162aeebeb patch 8.1.0261: Coverity complains about a negative array index Christian Brabandt <cb@256bit.org> parents: 14491 diff changeset	2017 qi = (qf_info_T *)alloc_clear((unsigned)sizeof(qf_info_T));
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	2018 if (qi != NULL)
d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	2019 qi->qf_refcount++;
d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	2020 return qi;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2021 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2022
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2023 /*
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2024 * Return the location list stack for window 'wp'.
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2025 * If not present, allocate a location list stack
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2026 */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2027 static qf_info_T *
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	2028 ll_get_or_alloc_list(win_T *wp)
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2029 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2030 if (IS_LL_WINDOW(wp))
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2031 /* For a location list window, use the referenced location list */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2032 return wp->w_llist_ref;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2033
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2034 /*
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2035 * For a non-location list window, w_llist_ref should not point to a
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2036 * location list.
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2037 */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2038 ll_free_all(&wp->w_llist_ref);
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2039
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2040 if (wp->w_llist == NULL)
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	2041 wp->w_llist = ll_new_list(); /* new location list */
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2042 return wp->w_llist;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2043 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2044
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2045 /*
14844 a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2046 * Copy location list entries from 'from_qfl' to 'to_qfl'.
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2047 */
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2048 static int
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2049 copy_loclist_entries(qf_list_T from_qfl, qf_list_T to_qfl, qf_info_T *to_qi)
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2050 {
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2051 int i;
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2052 qfline_T *from_qfp;
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2053 qfline_T *prevp;
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2054
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2055 // copy all the location entries in this list
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2056 for (i = 0, from_qfp = from_qfl->qf_start;
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2057 i < from_qfl->qf_count && from_qfp != NULL;
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2058 ++i, from_qfp = from_qfp->qf_next)
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2059 {
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2060 if (qf_add_entry(to_qi,
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2061 to_qi->qf_curlist,
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2062 NULL,
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2063 NULL,
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2064 from_qfp->qf_module,
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2065 0,
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2066 from_qfp->qf_text,
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2067 from_qfp->qf_lnum,
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2068 from_qfp->qf_col,
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2069 from_qfp->qf_viscol,
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2070 from_qfp->qf_pattern,
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2071 from_qfp->qf_nr,
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2072 0,
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2073 from_qfp->qf_valid) == FAIL)
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2074 return FAIL;
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2075
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2076 // qf_add_entry() will not set the qf_num field, as the
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2077 // directory and file names are not supplied. So the qf_fnum
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2078 // field is copied here.
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2079 prevp = to_qfl->qf_last;
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2080 prevp->qf_fnum = from_qfp->qf_fnum; // file number
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2081 prevp->qf_type = from_qfp->qf_type; // error type
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2082 if (from_qfl->qf_ptr == from_qfp)
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2083 to_qfl->qf_ptr = prevp; // current location
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2084 }
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2085
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2086 return OK;
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2087 }
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2088
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2089 /*
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2090 * Copy the specified location list 'from_qfl' to 'to_qfl'.
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2091 */
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2092 static int
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2093 copy_loclist(qf_list_T from_qfl, qf_list_T to_qfl, qf_info_T *to_qi)
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2094 {
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2095 // Some of the fields are populated by qf_add_entry()
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2096 to_qfl->qf_nonevalid = from_qfl->qf_nonevalid;
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2097 to_qfl->qf_count = 0;
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2098 to_qfl->qf_index = 0;
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2099 to_qfl->qf_start = NULL;
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2100 to_qfl->qf_last = NULL;
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2101 to_qfl->qf_ptr = NULL;
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2102 if (from_qfl->qf_title != NULL)
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2103 to_qfl->qf_title = vim_strsave(from_qfl->qf_title);
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2104 else
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2105 to_qfl->qf_title = NULL;
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2106 if (from_qfl->qf_ctx != NULL)
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2107 {
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2108 to_qfl->qf_ctx = alloc_tv();
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2109 if (to_qfl->qf_ctx != NULL)
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2110 copy_tv(from_qfl->qf_ctx, to_qfl->qf_ctx);
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2111 }
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2112 else
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2113 to_qfl->qf_ctx = NULL;
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2114
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2115 if (from_qfl->qf_count)
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2116 if (copy_loclist_entries(from_qfl, to_qfl, to_qi) == FAIL)
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2117 return FAIL;
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2118
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2119 to_qfl->qf_index = from_qfl->qf_index; // current index in the list
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2120
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2121 // Assign a new ID for the location list
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2122 to_qfl->qf_id = ++last_qf_id;
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2123 to_qfl->qf_changedtick = 0L;
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2124
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2125 // When no valid entries are present in the list, qf_ptr points to
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2126 // the first item in the list
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2127 if (to_qfl->qf_nonevalid)
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2128 {
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2129 to_qfl->qf_ptr = to_qfl->qf_start;
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2130 to_qfl->qf_index = 1;
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2131 }
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2132
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2133 return OK;
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2134 }
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2135
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2136 /*
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2137 * Copy the location list stack 'from' window to 'to' window.
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2138 */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2139 void
14844 a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2140 copy_loclist_stack(win_T from, win_T to)
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2141 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2142 qf_info_T *qi;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2143 int idx;
14844 a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2144
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2145 // When copying from a location list window, copy the referenced
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2146 // location list. For other windows, copy the location list for
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2147 // that window.
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2148 if (IS_LL_WINDOW(from))
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2149 qi = from->w_llist_ref;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2150 else
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2151 qi = from->w_llist;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2152
14844 a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2153 if (qi == NULL) // no location list to copy
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2154 return;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2155
14844 a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2156 // allocate a new location list
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	2157 if ((to->w_llist = ll_new_list()) == NULL)
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2158 return;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2159
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2160 to->w_llist->qf_listcount = qi->qf_listcount;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2161
14844 a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2162 // Copy the location lists one at a time
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	2163 for (idx = 0; idx < qi->qf_listcount; ++idx)
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2164 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2165 to->w_llist->qf_curlist = idx;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2166
14844 a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2167 if (copy_loclist(&qi->qf_lists[idx],
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2168 &to->w_llist->qf_lists[idx], to->w_llist) == FAIL)
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2169 {
14844 a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2170 qf_free_all(to);
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2171 return;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2172 }
14844 a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2173 }
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2174
a74786d0370c patch 8.1.0434: copy_loclist() is too long Christian Brabandt <cb@256bit.org> parents: 14838 diff changeset	2175 to->w_llist->qf_curlist = qi->qf_curlist; // current list
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2176 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2177
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2178 /*
10379 73e2a7abe2a3 commit https://github.com/vim/vim/commit/7618e00d3b8bfe064cfc524640d754607361f9df Christian Brabandt <cb@256bit.org> parents: 10369 diff changeset	2179 * Get buffer number for file "directory/fname".
9201 692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2180 * Also sets the b_has_qf_entry flag.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2181 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2182 static int
11700 dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	2183 qf_get_fnum(qf_info_T qi, int qf_idx, char_u directory, char_u *fname)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2184 {
9473 bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2185 char_u *ptr = NULL;
9201 692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2186 buf_T *buf;
9473 bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2187 char_u *bufname;
9201 692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2188
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2189 if (fname == NULL \|\| fname == NUL) / no file name */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2190 return 0;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2191
2823 8bd38abda314 updated for version 7.3.187 Bram Moolenaar <bram@vim.org> parents: 2795 diff changeset	2192 #ifdef VMS
9201 692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2193 vms_remove_version(fname);
2823 8bd38abda314 updated for version 7.3.187 Bram Moolenaar <bram@vim.org> parents: 2795 diff changeset	2194 #endif
8bd38abda314 updated for version 7.3.187 Bram Moolenaar <bram@vim.org> parents: 2795 diff changeset	2195 #ifdef BACKSLASH_IN_FILENAME
9201 692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2196 if (directory != NULL)
692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2197 slash_adjust(directory);
692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2198 slash_adjust(fname);
2823 8bd38abda314 updated for version 7.3.187 Bram Moolenaar <bram@vim.org> parents: 2795 diff changeset	2199 #endif
9201 692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2200 if (directory != NULL && !vim_isAbsName(fname)
692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2201 && (ptr = concat_fnames(directory, fname, TRUE)) != NULL)
692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2202 {
692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2203 /*
692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2204 * Here we check if the file really exists.
692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2205 * This should normally be true, but if make works without
692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2206 * "leaving directory"-messages we might have missed a
692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2207 * directory change.
692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2208 */
692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2209 if (mch_getperm(ptr) < 0)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2210 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2211 vim_free(ptr);
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2212 directory = qf_guess_filepath(&qi->qf_lists[qf_idx], fname);
9201 692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2213 if (directory)
692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2214 ptr = concat_fnames(directory, fname, TRUE);
692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2215 else
692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2216 ptr = vim_strsave(fname);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2217 }
9201 692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2218 /* Use concatenated directory name and file name */
9473 bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2219 bufname = ptr;
bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2220 }
bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2221 else
bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2222 bufname = fname;
bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2223
bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2224 if (qf_last_bufname != NULL && STRCMP(bufname, qf_last_bufname) == 0
9475 4d8f7f8da90c commit https://github.com/vim/vim/commit/b25f9a97e9aad3cbb4bc3fe87cdbd5700f8aa0c6 Christian Brabandt <cb@256bit.org> parents: 9473 diff changeset	2225 && bufref_valid(&qf_last_bufref))
9473 bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2226 {
9475 4d8f7f8da90c commit https://github.com/vim/vim/commit/b25f9a97e9aad3cbb4bc3fe87cdbd5700f8aa0c6 Christian Brabandt <cb@256bit.org> parents: 9473 diff changeset	2227 buf = qf_last_bufref.br_buf;
9201 692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2228 vim_free(ptr);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2229 }
9201 692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2230 else
9473 bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2231 {
bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2232 vim_free(qf_last_bufname);
bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2233 buf = buflist_new(bufname, NULL, (linenr_T)0, BLN_NOOPT);
bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2234 if (bufname == ptr)
bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2235 qf_last_bufname = bufname;
bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2236 else
bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2237 qf_last_bufname = vim_strsave(bufname);
9475 4d8f7f8da90c commit https://github.com/vim/vim/commit/b25f9a97e9aad3cbb4bc3fe87cdbd5700f8aa0c6 Christian Brabandt <cb@256bit.org> parents: 9473 diff changeset	2238 set_bufref(&qf_last_bufref, buf);
9473 bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2239 }
9201 692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2240 if (buf == NULL)
692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2241 return 0;
9473 bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2242
9608 fa64afb99dda commit https://github.com/vim/vim/commit/c1542744e788d96fed24dd421f43009288092504 Christian Brabandt <cb@256bit.org> parents: 9579 diff changeset	2243 buf->b_has_qf_entry =
14560 8413e66d00a1 patch 8.1.0293: checks for type of stack is cryptic Christian Brabandt <cb@256bit.org> parents: 14552 diff changeset	2244 IS_QF_STACK(qi) ? BUF_HAS_QF_ENTRY : BUF_HAS_LL_ENTRY;
9201 692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2245 return buf->b_fnum;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2246 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2247
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2248 /*
9334 674f9e3ccd1a commit https://github.com/vim/vim/commit/38df43bd13a2498cc96b3ddd9a20dd75126bd171 Christian Brabandt <cb@256bit.org> parents: 9201 diff changeset	2249 * Push dirbuf onto the directory stack and return pointer to actual dir or
674f9e3ccd1a commit https://github.com/vim/vim/commit/38df43bd13a2498cc96b3ddd9a20dd75126bd171 Christian Brabandt <cb@256bit.org> parents: 9201 diff changeset	2250 * NULL on error.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2251 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2252 static char_u *
9397 e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	2253 qf_push_dir(char_u dirbuf, struct dir_stack_T *stackptr, int is_file_stack)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2254 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2255 struct dir_stack_T *ds_new;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2256 struct dir_stack_T *ds_ptr;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2257
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2258 /* allocate new stack element and hook it in */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2259 ds_new = (struct dir_stack_T *)alloc((unsigned)sizeof(struct dir_stack_T));
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2260 if (ds_new == NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2261 return NULL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2262
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2263 ds_new->next = *stackptr;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2264 *stackptr = ds_new;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2265
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2266 /* store directory on the stack */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2267 if (vim_isAbsName(dirbuf)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2268 \|\| (*stackptr)->next == NULL
9397 e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	2269 \|\| (*stackptr && is_file_stack))
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2270 (*stackptr)->dirname = vim_strsave(dirbuf);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2271 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2272 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2273 /* Okay we don't have an absolute path.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2274 * dirbuf must be a subdir of one of the directories on the stack.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2275 * Let's search...
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2276 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2277 ds_new = (*stackptr)->next;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2278 (*stackptr)->dirname = NULL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2279 while (ds_new)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2280 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2281 vim_free((*stackptr)->dirname);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2282 (*stackptr)->dirname = concat_fnames(ds_new->dirname, dirbuf,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2283 TRUE);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2284 if (mch_isdir((*stackptr)->dirname) == TRUE)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2285 break;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2286
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2287 ds_new = ds_new->next;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2288 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2289
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2290 /* clean up all dirs we already left */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2291 while ((*stackptr)->next != ds_new)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2292 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2293 ds_ptr = (*stackptr)->next;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2294 (stackptr)->next = (stackptr)->next->next;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2295 vim_free(ds_ptr->dirname);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2296 vim_free(ds_ptr);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2297 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2298
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2299 /* Nothing found -> it must be on top level */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2300 if (ds_new == NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2301 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2302 vim_free((*stackptr)->dirname);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2303 (*stackptr)->dirname = vim_strsave(dirbuf);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2304 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2305 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2306
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2307 if ((*stackptr)->dirname != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2308 return (*stackptr)->dirname;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2309 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2310 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2311 ds_ptr = *stackptr;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2312 stackptr = (stackptr)->next;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2313 vim_free(ds_ptr);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2314 return NULL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2315 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2316 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2317
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2318 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2319 * pop dirbuf from the directory stack and return previous directory or NULL if
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2320 * stack is empty
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2321 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2322 static char_u *
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	2323 qf_pop_dir(struct dir_stack_T **stackptr)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2324 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2325 struct dir_stack_T *ds_ptr;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2326
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2327 /* TODO: Should we check if dirbuf is the directory on top of the stack?
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2328 * What to do if it isn't? */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2329
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2330 /* pop top element and free it */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2331 if (*stackptr != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2332 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2333 ds_ptr = *stackptr;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2334 stackptr = (stackptr)->next;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2335 vim_free(ds_ptr->dirname);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2336 vim_free(ds_ptr);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2337 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2338
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2339 /* return NEW top element as current dir or NULL if stack is empty*/
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2340 return stackptr ? (stackptr)->dirname : NULL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2341 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2342
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2343 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2344 * clean up directory stack
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2345 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2346 static void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	2347 qf_clean_dir_stack(struct dir_stack_T **stackptr)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2348 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2349 struct dir_stack_T *ds_ptr;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2350
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2351 while ((ds_ptr = *stackptr) != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2352 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2353 stackptr = (stackptr)->next;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2354 vim_free(ds_ptr->dirname);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2355 vim_free(ds_ptr);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2356 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2357 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2358
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2359 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2360 * Check in which directory of the directory stack the given file can be
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2361 * found.
7092 64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	2362 * Returns a pointer to the directory name or NULL if not found.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2363 * Cleans up intermediate directory entries.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2364 *
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2365 * TODO: How to solve the following problem?
13882 f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2366 * If we have this directory tree:
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2367 * ./
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2368 * ./aa
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2369 * ./aa/bb
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2370 * ./bb
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2371 * ./bb/x.c
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2372 * and make says:
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2373 * making all in aa
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2374 * making all in bb
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2375 * x.c:9: Error
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2376 * Then qf_push_dir thinks we are in ./aa/bb, but we are in ./bb.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2377 * qf_guess_filepath will return NULL.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2378 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2379 static char_u *
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2380 qf_guess_filepath(qf_list_T qfl, char_u filename)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2381 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2382 struct dir_stack_T *ds_ptr;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2383 struct dir_stack_T *ds_tmp;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2384 char_u *fullname;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2385
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2386 /* no dirs on the stack - there's nothing we can do */
11700 dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	2387 if (qfl->qf_dir_stack == NULL)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2388 return NULL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2389
11700 dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	2390 ds_ptr = qfl->qf_dir_stack->next;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2391 fullname = NULL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2392 while (ds_ptr)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2393 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2394 vim_free(fullname);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2395 fullname = concat_fnames(ds_ptr->dirname, filename, TRUE);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2396
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2397 /* If concat_fnames failed, just go on. The worst thing that can happen
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2398 * is that we delete the entire stack.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2399 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2400 if ((fullname != NULL) && (mch_getperm(fullname) >= 0))
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2401 break;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2402
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2403 ds_ptr = ds_ptr->next;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2404 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2405
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2406 vim_free(fullname);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2407
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2408 /* clean up all dirs we already left */
11700 dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	2409 while (qfl->qf_dir_stack->next != ds_ptr)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2410 {
11700 dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	2411 ds_tmp = qfl->qf_dir_stack->next;
dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	2412 qfl->qf_dir_stack->next = qfl->qf_dir_stack->next->next;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2413 vim_free(ds_tmp->dirname);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2414 vim_free(ds_tmp);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2415 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2416
13882 f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2417 return ds_ptr == NULL ? NULL : ds_ptr->dirname;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2418 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2419
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2420 /*
13090 a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2421 * Returns TRUE if a quickfix/location list with the given identifier exists.
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2422 */
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2423 static int
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2424 qflist_valid (win_T *wp, int_u qf_id)
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2425 {
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2426 qf_info_T *qi = &ql_info;
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2427 int i;
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2428
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2429 if (wp != NULL)
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2430 {
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2431 qi = GET_LOC_LIST(wp); /* Location list */
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2432 if (qi == NULL)
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2433 return FALSE;
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2434 }
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2435
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2436 for (i = 0; i < qi->qf_listcount; ++i)
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2437 if (qi->qf_lists[i].qf_id == qf_id)
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2438 return TRUE;
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2439
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2440 return FALSE;
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2441 }
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2442
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2443 /*
14250 ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	2444 * When loading a file from the quickfix, the autocommands may modify it.
8702 39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2445 * This may invalidate the current quickfix entry. This function checks
13882 f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2446 * whether an entry is still present in the quickfix list.
8702 39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2447 * Similar to location list.
39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2448 */
39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2449 static int
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2450 is_qf_entry_present(qf_list_T qfl, qfline_T qf_ptr)
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2451 {
8702 39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2452 qfline_T *qfp;
39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2453 int i;
39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2454
39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2455 /* Search for the entry in the current list */
39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2456 for (i = 0, qfp = qfl->qf_start; i < qfl->qf_count;
39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2457 ++i, qfp = qfp->qf_next)
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	2458 if (qfp == NULL \|\| qfp == qf_ptr)
8702 39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2459 break;
39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2460
39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2461 if (i == qfl->qf_count) /* Entry is not found */
39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2462 return FALSE;
39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2463
39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2464 return TRUE;
39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2465 }
39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2466
39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2467 /*
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2468 * Get the next valid entry in the current quickfix/location list. The search
12503 4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2469 * starts from the current entry. Returns NULL on failure.
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2470 */
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2471 static qfline_T *
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2472 get_next_valid_entry(
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2473 qf_list_T *qfl,
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2474 qfline_T *qf_ptr,
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2475 int *qf_index,
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2476 int dir)
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2477 {
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2478 int idx;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2479 int old_qf_fnum;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2480
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2481 idx = *qf_index;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2482 old_qf_fnum = qf_ptr->qf_fnum;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2483
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2484 do
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2485 {
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2486 if (idx == qfl->qf_count \|\| qf_ptr->qf_next == NULL)
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2487 return NULL;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2488 ++idx;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2489 qf_ptr = qf_ptr->qf_next;
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2490 } while ((!qfl->qf_nonevalid && !qf_ptr->qf_valid)
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2491 \|\| (dir == FORWARD_FILE && qf_ptr->qf_fnum == old_qf_fnum));
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2492
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2493 *qf_index = idx;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2494 return qf_ptr;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2495 }
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2496
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2497 /*
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2498 * Get the previous valid entry in the current quickfix/location list. The
12503 4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2499 * search starts from the current entry. Returns NULL on failure.
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2500 */
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2501 static qfline_T *
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2502 get_prev_valid_entry(
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2503 qf_list_T *qfl,
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2504 qfline_T *qf_ptr,
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2505 int *qf_index,
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2506 int dir)
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2507 {
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2508 int idx;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2509 int old_qf_fnum;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2510
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2511 idx = *qf_index;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2512 old_qf_fnum = qf_ptr->qf_fnum;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2513
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2514 do
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2515 {
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2516 if (idx == 1 \|\| qf_ptr->qf_prev == NULL)
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2517 return NULL;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2518 --idx;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2519 qf_ptr = qf_ptr->qf_prev;
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2520 } while ((!qfl->qf_nonevalid && !qf_ptr->qf_valid)
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2521 \|\| (dir == BACKWARD_FILE && qf_ptr->qf_fnum == old_qf_fnum));
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2522
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2523 *qf_index = idx;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2524 return qf_ptr;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2525 }
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2526
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2527 /*
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2528 * Get the n'th (errornr) previous/next valid entry from the current entry in
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2529 * the quickfix list.
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2530 * dir == FORWARD or FORWARD_FILE: next valid entry
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2531 * dir == BACKWARD or BACKWARD_FILE: previous valid entry
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2532 */
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2533 static qfline_T *
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2534 get_nth_valid_entry(
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2535 qf_list_T *qfl,
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2536 int errornr,
14838 6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2537 int dir,
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2538 int *new_qfidx)
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2539 {
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2540 qfline_T *qf_ptr = qfl->qf_ptr;
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2541 int qf_idx = qfl->qf_index;
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2542 qfline_T *prev_qf_ptr;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2543 int prev_index;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2544 static char_u e_no_more_items = (char_u )N_("E553: No more items");
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2545 char_u *err = e_no_more_items;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2546
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2547 while (errornr--)
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2548 {
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2549 prev_qf_ptr = qf_ptr;
14838 6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2550 prev_index = qf_idx;
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2551
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2552 if (dir == FORWARD \|\| dir == FORWARD_FILE)
14838 6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2553 qf_ptr = get_next_valid_entry(qfl, qf_ptr, &qf_idx, dir);
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2554 else
14838 6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2555 qf_ptr = get_prev_valid_entry(qfl, qf_ptr, &qf_idx, dir);
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2556 if (qf_ptr == NULL)
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2557 {
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2558 qf_ptr = prev_qf_ptr;
14838 6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2559 qf_idx = prev_index;
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2560 if (err != NULL)
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2561 {
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2562 EMSG(_(err));
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2563 return NULL;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2564 }
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2565 break;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2566 }
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2567
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2568 err = NULL;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2569 }
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2570
14838 6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2571 *new_qfidx = qf_idx;
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2572 return qf_ptr;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2573 }
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2574
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2575 /*
14838 6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2576 * Get n'th (errornr) quickfix entry from the current entry in the quickfix
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2577 * list 'qfl'. Returns a pointer to the new entry and the index in 'new_qfidx'
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2578 */
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2579 static qfline_T *
14838 6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2580 get_nth_entry(qf_list_T qfl, int errornr, int new_qfidx)
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2581 {
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2582 qfline_T *qf_ptr = qfl->qf_ptr;
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2583 int qf_idx = qfl->qf_index;
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2584
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2585 // New error number is less than the current error number
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2586 while (errornr < qf_idx && qf_idx > 1 && qf_ptr->qf_prev != NULL)
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2587 {
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2588 --qf_idx;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2589 qf_ptr = qf_ptr->qf_prev;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2590 }
14838 6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2591 // New error number is greater than the current error number
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2592 while (errornr > qf_idx && qf_idx < qfl->qf_count &&
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2593 qf_ptr->qf_next != NULL)
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2594 {
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2595 ++qf_idx;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2596 qf_ptr = qf_ptr->qf_next;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2597 }
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2598
14838 6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2599 *new_qfidx = qf_idx;
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2600 return qf_ptr;
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2601 }
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2602
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2603 /*
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2604 * Get a entry specied by 'errornr' and 'dir' from the current
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2605 * quickfix/location list. 'errornr' specifies the index of the entry and 'dir'
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2606 * specifies the direction (FORWARD/BACKWARD/FORWARD_FILE/BACKWARD_FILE).
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2607 * Returns a pointer to the entry and the index of the new entry is stored in
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2608 * 'new_qfidx'.
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2609 */
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2610 static qfline_T *
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2611 qf_get_entry(
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2612 qf_list_T *qfl,
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2613 int errornr,
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2614 int dir,
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2615 int *new_qfidx)
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2616 {
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2617 qfline_T *qf_ptr = qfl->qf_ptr;
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2618 int qfidx = qfl->qf_index;
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2619
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2620 if (dir != 0) // next/prev valid entry
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2621 qf_ptr = get_nth_valid_entry(qfl, errornr, dir, &qfidx);
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2622 else if (errornr != 0) // go to specified number
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2623 qf_ptr = get_nth_entry(qfl, errornr, &qfidx);
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2624
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2625 *new_qfidx = qfidx;
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2626 return qf_ptr;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2627 }
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2628
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2629 /*
13882 f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2630 * Find a window displaying a Vim help file.
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2631 */
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2632 static win_T *
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2633 qf_find_help_win(void)
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2634 {
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2635 win_T *wp;
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2636
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2637 FOR_ALL_WINDOWS(wp)
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2638 if (bt_help(wp->w_buffer))
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2639 return wp;
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2640
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2641 return NULL;
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2642 }
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2643
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2644 /*
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2645 * Find a help window or open one.
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2646 */
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2647 static int
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2648 jump_to_help_window(qf_info_T qi, int opened_window)
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2649 {
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2650 win_T *wp;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2651 int flags;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2652
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2653 if (cmdmod.tab != 0)
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2654 wp = NULL;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2655 else
13882 f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2656 wp = qf_find_help_win();
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2657 if (wp != NULL && wp->w_buffer->b_nwindows > 0)
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2658 win_enter(wp, TRUE);
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2659 else
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2660 {
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2661 /*
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2662 * Split off help window; put it at far top if no position
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2663 * specified, the current window is vertically split and narrow.
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2664 */
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2665 flags = WSP_HELP;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2666 if (cmdmod.split == 0 && curwin->w_width != Columns
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2667 && curwin->w_width < 80)
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2668 flags \|= WSP_TOP;
14560 8413e66d00a1 patch 8.1.0293: checks for type of stack is cryptic Christian Brabandt <cb@256bit.org> parents: 14552 diff changeset	2669 if (IS_LL_STACK(qi))
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2670 flags \|= WSP_NEWLOC; /* don't copy the location list */
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2671
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2672 if (win_split(0, flags) == FAIL)
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2673 return FAIL;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2674
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2675 *opened_window = TRUE;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2676
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2677 if (curwin->w_height < p_hh)
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2678 win_setheight((int)p_hh);
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2679
14560 8413e66d00a1 patch 8.1.0293: checks for type of stack is cryptic Christian Brabandt <cb@256bit.org> parents: 14552 diff changeset	2680 if (IS_LL_STACK(qi)) // not a quickfix list
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2681 {
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2682 /* The new window should use the supplied location list */
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2683 curwin->w_llist = qi;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2684 qi->qf_refcount++;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2685 }
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2686 }
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2687
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2688 if (!p_im)
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2689 restart_edit = 0; /* don't want insert mode in help file */
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2690
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2691 return OK;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2692 }
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2693
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2694 /*
13882 f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2695 * Find a non-quickfix window using the given location list.
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2696 * Returns NULL if a matching window is not found.
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2697 */
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2698 static win_T *
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2699 qf_find_win_with_loclist(qf_info_T *ll)
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2700 {
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2701 win_T *wp;
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2702
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2703 FOR_ALL_WINDOWS(wp)
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2704 if (wp->w_llist == ll && !bt_quickfix(wp->w_buffer))
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2705 return wp;
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2706
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2707 return NULL;
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2708 }
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2709
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2710 /*
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2711 * Find a window containing a normal buffer
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2712 */
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2713 static win_T *
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2714 qf_find_win_with_normal_buf(void)
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2715 {
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2716 win_T *wp;
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2717
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2718 FOR_ALL_WINDOWS(wp)
14433 4a94173743d9 patch 8.1.0230: directly checking 'buftype' value Christian Brabandt <cb@256bit.org> parents: 14397 diff changeset	2719 if (bt_normal(wp->w_buffer))
13882 f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2720 return wp;
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2721
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2722 return NULL;
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2723 }
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2724
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2725 /*
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2726 * Go to a window in any tabpage containing the specified file. Returns TRUE
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2727 * if successfully jumped to the window. Otherwise returns FALSE.
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2728 */
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2729 static int
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2730 qf_goto_tabwin_with_file(int fnum)
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2731 {
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2732 tabpage_T *tp;
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2733 win_T *wp;
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2734
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2735 FOR_ALL_TAB_WINDOWS(tp, wp)
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2736 if (wp->w_buffer->b_fnum == fnum)
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2737 {
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2738 goto_tabpage_win(tp, wp);
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2739 return TRUE;
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2740 }
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2741
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2742 return FALSE;
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2743 }
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2744
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2745 /*
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2746 * Create a new window to show a file above the quickfix window. Called when
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2747 * only the quickfix window is present.
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2748 */
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2749 static int
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2750 qf_open_new_file_win(qf_info_T *ll_ref)
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2751 {
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2752 int flags;
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2753
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2754 flags = WSP_ABOVE;
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2755 if (ll_ref != NULL)
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2756 flags \|= WSP_NEWLOC;
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2757 if (win_split(0, flags) == FAIL)
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2758 return FAIL; /* not enough room for window */
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2759 p_swb = empty_option; /* don't split again */
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2760 swb_flags = 0;
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2761 RESET_BINDING(curwin);
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2762 if (ll_ref != NULL)
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2763 {
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2764 /* The new window should use the location list from the
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2765 * location list window */
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2766 curwin->w_llist = ll_ref;
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2767 ll_ref->qf_refcount++;
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2768 }
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2769 return OK;
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2770 }
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2771
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2772 /*
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2773 * Go to a window that shows the right buffer. If the window is not found, go
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2774 * to the window just above the location list window. This is used for opening
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2775 * a file from a location window and not from a quickfix window. If some usable
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2776 * window is previously found, then it is supplied in 'use_win'.
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2777 */
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2778 static void
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2779 qf_goto_win_with_ll_file(win_T use_win, int qf_fnum, qf_info_T ll_ref)
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2780 {
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2781 win_T *win = use_win;
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2782
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2783 if (win == NULL)
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2784 {
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2785 /* Find the window showing the selected file */
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2786 FOR_ALL_WINDOWS(win)
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2787 if (win->w_buffer->b_fnum == qf_fnum)
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2788 break;
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2789 if (win == NULL)
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2790 {
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2791 /* Find a previous usable window */
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2792 win = curwin;
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2793 do
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2794 {
14433 4a94173743d9 patch 8.1.0230: directly checking 'buftype' value Christian Brabandt <cb@256bit.org> parents: 14397 diff changeset	2795 if (bt_normal(win->w_buffer))
13882 f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2796 break;
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2797 if (win->w_prev == NULL)
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2798 win = lastwin; /* wrap around the top */
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2799 else
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2800 win = win->w_prev; /* go to previous window */
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2801 } while (win != curwin);
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2802 }
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2803 }
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2804 win_goto(win);
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2805
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2806 /* If the location list for the window is not set, then set it
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2807 * to the location list from the location window */
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2808 if (win->w_llist == NULL)
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2809 {
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2810 win->w_llist = ll_ref;
14250 ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	2811 if (ll_ref != NULL)
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	2812 ll_ref->qf_refcount++;
13882 f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2813 }
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2814 }
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2815
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2816 /*
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2817 * Go to a window that contains the specified buffer 'qf_fnum'. If a window is
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2818 * not found, then go to the window just above the quickfix window. This is
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2819 * used for opening a file from a quickfix window and not from a location
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2820 * window.
13882 f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2821 */
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2822 static void
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2823 qf_goto_win_with_qfl_file(int qf_fnum)
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2824 {
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2825 win_T *win;
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2826 win_T *altwin;
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2827
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2828 win = curwin;
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2829 altwin = NULL;
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2830 for (;;)
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2831 {
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2832 if (win->w_buffer->b_fnum == qf_fnum)
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2833 break;
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2834 if (win->w_prev == NULL)
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2835 win = lastwin; /* wrap around the top */
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2836 else
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2837 win = win->w_prev; /* go to previous window */
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2838
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2839 if (IS_QF_WINDOW(win))
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2840 {
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2841 /* Didn't find it, go to the window before the quickfix
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2842 * window. */
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2843 if (altwin != NULL)
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2844 win = altwin;
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2845 else if (curwin->w_prev != NULL)
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2846 win = curwin->w_prev;
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2847 else
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2848 win = curwin->w_next;
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2849 break;
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2850 }
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2851
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2852 /* Remember a usable window. */
14433 4a94173743d9 patch 8.1.0230: directly checking 'buftype' value Christian Brabandt <cb@256bit.org> parents: 14397 diff changeset	2853 if (altwin == NULL && !win->w_p_pvw && bt_normal(win->w_buffer))
13882 f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2854 altwin = win;
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2855 }
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2856
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2857 win_goto(win);
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2858 }
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2859
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2860 /*
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2861 * Find a suitable window for opening a file (qf_fnum) from the
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2862 * quickfix/location list and jump to it. If the file is already opened in a
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2863 * window, jump to it. Otherwise open a new window to display the file. This is
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2864 * called from either a quickfix or a location list window.
12503 4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2865 */
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2866 static int
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2867 qf_jump_to_usable_window(int qf_fnum, int *opened_window)
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2868 {
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2869 win_T *usable_win_ptr = NULL;
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2870 int usable_win;
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2871 qf_info_T *ll_ref;
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2872 win_T *win;
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2873
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2874 usable_win = 0;
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2875
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2876 ll_ref = curwin->w_llist_ref;
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2877 if (ll_ref != NULL)
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2878 {
13882 f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2879 /* Find a non-quickfix window with this location list */
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2880 usable_win_ptr = qf_find_win_with_loclist(ll_ref);
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2881 if (usable_win_ptr != NULL)
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2882 usable_win = 1;
12503 4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2883 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2884
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2885 if (!usable_win)
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2886 {
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2887 /* Locate a window showing a normal buffer */
13882 f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2888 win = qf_find_win_with_normal_buf();
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2889 if (win != NULL)
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2890 usable_win = 1;
12503 4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2891 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2892
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2893 /*
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2894 * If no usable window is found and 'switchbuf' contains "usetab"
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2895 * then search in other tabs.
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2896 */
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2897 if (!usable_win && (swb_flags & SWB_USETAB))
13882 f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2898 usable_win = qf_goto_tabwin_with_file(qf_fnum);
12503 4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2899
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2900 /*
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2901 * If there is only one window and it is the quickfix window, create a
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2902 * new one above the quickfix window.
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2903 */
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2904 if ((ONE_WINDOW && bt_quickfix(curbuf)) \|\| !usable_win)
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2905 {
13882 f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2906 if (qf_open_new_file_win(ll_ref) != OK)
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2907 return FAIL;
12503 4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2908 opened_window = TRUE; / close it when fail */
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2909 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2910 else
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2911 {
13882 f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2912 if (curwin->w_llist_ref != NULL) /* In a location window */
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2913 qf_goto_win_with_ll_file(usable_win_ptr, qf_fnum, ll_ref);
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2914 else /* In a quickfix window */
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2915 qf_goto_win_with_qfl_file(qf_fnum);
12503 4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2916 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2917
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2918 return OK;
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2919 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2920
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2921 /*
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2922 * Edit the selected file or help file.
14838 6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2923 * Returns OK if successfully edited the file, FAIL on failing to open the
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2924 * buffer and NOTDONE if the quickfix/location list was freed by an autocmd
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2925 * when opening the buffer.
12503 4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2926 */
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2927 static int
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2928 qf_jump_edit_buffer(
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2929 qf_info_T *qi,
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2930 qfline_T *qf_ptr,
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2931 int forceit,
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2932 win_T *oldwin,
14838 6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2933 int *opened_window)
12503 4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2934 {
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2935 qf_list_T *qfl = &qi->qf_lists[qi->qf_curlist];
12503 4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2936 int retval = OK;
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2937
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2938 if (qf_ptr->qf_type == 1)
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2939 {
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2940 /* Open help file (do_ecmd() will set b_help flag, readfile() will
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2941 * set b_p_ro flag). */
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2942 if (!can_abandon(curbuf, forceit))
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2943 {
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2944 no_write_message();
13800 e4dc4ede9ef8 patch 8.0.1772: quickfix: mixup of FALSE and FAIL, returning -1 Christian Brabandt <cb@256bit.org> parents: 13764 diff changeset	2945 retval = FAIL;
12503 4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2946 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2947 else
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2948 retval = do_ecmd(qf_ptr->qf_fnum, NULL, NULL, NULL, (linenr_T)1,
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2949 ECMD_HIDE + ECMD_SET_HELP,
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2950 oldwin == curwin ? curwin : NULL);
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2951 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2952 else
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2953 {
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2954 int old_qf_curlist = qi->qf_curlist;
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2955 int save_qfid = qfl->qf_id;
12503 4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2956
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2957 retval = buflist_getfile(qf_ptr->qf_fnum,
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2958 (linenr_T)1, GETF_SETMARK \| GETF_SWITCH, forceit);
13090 a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2959
14560 8413e66d00a1 patch 8.1.0293: checks for type of stack is cryptic Christian Brabandt <cb@256bit.org> parents: 14552 diff changeset	2960 if (IS_LL_STACK(qi))
12503 4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2961 {
13090 a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2962 /*
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2963 * Location list. Check whether the associated window is still
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2964 * present and the list is still valid.
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2965 */
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2966 if (!win_valid_any_tab(oldwin))
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2967 {
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2968 EMSG(_("E924: Current window was closed"));
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2969 *opened_window = FALSE;
14838 6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2970 return NOTDONE;
13090 a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2971 }
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2972 else if (!qflist_valid(oldwin, save_qfid))
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2973 {
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2974 EMSG(_(e_loc_list_changed));
14838 6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2975 return NOTDONE;
13090 a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2976 }
12503 4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2977 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2978 else if (old_qf_curlist != qi->qf_curlist
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2979 \|\| !is_qf_entry_present(qfl, qf_ptr))
12503 4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2980 {
14560 8413e66d00a1 patch 8.1.0293: checks for type of stack is cryptic Christian Brabandt <cb@256bit.org> parents: 14552 diff changeset	2981 if (IS_QF_STACK(qi))
12503 4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2982 EMSG(_("E925: Current quickfix was changed"));
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2983 else
13090 a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2984 EMSG(_(e_loc_list_changed));
14838 6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	2985 return NOTDONE;
12503 4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2986 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2987 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2988
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2989 return retval;
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2990 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2991
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2992 /*
13882 f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2993 * Go to the error line in the current file using either line/column number or
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2994 * a search pattern.
12503 4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2995 */
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2996 static void
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2997 qf_jump_goto_line(
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2998 linenr_T qf_lnum,
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2999 int qf_col,
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3000 char_u qf_viscol,
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3001 char_u *qf_pattern)
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3002 {
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3003 linenr_T i;
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3004 char_u *line;
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3005 colnr_T screen_col;
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3006 colnr_T char_col;
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3007
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3008 if (qf_pattern == NULL)
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3009 {
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3010 /*
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3011 * Go to line with error, unless qf_lnum is 0.
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3012 */
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3013 i = qf_lnum;
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3014 if (i > 0)
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3015 {
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3016 if (i > curbuf->b_ml.ml_line_count)
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3017 i = curbuf->b_ml.ml_line_count;
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3018 curwin->w_cursor.lnum = i;
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3019 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3020 if (qf_col > 0)
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3021 {
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3022 curwin->w_cursor.col = qf_col - 1;
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3023 #ifdef FEAT_VIRTUALEDIT
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3024 curwin->w_cursor.coladd = 0;
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3025 #endif
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3026 if (qf_viscol == TRUE)
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3027 {
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3028 /*
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3029 * Check each character from the beginning of the error
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3030 * line up to the error column. For each tab character
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3031 * found, reduce the error column value by the length of
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3032 * a tab character.
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3033 */
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3034 line = ml_get_curline();
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3035 screen_col = 0;
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3036 for (char_col = 0; char_col < curwin->w_cursor.col; ++char_col)
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3037 {
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3038 if (*line == NUL)
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3039 break;
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3040 if (*line++ == '\t')
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3041 {
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3042 curwin->w_cursor.col -= 7 - (screen_col % 8);
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3043 screen_col += 8 - (screen_col % 8);
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3044 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3045 else
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3046 ++screen_col;
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3047 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3048 }
14552 b298737a7188 patch 8.1.0289: cursor moves to wrong column after quickfix jump Christian Brabandt <cb@256bit.org> parents: 14550 diff changeset	3049 curwin->w_set_curswant = TRUE;
12503 4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3050 check_cursor();
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3051 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3052 else
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3053 beginline(BL_WHITE \| BL_FIX);
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3054 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3055 else
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3056 {
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3057 pos_T save_cursor;
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3058
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3059 /* Move the cursor to the first line in the buffer */
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3060 save_cursor = curwin->w_cursor;
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3061 curwin->w_cursor.lnum = 0;
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3062 if (!do_search(NULL, '/', qf_pattern, (long)1,
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3063 SEARCH_KEEP, NULL, NULL))
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3064 curwin->w_cursor = save_cursor;
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3065 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3066 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3067
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3068 /*
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3069 * Display quickfix list index and size message
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3070 */
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3071 static void
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3072 qf_jump_print_msg(
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3073 qf_info_T *qi,
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3074 int qf_index,
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3075 qfline_T *qf_ptr,
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3076 buf_T *old_curbuf,
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3077 linenr_T old_lnum)
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3078 {
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3079 linenr_T i;
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3080 int len;
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3081
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3082 /* Update the screen before showing the message, unless the screen
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3083 * scrolled up. */
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3084 if (!msg_scrolled)
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3085 update_topline_redraw();
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3086 sprintf((char *)IObuff, _("(%d of %d)%s%s: "), qf_index,
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3087 qi->qf_lists[qi->qf_curlist].qf_count,
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3088 qf_ptr->qf_cleared ? _(" (line deleted)") : "",
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3089 (char *)qf_types(qf_ptr->qf_type, qf_ptr->qf_nr));
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3090 /* Add the message, skipping leading whitespace and newlines. */
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3091 len = (int)STRLEN(IObuff);
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3092 qf_fmt_text(skipwhite(qf_ptr->qf_text), IObuff + len, IOSIZE - len);
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3093
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3094 /* Output the message. Overwrite to avoid scrolling when the 'O'
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3095 * flag is present in 'shortmess'; But when not jumping, print the
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3096 * whole message. */
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3097 i = msg_scroll;
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3098 if (curbuf == old_curbuf && curwin->w_cursor.lnum == old_lnum)
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3099 msg_scroll = TRUE;
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3100 else if (!msg_scrolled && shortmess(SHM_OVERALL))
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3101 msg_scroll = FALSE;
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3102 msg_attr_keep(IObuff, 0, TRUE);
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3103 msg_scroll = i;
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3104 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3105
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3106 /*
14838 6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3107 * Find a usable window for opening a file from the quickfix/location list. If
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3108 * a window is not found then open a new window.
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3109 * Returns OK if successfully jumped or opened a window. Returns FAIL if not
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3110 * able to jump/open a window. Returns NOTDONE if a file is not associated
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3111 * with the entry.
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3112 */
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3113 static int
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3114 qf_jump_open_window(qf_info_T qi, qfline_T qf_ptr, int *opened_window)
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3115 {
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3116 // For ":helpgrep" find a help window or open one.
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3117 if (qf_ptr->qf_type == 1 && (!bt_help(curwin->w_buffer) \|\| cmdmod.tab != 0))
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3118 if (jump_to_help_window(qi, opened_window) == FAIL)
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3119 return FAIL;
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3120
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3121 // If currently in the quickfix window, find another window to show the
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3122 // file in.
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3123 if (bt_quickfix(curbuf) && !*opened_window)
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3124 {
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3125 // If there is no file specified, we don't know where to go.
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3126 // But do advance, otherwise ":cn" gets stuck.
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3127 if (qf_ptr->qf_fnum == 0)
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3128 return NOTDONE;
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3129
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3130 if (qf_jump_to_usable_window(qf_ptr->qf_fnum, opened_window) == FAIL)
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3131 return FAIL;
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3132 }
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3133
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3134 return OK;
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3135 }
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3136
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3137 /*
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3138 * Edit a selected file from the quickfix/location list and jump to a
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3139 * particular line/column, adjust the folds and display a message about the
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3140 * jump.
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3141 * Returns OK on success and FAIL on failing to open the file/buffer. Returns
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3142 * NOTDONE if the quickfix/location list is freed by an autocmd when opening
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3143 * the file.
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3144 */
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3145 static int
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3146 qf_jump_to_buffer(
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3147 qf_info_T *qi,
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3148 int qf_index,
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3149 qfline_T *qf_ptr,
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3150 int forceit,
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3151 win_T *oldwin,
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3152 int *opened_window,
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3153 int openfold,
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3154 int print_message)
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3155 {
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3156 buf_T *old_curbuf;
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3157 linenr_T old_lnum;
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3158 int retval = OK;
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3159
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3160 // If there is a file name, read the wanted file if needed, and check
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3161 // autowrite etc.
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3162 old_curbuf = curbuf;
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3163 old_lnum = curwin->w_cursor.lnum;
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3164
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3165 if (qf_ptr->qf_fnum != 0)
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3166 {
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3167 retval = qf_jump_edit_buffer(qi, qf_ptr, forceit, oldwin,
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3168 opened_window);
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3169 if (retval != OK)
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3170 return retval;
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3171 }
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3172
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3173 // When not switched to another buffer, still need to set pc mark
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3174 if (curbuf == old_curbuf)
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3175 setpcmark();
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3176
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3177 qf_jump_goto_line(qf_ptr->qf_lnum, qf_ptr->qf_col, qf_ptr->qf_viscol,
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3178 qf_ptr->qf_pattern);
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3179
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3180 #ifdef FEAT_FOLDING
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3181 if ((fdo_flags & FDO_QUICKFIX) && openfold)
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3182 foldOpenCursor();
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3183 #endif
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3184 if (print_message)
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3185 qf_jump_print_msg(qi, qf_index, qf_ptr, old_curbuf, old_lnum);
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3186
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3187 return retval;
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3188 }
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3189
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3190 /*
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3191 * jump to a quickfix line
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3192 * if dir == FORWARD go "errornr" valid entries forward
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3193 * if dir == BACKWARD go "errornr" valid entries backward
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3194 * if dir == FORWARD_FILE go "errornr" valid entries files backward
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3195 * if dir == BACKWARD_FILE go "errornr" valid entries files backward
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3196 * else if "errornr" is zero, redisplay the same line
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3197 * else go to entry "errornr"
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3198 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3199 void
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	3200 qf_jump(qf_info_T *qi,
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	3201 int dir,
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	3202 int errornr,
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	3203 int forceit)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3204 {
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3205 qf_list_T *qfl;
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	3206 qfline_T *qf_ptr;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	3207 qfline_T *old_qf_ptr;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3208 int qf_index;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3209 int old_qf_index;
639 c79d4df4686e updated for version 7.0185 vimboss parents: 634 diff changeset	3210 char_u *old_swb = p_swb;
1621 82b5078be2dd updated for version 7.2a vimboss parents: 1571 diff changeset	3211 unsigned old_swb_flags = swb_flags;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3212 int opened_window = FALSE;
1743 734d5bdae499 updated for version 7.2-041 vimboss parents: 1683 diff changeset	3213 win_T *oldwin = curwin;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3214 int print_message = TRUE;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3215 #ifdef FEAT_FOLDING
14838 6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3216 int old_KeyTyped = KeyTyped; // getting file may reset it
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3217 #endif
12503 4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3218 int retval = OK;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3219
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	3220 if (qi == NULL)
d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	3221 qi = &ql_info;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3222
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3223 if (qi->qf_curlist >= qi->qf_listcount
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3224 \|\| qf_list_empty(qi, qi->qf_curlist))
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3225 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3226 EMSG(_(e_quickfix));
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3227 return;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3228 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3229
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3230 qfl = &qi->qf_lists[qi->qf_curlist];
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3231
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3232 qf_ptr = qfl->qf_ptr;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3233 old_qf_ptr = qf_ptr;
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3234 qf_index = qfl->qf_index;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3235 old_qf_index = qf_index;
14838 6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3236
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3237 qf_ptr = qf_get_entry(qfl, errornr, dir, &qf_index);
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3238 if (qf_ptr == NULL)
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3239 {
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3240 qf_ptr = old_qf_ptr;
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3241 qf_index = old_qf_index;
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3242 goto theend;
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3243 }
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3244
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3245 qfl->qf_index = qf_index;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3246 if (qf_win_pos_update(qi, old_qf_index))
14838 6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3247 // No need to print the error message if it's visible in the error
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3248 // window
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3249 print_message = FALSE;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3250
14838 6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3251 retval = qf_jump_open_window(qi, qf_ptr, &opened_window);
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3252 if (retval == FAIL)
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3253 goto failed;
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3254 if (retval == NOTDONE)
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3255 goto theend;
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3256
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3257 retval = qf_jump_to_buffer(qi, qf_index, qf_ptr, forceit, oldwin,
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3258 &opened_window, old_KeyTyped, print_message);
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3259 if (retval == NOTDONE)
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3260 {
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3261 // Quickfix/location list is freed by an autocmd
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3262 qi = NULL;
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3263 qf_ptr = NULL;
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3264 }
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3265
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3266 if (retval != OK)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3267 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3268 if (opened_window)
14838 6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3269 win_close(curwin, TRUE); // Close opened window
8605 536b9b88d1ca commit https://github.com/vim/vim/commit/0899d698030ec076eb26352cda1ea334ab0819d9 Christian Brabandt <cb@256bit.org> parents: 8603 diff changeset	3270 if (qf_ptr != NULL && qf_ptr->qf_fnum != 0)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3271 {
14838 6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3272 // Couldn't open file, so put index back where it was. This could
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3273 // happen if the file was readonly and we changed something.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3274 failed:
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3275 qf_ptr = old_qf_ptr;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3276 qf_index = old_qf_index;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3277 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3278 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3279 theend:
8605 536b9b88d1ca commit https://github.com/vim/vim/commit/0899d698030ec076eb26352cda1ea334ab0819d9 Christian Brabandt <cb@256bit.org> parents: 8603 diff changeset	3280 if (qi != NULL)
536b9b88d1ca commit https://github.com/vim/vim/commit/0899d698030ec076eb26352cda1ea334ab0819d9 Christian Brabandt <cb@256bit.org> parents: 8603 diff changeset	3281 {
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3282 qfl->qf_ptr = qf_ptr;
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3283 qfl->qf_index = qf_index;
8605 536b9b88d1ca commit https://github.com/vim/vim/commit/0899d698030ec076eb26352cda1ea334ab0819d9 Christian Brabandt <cb@256bit.org> parents: 8603 diff changeset	3284 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3285 if (p_swb != old_swb && opened_window)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3286 {
14838 6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3287 // Restore old 'switchbuf' value, but not when an autocommand or
6040d93396de patch 8.1.0431: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 14796 diff changeset	3288 // modeline has changed the value.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3289 if (p_swb == empty_option)
1621 82b5078be2dd updated for version 7.2a vimboss parents: 1571 diff changeset	3290 {
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3291 p_swb = old_swb;
1621 82b5078be2dd updated for version 7.2a vimboss parents: 1571 diff changeset	3292 swb_flags = old_swb_flags;
82b5078be2dd updated for version 7.2a vimboss parents: 1571 diff changeset	3293 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3294 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3295 free_string_option(old_swb);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3296 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3297 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3298
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3299 /*
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3300 * Highlight attributes used for displaying entries from the quickfix list.
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3301 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3302 static int qfFileAttr;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3303 static int qfSepAttr;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3304 static int qfLineAttr;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3305
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3306 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3307 * Display information about a single entry from the quickfix/location list.
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3308 * Used by ":clist/:llist" commands.
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3309 * 'cursel' will be set to TRUE for the currently selected entry in the
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3310 * quickfix list.
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3311 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3312 static void
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3313 qf_list_entry(qfline_T *qfp, int qf_idx, int cursel)
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3314 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3315 char_u *fname;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3316 buf_T *buf;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3317 int filter_entry;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3318
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3319 fname = NULL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3320 if (qfp->qf_module != NULL && *qfp->qf_module != NUL)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3321 vim_snprintf((char *)IObuff, IOSIZE, "%2d %s", qf_idx,
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3322 (char *)qfp->qf_module);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3323 else {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3324 if (qfp->qf_fnum != 0
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3325 && (buf = buflist_findnr(qfp->qf_fnum)) != NULL)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3326 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3327 fname = buf->b_fname;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3328 if (qfp->qf_type == 1) /* :helpgrep */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3329 fname = gettail(fname);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3330 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3331 if (fname == NULL)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3332 sprintf((char *)IObuff, "%2d", qf_idx);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3333 else
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3334 vim_snprintf((char *)IObuff, IOSIZE, "%2d %s",
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3335 qf_idx, (char *)fname);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3336 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3337
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3338 // Support for filtering entries using :filter /pat/ clist
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3339 // Match against the module name, file name, search pattern and
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3340 // text of the entry.
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3341 filter_entry = TRUE;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3342 if (qfp->qf_module != NULL && *qfp->qf_module != NUL)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3343 filter_entry &= message_filtered(qfp->qf_module);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3344 if (filter_entry && fname != NULL)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3345 filter_entry &= message_filtered(fname);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3346 if (filter_entry && qfp->qf_pattern != NULL)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3347 filter_entry &= message_filtered(qfp->qf_pattern);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3348 if (filter_entry)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3349 filter_entry &= message_filtered(qfp->qf_text);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3350 if (filter_entry)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3351 return;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3352
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3353 msg_putchar('\n');
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3354 msg_outtrans_attr(IObuff, cursel ? HL_ATTR(HLF_QFL) : qfFileAttr);
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3355
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3356 if (qfp->qf_lnum != 0)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3357 msg_puts_attr((char_u *)":", qfSepAttr);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3358 if (qfp->qf_lnum == 0)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3359 IObuff[0] = NUL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3360 else if (qfp->qf_col == 0)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3361 sprintf((char *)IObuff, "%ld", qfp->qf_lnum);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3362 else
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3363 sprintf((char *)IObuff, "%ld col %d",
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3364 qfp->qf_lnum, qfp->qf_col);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3365 sprintf((char *)IObuff + STRLEN(IObuff), "%s",
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3366 (char *)qf_types(qfp->qf_type, qfp->qf_nr));
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3367 msg_puts_attr(IObuff, qfLineAttr);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3368 msg_puts_attr((char_u *)":", qfSepAttr);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3369 if (qfp->qf_pattern != NULL)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3370 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3371 qf_fmt_text(qfp->qf_pattern, IObuff, IOSIZE);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3372 msg_puts(IObuff);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3373 msg_puts_attr((char_u *)":", qfSepAttr);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3374 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3375 msg_puts((char_u *)" ");
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3376
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3377 /* Remove newlines and leading whitespace from the text. For an
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3378 * unrecognized line keep the indent, the compiler may mark a word
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3379 * with ^^^^. */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3380 qf_fmt_text((fname != NULL \|\| qfp->qf_lnum != 0)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3381 ? skipwhite(qfp->qf_text) : qfp->qf_text,
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3382 IObuff, IOSIZE);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3383 msg_prt_line(IObuff, FALSE);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3384 out_flush(); /* show one line at a time */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3385 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3386
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3387 /*
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3388 * ":clist": list all errors
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3389 * ":llist": list all locations
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3390 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3391 void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	3392 qf_list(exarg_T *eap)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3393 {
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3394 qf_list_T *qfl;
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	3395 qfline_T *qfp;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	3396 int i;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	3397 int idx1 = 1;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	3398 int idx2 = -1;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	3399 char_u *arg = eap->arg;
9379 b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3400 int plus = FALSE;
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	3401 int all = eap->forceit; /* if not :cl!, only show
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3402 recognised errors */
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3403 qf_info_T *qi = &ql_info;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3404
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	3405 if (is_loclist_cmd(eap->cmdidx))
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3406 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3407 qi = GET_LOC_LIST(curwin);
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3408 if (qi == NULL)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3409 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3410 EMSG(_(e_loclist));
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3411 return;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3412 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3413 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3414
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3415 if (qi->qf_curlist >= qi->qf_listcount
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3416 \|\| qf_list_empty(qi, qi->qf_curlist))
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3417 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3418 EMSG(_(e_quickfix));
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3419 return;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3420 }
9379 b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3421 if (*arg == '+')
b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3422 {
b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3423 ++arg;
b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3424 plus = TRUE;
b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3425 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3426 if (!get_list_range(&arg, &idx1, &idx2) \|\| *arg != NUL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3427 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3428 EMSG(_(e_trailing));
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3429 return;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3430 }
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3431 qfl = &qi->qf_lists[qi->qf_curlist];
9379 b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3432 if (plus)
b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3433 {
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3434 i = qfl->qf_index;
9379 b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3435 idx2 = i + idx1;
b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3436 idx1 = i;
b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3437 }
b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3438 else
b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3439 {
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3440 i = qfl->qf_count;
9379 b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3441 if (idx1 < 0)
b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3442 idx1 = (-idx1 > i) ? 0 : idx1 + i + 1;
b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3443 if (idx2 < 0)
b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3444 idx2 = (-idx2 > i) ? 0 : idx2 + i + 1;
b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3445 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3446
13819 31bb8e1f7625 patch 8.0.1781: file names in quickfix window are not shortened Christian Brabandt <cb@256bit.org> parents: 13802 diff changeset	3447 /* Shorten all the file names, so that it is easy to read */
31bb8e1f7625 patch 8.0.1781: file names in quickfix window are not shortened Christian Brabandt <cb@256bit.org> parents: 13802 diff changeset	3448 shorten_fnames(FALSE);
31bb8e1f7625 patch 8.0.1781: file names in quickfix window are not shortened Christian Brabandt <cb@256bit.org> parents: 13802 diff changeset	3449
12912 888441e8fbb0 patch 8.0.1332: highlighting in quickfix window could be better Christian Brabandt <cb@256bit.org> parents: 12531 diff changeset	3450 /*
888441e8fbb0 patch 8.0.1332: highlighting in quickfix window could be better Christian Brabandt <cb@256bit.org> parents: 12531 diff changeset	3451 * Get the attributes for the different quickfix highlight items. Note
888441e8fbb0 patch 8.0.1332: highlighting in quickfix window could be better Christian Brabandt <cb@256bit.org> parents: 12531 diff changeset	3452 * that this depends on syntax items defined in the qf.vim syntax file
888441e8fbb0 patch 8.0.1332: highlighting in quickfix window could be better Christian Brabandt <cb@256bit.org> parents: 12531 diff changeset	3453 */
888441e8fbb0 patch 8.0.1332: highlighting in quickfix window could be better Christian Brabandt <cb@256bit.org> parents: 12531 diff changeset	3454 qfFileAttr = syn_name2attr((char_u *)"qfFileName");
888441e8fbb0 patch 8.0.1332: highlighting in quickfix window could be better Christian Brabandt <cb@256bit.org> parents: 12531 diff changeset	3455 if (qfFileAttr == 0)
888441e8fbb0 patch 8.0.1332: highlighting in quickfix window could be better Christian Brabandt <cb@256bit.org> parents: 12531 diff changeset	3456 qfFileAttr = HL_ATTR(HLF_D);
888441e8fbb0 patch 8.0.1332: highlighting in quickfix window could be better Christian Brabandt <cb@256bit.org> parents: 12531 diff changeset	3457 qfSepAttr = syn_name2attr((char_u *)"qfSeparator");
888441e8fbb0 patch 8.0.1332: highlighting in quickfix window could be better Christian Brabandt <cb@256bit.org> parents: 12531 diff changeset	3458 if (qfSepAttr == 0)
888441e8fbb0 patch 8.0.1332: highlighting in quickfix window could be better Christian Brabandt <cb@256bit.org> parents: 12531 diff changeset	3459 qfSepAttr = HL_ATTR(HLF_D);
888441e8fbb0 patch 8.0.1332: highlighting in quickfix window could be better Christian Brabandt <cb@256bit.org> parents: 12531 diff changeset	3460 qfLineAttr = syn_name2attr((char_u *)"qfLineNr");
888441e8fbb0 patch 8.0.1332: highlighting in quickfix window could be better Christian Brabandt <cb@256bit.org> parents: 12531 diff changeset	3461 if (qfLineAttr == 0)
888441e8fbb0 patch 8.0.1332: highlighting in quickfix window could be better Christian Brabandt <cb@256bit.org> parents: 12531 diff changeset	3462 qfLineAttr = HL_ATTR(HLF_N);
888441e8fbb0 patch 8.0.1332: highlighting in quickfix window could be better Christian Brabandt <cb@256bit.org> parents: 12531 diff changeset	3463
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3464 if (qfl->qf_nonevalid)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3465 all = TRUE;
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3466 qfp = qfl->qf_start;
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3467 for (i = 1; !got_int && i <= qfl->qf_count; )
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3468 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3469 if ((qfp->qf_valid \|\| all) && idx1 <= i && i <= idx2)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3470 {
2047 85da03763130 updated for version 7.2.333 Bram Moolenaar <bram@zimbu.org> parents: 1918 diff changeset	3471 if (got_int)
85da03763130 updated for version 7.2.333 Bram Moolenaar <bram@zimbu.org> parents: 1918 diff changeset	3472 break;
446 7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	3473
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3474 qf_list_entry(qfp, i, i == qfl->qf_index);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3475 }
446 7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	3476
7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	3477 qfp = qfp->qf_next;
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	3478 if (qfp == NULL)
543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	3479 break;
446 7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	3480 ++i;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3481 ui_breakcheck();
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3482 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3483 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3484
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3485 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3486 * Remove newlines and leading whitespace from an error message.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3487 * Put the result in "buf[bufsize]".
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3488 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3489 static void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	3490 qf_fmt_text(char_u text, char_u buf, int bufsize)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3491 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3492 int i;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3493 char_u *p = text;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3494
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3495 for (i = 0; *p != NUL && i < bufsize - 1; ++i)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3496 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3497 if (*p == '\n')
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3498 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3499 buf[i] = ' ';
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3500 while (*++p != NUL)
11129 f4ea50924c6d patch 8.0.0452: some macros are in lower case Christian Brabandt <cb@256bit.org> parents: 11063 diff changeset	3501 if (!VIM_ISWHITE(p) && p != '\n')
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3502 break;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3503 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3504 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3505 buf[i] = *p++;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3506 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3507 buf[i] = NUL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3508 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3509
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	3510 /*
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	3511 * Display information (list number, list size and the title) about a
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	3512 * quickfix/location list.
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	3513 */
9538 26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3514 static void
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3515 qf_msg(qf_info_T qi, int which, char lead)
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3516 {
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3517 char title = (char )qi->qf_lists[which].qf_title;
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3518 int count = qi->qf_lists[which].qf_count;
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3519 char_u buf[IOSIZE];
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3520
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3521 vim_snprintf((char *)buf, IOSIZE, _("%serror list %d of %d; %d errors "),
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3522 lead,
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3523 which + 1,
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3524 qi->qf_listcount,
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3525 count);
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3526
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3527 if (title != NULL)
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3528 {
9579 2fb7e008ac9b commit https://github.com/vim/vim/commit/16ec3c9be3fcdc38530bddb12978bc5a7b98c0f6 Christian Brabandt <cb@256bit.org> parents: 9573 diff changeset	3529 size_t len = STRLEN(buf);
2fb7e008ac9b commit https://github.com/vim/vim/commit/16ec3c9be3fcdc38530bddb12978bc5a7b98c0f6 Christian Brabandt <cb@256bit.org> parents: 9573 diff changeset	3530
2fb7e008ac9b commit https://github.com/vim/vim/commit/16ec3c9be3fcdc38530bddb12978bc5a7b98c0f6 Christian Brabandt <cb@256bit.org> parents: 9573 diff changeset	3531 if (len < 34)
2fb7e008ac9b commit https://github.com/vim/vim/commit/16ec3c9be3fcdc38530bddb12978bc5a7b98c0f6 Christian Brabandt <cb@256bit.org> parents: 9573 diff changeset	3532 {
2fb7e008ac9b commit https://github.com/vim/vim/commit/16ec3c9be3fcdc38530bddb12978bc5a7b98c0f6 Christian Brabandt <cb@256bit.org> parents: 9573 diff changeset	3533 vim_memset(buf + len, ' ', 34 - len);
2fb7e008ac9b commit https://github.com/vim/vim/commit/16ec3c9be3fcdc38530bddb12978bc5a7b98c0f6 Christian Brabandt <cb@256bit.org> parents: 9573 diff changeset	3534 buf[34] = NUL;
2fb7e008ac9b commit https://github.com/vim/vim/commit/16ec3c9be3fcdc38530bddb12978bc5a7b98c0f6 Christian Brabandt <cb@256bit.org> parents: 9573 diff changeset	3535 }
2fb7e008ac9b commit https://github.com/vim/vim/commit/16ec3c9be3fcdc38530bddb12978bc5a7b98c0f6 Christian Brabandt <cb@256bit.org> parents: 9573 diff changeset	3536 vim_strcat(buf, (char_u *)title, IOSIZE);
9538 26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3537 }
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3538 trunc_string(buf, buf, Columns - 1, IOSIZE);
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3539 msg(buf);
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3540 }
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3541
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3542 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3543 * ":colder [count]": Up in the quickfix stack.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3544 * ":cnewer [count]": Down in the quickfix stack.
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3545 * ":lolder [count]": Up in the location list stack.
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3546 * ":lnewer [count]": Down in the location list stack.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3547 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3548 void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	3549 qf_age(exarg_T *eap)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3550 {
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3551 qf_info_T *qi = &ql_info;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3552 int count;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3553
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	3554 if (is_loclist_cmd(eap->cmdidx))
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3555 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3556 qi = GET_LOC_LIST(curwin);
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3557 if (qi == NULL)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3558 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3559 EMSG(_(e_loclist));
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3560 return;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3561 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3562 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3563
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3564 if (eap->addr_count != 0)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3565 count = eap->line2;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3566 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3567 count = 1;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3568 while (count--)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3569 {
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3570 if (eap->cmdidx == CMD_colder \|\| eap->cmdidx == CMD_lolder)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3571 {
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3572 if (qi->qf_curlist == 0)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3573 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3574 EMSG(_("E380: At bottom of quickfix stack"));
4371 000bb500208d updated for version 7.3.934 Bram Moolenaar <bram@vim.org> parents: 4352 diff changeset	3575 break;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3576 }
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3577 --qi->qf_curlist;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3578 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3579 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3580 {
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3581 if (qi->qf_curlist >= qi->qf_listcount - 1)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3582 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3583 EMSG(_("E381: At top of quickfix stack"));
4371 000bb500208d updated for version 7.3.934 Bram Moolenaar <bram@vim.org> parents: 4352 diff changeset	3584 break;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3585 }
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3586 ++qi->qf_curlist;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3587 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3588 }
9538 26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3589 qf_msg(qi, qi->qf_curlist, "");
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	3590 qf_update_buffer(qi, NULL);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3591 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3592
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	3593 /*
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	3594 * Display the information about all the quickfix/location lists in the stack
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	3595 */
9538 26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3596 void
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3597 qf_history(exarg_T *eap)
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3598 {
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3599 qf_info_T *qi = &ql_info;
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3600 int i;
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3601
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	3602 if (is_loclist_cmd(eap->cmdidx))
9538 26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3603 qi = GET_LOC_LIST(curwin);
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3604 if (qi == NULL \|\| (qi->qf_listcount == 0
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3605 && qf_list_empty(qi, qi->qf_curlist)))
9538 26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3606 MSG(_("No entries"));
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3607 else
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3608 for (i = 0; i < qi->qf_listcount; ++i)
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3609 qf_msg(qi, i, i == qi->qf_curlist ? "> " : " ");
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3610 }
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3611
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3612 /*
11549 f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	3613 * Free all the entries in the error list "idx". Note that other information
f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	3614 * associated with the list like context and title are not freed.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3615 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3616 static void
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3617 qf_free_items(qf_list_T *qfl)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3618 {
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	3619 qfline_T *qfp;
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	3620 qfline_T *qfpnext;
3982 4934eb2e22dc updated for version 7.3.746 Bram Moolenaar <bram@vim.org> parents: 3974 diff changeset	3621 int stop = FALSE;
11700 dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	3622
dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	3623 while (qfl->qf_count && qfl->qf_start != NULL)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3624 {
11700 dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	3625 qfp = qfl->qf_start;
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	3626 qfpnext = qfp->qf_next;
12252 3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	3627 if (!stop)
3949 37a4cacd2051 updated for version 7.3.730 Bram Moolenaar <bram@vim.org> parents: 3939 diff changeset	3628 {
13821 98274127d675 patch 8.0.1782: no simple way to label quickfix entries Christian Brabandt <cb@256bit.org> parents: 13819 diff changeset	3629 vim_free(qfp->qf_module);
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	3630 vim_free(qfp->qf_text);
13821 98274127d675 patch 8.0.1782: no simple way to label quickfix entries Christian Brabandt <cb@256bit.org> parents: 13819 diff changeset	3631 vim_free(qfp->qf_pattern);
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	3632 stop = (qfp == qfpnext);
543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	3633 vim_free(qfp);
3982 4934eb2e22dc updated for version 7.3.746 Bram Moolenaar <bram@vim.org> parents: 3974 diff changeset	3634 if (stop)
4934eb2e22dc updated for version 7.3.746 Bram Moolenaar <bram@vim.org> parents: 3974 diff changeset	3635 /* Somehow qf_count may have an incorrect value, set it to 1
4934eb2e22dc updated for version 7.3.746 Bram Moolenaar <bram@vim.org> parents: 3974 diff changeset	3636 * to avoid crashing when it's wrong.
4934eb2e22dc updated for version 7.3.746 Bram Moolenaar <bram@vim.org> parents: 3974 diff changeset	3637 * TODO: Avoid qf_count being incorrect. */
11700 dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	3638 qfl->qf_count = 1;
3949 37a4cacd2051 updated for version 7.3.730 Bram Moolenaar <bram@vim.org> parents: 3939 diff changeset	3639 }
11700 dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	3640 qfl->qf_start = qfpnext;
dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	3641 --qfl->qf_count;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3642 }
11549 f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	3643
11700 dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	3644 qfl->qf_index = 0;
dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	3645 qfl->qf_start = NULL;
dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	3646 qfl->qf_last = NULL;
dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	3647 qfl->qf_ptr = NULL;
dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	3648 qfl->qf_nonevalid = TRUE;
dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	3649
dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	3650 qf_clean_dir_stack(&qfl->qf_dir_stack);
dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	3651 qfl->qf_directory = NULL;
dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	3652 qf_clean_dir_stack(&qfl->qf_file_stack);
dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	3653 qfl->qf_currfile = NULL;
dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	3654 qfl->qf_multiline = FALSE;
dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	3655 qfl->qf_multiignore = FALSE;
dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	3656 qfl->qf_multiscan = FALSE;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3657 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3658
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3659 /*
11549 f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	3660 * Free error list "idx". Frees all the entries in the quickfix list,
f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	3661 * associated context information and the title.
f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	3662 */
f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	3663 static void
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3664 qf_free(qf_list_T *qfl)
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3665 {
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3666 qf_free_items(qfl);
11549 f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	3667
13244 ac42c4b11dbc patch 8.0.1496: clearing a pointer takes two lines Christian Brabandt <cb@256bit.org> parents: 13115 diff changeset	3668 VIM_CLEAR(qfl->qf_title);
11700 dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	3669 free_tv(qfl->qf_ctx);
dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	3670 qfl->qf_ctx = NULL;
12287 20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	3671 qfl->qf_id = 0;
13062 6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	3672 qfl->qf_changedtick = 0L;
11549 f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	3673 }
f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	3674
f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	3675 /*
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3676 * qf_mark_adjust: adjust marks
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3677 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3678 void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	3679 qf_mark_adjust(
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	3680 win_T *wp,
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	3681 linenr_T line1,
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	3682 linenr_T line2,
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	3683 long amount,
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	3684 long amount_after)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3685 {
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	3686 int i;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	3687 qfline_T *qfp;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	3688 int idx;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3689 qf_info_T *qi = &ql_info;
9201 692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	3690 int found_one = FALSE;
9608 fa64afb99dda commit https://github.com/vim/vim/commit/c1542744e788d96fed24dd421f43009288092504 Christian Brabandt <cb@256bit.org> parents: 9579 diff changeset	3691 int buf_has_flag = wp == NULL ? BUF_HAS_QF_ENTRY : BUF_HAS_LL_ENTRY;
fa64afb99dda commit https://github.com/vim/vim/commit/c1542744e788d96fed24dd421f43009288092504 Christian Brabandt <cb@256bit.org> parents: 9579 diff changeset	3692
fa64afb99dda commit https://github.com/vim/vim/commit/c1542744e788d96fed24dd421f43009288092504 Christian Brabandt <cb@256bit.org> parents: 9579 diff changeset	3693 if (!(curbuf->b_has_qf_entry & buf_has_flag))
9201 692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	3694 return;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3695 if (wp != NULL)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3696 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3697 if (wp->w_llist == NULL)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3698 return;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3699 qi = wp->w_llist;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3700 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3701
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3702 for (idx = 0; idx < qi->qf_listcount; ++idx)
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3703 if (!qf_list_empty(qi, idx))
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3704 for (i = 0, qfp = qi->qf_lists[idx].qf_start;
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	3705 i < qi->qf_lists[idx].qf_count && qfp != NULL;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	3706 ++i, qfp = qfp->qf_next)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3707 if (qfp->qf_fnum == curbuf->b_fnum)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3708 {
9201 692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	3709 found_one = TRUE;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3710 if (qfp->qf_lnum >= line1 && qfp->qf_lnum <= line2)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3711 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3712 if (amount == MAXLNUM)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3713 qfp->qf_cleared = TRUE;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3714 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3715 qfp->qf_lnum += amount;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3716 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3717 else if (amount_after && qfp->qf_lnum > line2)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3718 qfp->qf_lnum += amount_after;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3719 }
9201 692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	3720
692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	3721 if (!found_one)
9608 fa64afb99dda commit https://github.com/vim/vim/commit/c1542744e788d96fed24dd421f43009288092504 Christian Brabandt <cb@256bit.org> parents: 9579 diff changeset	3722 curbuf->b_has_qf_entry &= ~buf_has_flag;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3723 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3724
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3725 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3726 * Make a nice message out of the error character and the error number:
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3727 * char number message
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3728 * e or E 0 " error"
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3729 * w or W 0 " warning"
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3730 * i or I 0 " info"
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3731 * 0 0 ""
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3732 * other 0 " c"
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3733 * e or E n " error n"
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3734 * w or W n " warning n"
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3735 * i or I n " info n"
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3736 * 0 n " error n"
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3737 * other n " c n"
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3738 * 1 x "" :helpgrep
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3739 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3740 static char_u *
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	3741 qf_types(int c, int nr)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3742 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3743 static char_u buf[20];
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3744 static char_u cc[3];
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3745 char_u *p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3746
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3747 if (c == 'W' \|\| c == 'w')
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3748 p = (char_u *)" warning";
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3749 else if (c == 'I' \|\| c == 'i')
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3750 p = (char_u *)" info";
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3751 else if (c == 'E' \|\| c == 'e' \|\| (c == 0 && nr > 0))
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3752 p = (char_u *)" error";
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3753 else if (c == 0 \|\| c == 1)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3754 p = (char_u *)"";
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3755 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3756 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3757 cc[0] = ' ';
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3758 cc[1] = c;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3759 cc[2] = NUL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3760 p = cc;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3761 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3762
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3763 if (nr <= 0)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3764 return p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3765
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3766 sprintf((char )buf, "%s %3d", (char )p, nr);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3767 return buf;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3768 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3769
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3770 /*
14397 19d99d9e670c patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window Christian Brabandt <cb@256bit.org> parents: 14307 diff changeset	3771 * When "split" is FALSE: Open the entry/result under the cursor.
19d99d9e670c patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window Christian Brabandt <cb@256bit.org> parents: 14307 diff changeset	3772 * When "split" is TRUE: Open the entry/result under the cursor in a new window.
19d99d9e670c patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window Christian Brabandt <cb@256bit.org> parents: 14307 diff changeset	3773 */
19d99d9e670c patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window Christian Brabandt <cb@256bit.org> parents: 14307 diff changeset	3774 void
19d99d9e670c patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window Christian Brabandt <cb@256bit.org> parents: 14307 diff changeset	3775 qf_view_result(int split)
19d99d9e670c patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window Christian Brabandt <cb@256bit.org> parents: 14307 diff changeset	3776 {
19d99d9e670c patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window Christian Brabandt <cb@256bit.org> parents: 14307 diff changeset	3777 qf_info_T *qi = &ql_info;
19d99d9e670c patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window Christian Brabandt <cb@256bit.org> parents: 14307 diff changeset	3778
19d99d9e670c patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window Christian Brabandt <cb@256bit.org> parents: 14307 diff changeset	3779 if (!bt_quickfix(curbuf))
19d99d9e670c patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window Christian Brabandt <cb@256bit.org> parents: 14307 diff changeset	3780 return;
19d99d9e670c patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window Christian Brabandt <cb@256bit.org> parents: 14307 diff changeset	3781
19d99d9e670c patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window Christian Brabandt <cb@256bit.org> parents: 14307 diff changeset	3782 if (IS_LL_WINDOW(curwin))
19d99d9e670c patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window Christian Brabandt <cb@256bit.org> parents: 14307 diff changeset	3783 qi = GET_LOC_LIST(curwin);
19d99d9e670c patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window Christian Brabandt <cb@256bit.org> parents: 14307 diff changeset	3784
14491 9df0fcbfebb2 patch 8.1.0259: no test for fixed quickfix issue Christian Brabandt <cb@256bit.org> parents: 14477 diff changeset	3785 if (qf_list_empty(qi, qi->qf_curlist))
14397 19d99d9e670c patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window Christian Brabandt <cb@256bit.org> parents: 14307 diff changeset	3786 {
19d99d9e670c patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window Christian Brabandt <cb@256bit.org> parents: 14307 diff changeset	3787 EMSG(_(e_quickfix));
19d99d9e670c patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window Christian Brabandt <cb@256bit.org> parents: 14307 diff changeset	3788 return;
19d99d9e670c patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window Christian Brabandt <cb@256bit.org> parents: 14307 diff changeset	3789 }
19d99d9e670c patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window Christian Brabandt <cb@256bit.org> parents: 14307 diff changeset	3790
19d99d9e670c patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window Christian Brabandt <cb@256bit.org> parents: 14307 diff changeset	3791 if (split)
19d99d9e670c patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window Christian Brabandt <cb@256bit.org> parents: 14307 diff changeset	3792 {
19d99d9e670c patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window Christian Brabandt <cb@256bit.org> parents: 14307 diff changeset	3793 char_u cmd[32];
19d99d9e670c patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window Christian Brabandt <cb@256bit.org> parents: 14307 diff changeset	3794
19d99d9e670c patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window Christian Brabandt <cb@256bit.org> parents: 14307 diff changeset	3795 vim_snprintf((char *)cmd, sizeof(cmd), "split +%ld%s",
19d99d9e670c patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window Christian Brabandt <cb@256bit.org> parents: 14307 diff changeset	3796 (long)curwin->w_cursor.lnum,
19d99d9e670c patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window Christian Brabandt <cb@256bit.org> parents: 14307 diff changeset	3797 IS_LL_WINDOW(curwin) ? "ll" : "cc");
19d99d9e670c patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window Christian Brabandt <cb@256bit.org> parents: 14307 diff changeset	3798 if (do_cmdline_cmd(cmd) == OK)
19d99d9e670c patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window Christian Brabandt <cb@256bit.org> parents: 14307 diff changeset	3799 do_cmdline_cmd((char_u *) "clearjumps");
19d99d9e670c patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window Christian Brabandt <cb@256bit.org> parents: 14307 diff changeset	3800 return;
19d99d9e670c patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window Christian Brabandt <cb@256bit.org> parents: 14307 diff changeset	3801 }
19d99d9e670c patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window Christian Brabandt <cb@256bit.org> parents: 14307 diff changeset	3802
19d99d9e670c patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window Christian Brabandt <cb@256bit.org> parents: 14307 diff changeset	3803 do_cmdline_cmd((char_u *)(IS_LL_WINDOW(curwin) ? ".ll" : ".cc"));
19d99d9e670c patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window Christian Brabandt <cb@256bit.org> parents: 14307 diff changeset	3804 }
19d99d9e670c patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window Christian Brabandt <cb@256bit.org> parents: 14307 diff changeset	3805
19d99d9e670c patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window Christian Brabandt <cb@256bit.org> parents: 14307 diff changeset	3806 /*
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3807 * ":cwindow": open the quickfix window if we have errors to display,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3808 * close it if not.
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3809 * ":lwindow": open the location list window if we have locations to display,
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3810 * close it if not.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3811 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3812 void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	3813 ex_cwindow(exarg_T *eap)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3814 {
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3815 qf_info_T *qi = &ql_info;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3816 win_T *win;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3817
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	3818 if (is_loclist_cmd(eap->cmdidx))
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3819 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3820 qi = GET_LOC_LIST(curwin);
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3821 if (qi == NULL)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3822 return;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3823 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3824
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3825 /* Look for an existing quickfix window. */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3826 win = qf_find_win(qi);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3827
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3828 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3829 * If a quickfix window is open but we have no errors to display,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3830 * close the window. If a quickfix window is not open, then open
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3831 * it if we have errors; otherwise, leave it closed.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3832 */
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3833 if (qi->qf_lists[qi->qf_curlist].qf_nonevalid
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3834 \|\| qf_list_empty(qi, qi->qf_curlist)
857 b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	3835 \|\| qi->qf_curlist >= qi->qf_listcount)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3836 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3837 if (win != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3838 ex_cclose(eap);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3839 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3840 else if (win == NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3841 ex_copen(eap);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3842 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3843
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3844 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3845 * ":cclose": close the window showing the list of errors.
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3846 * ":lclose": close the window showing the location list
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3847 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3848 void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	3849 ex_cclose(exarg_T *eap)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3850 {
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3851 win_T *win = NULL;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3852 qf_info_T *qi = &ql_info;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3853
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	3854 if (is_loclist_cmd(eap->cmdidx))
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3855 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3856 qi = GET_LOC_LIST(curwin);
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3857 if (qi == NULL)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3858 return;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3859 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3860
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3861 /* Find existing quickfix window and close it. */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3862 win = qf_find_win(qi);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3863 if (win != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3864 win_close(win, FALSE);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3865 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3866
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3867 /*
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3868 * Set "w:quickfix_title" if "qi" has a title.
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3869 */
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3870 static void
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3871 qf_set_title_var(qf_list_T *qfl)
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3872 {
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3873 if (qfl->qf_title != NULL)
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3874 set_internal_string_var((char_u *)"w:quickfix_title", qfl->qf_title);
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3875 }
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3876
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3877 /*
14796 74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3878 * Goto a quickfix or location list window (if present).
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3879 * Returns OK if the window is found, FAIL otherwise.
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3880 */
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3881 static int
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3882 qf_goto_cwindow(qf_info_T *qi, int resize, int sz, int vertsplit)
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3883 {
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3884 win_T *win;
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3885
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3886 win = qf_find_win(qi);
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3887 if (win == NULL)
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3888 return FAIL;
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3889
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3890 win_goto(win);
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3891 if (resize)
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3892 {
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3893 if (vertsplit)
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3894 {
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3895 if (sz != win->w_width)
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3896 win_setwidth(sz);
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3897 }
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3898 else if (sz != win->w_height)
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3899 win_setheight(sz);
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3900 }
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3901
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3902 return OK;
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3903 }
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3904
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3905 /*
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3906 * Open a new quickfix or location list window, load the quickfix buffer and
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3907 * set the appropriate options for the window.
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3908 * Returns FAIL if the window could not be opened.
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3909 */
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3910 static int
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3911 qf_open_new_cwindow(qf_info_T *qi, int height)
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3912 {
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3913 buf_T *qf_buf;
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3914 win_T *oldwin = curwin;
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3915 tabpage_T *prevtab = curtab;
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3916 int flags = 0;
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3917 win_T *win;
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3918
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3919 qf_buf = qf_find_buf(qi);
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3920
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3921 // The current window becomes the previous window afterwards.
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3922 win = curwin;
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3923
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3924 if (IS_QF_STACK(qi) && cmdmod.split == 0)
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3925 // Create the new quickfix window at the very bottom, except when
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3926 // :belowright or :aboveleft is used.
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3927 win_goto(lastwin);
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3928 // Default is to open the window below the current window
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3929 if (cmdmod.split == 0)
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3930 flags = WSP_BELOW;
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3931 flags \|= WSP_NEWLOC;
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3932 if (win_split(height, flags) == FAIL)
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3933 return FAIL; // not enough room for window
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3934 RESET_BINDING(curwin);
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3935
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3936 if (IS_LL_STACK(qi))
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3937 {
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3938 // For the location list window, create a reference to the
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3939 // location list from the window 'win'.
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3940 curwin->w_llist_ref = win->w_llist;
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3941 win->w_llist->qf_refcount++;
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3942 }
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3943
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3944 if (oldwin != curwin)
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3945 oldwin = NULL; // don't store info when in another window
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3946 if (qf_buf != NULL)
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3947 {
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3948 // Use the existing quickfix buffer
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3949 (void)do_ecmd(qf_buf->b_fnum, NULL, NULL, NULL, ECMD_ONE,
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3950 ECMD_HIDE + ECMD_OLDBUF, oldwin);
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3951 }
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3952 else
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3953 {
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3954 // Create a new quickfix buffer
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3955 (void)do_ecmd(0, NULL, NULL, NULL, ECMD_ONE, ECMD_HIDE, oldwin);
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3956
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3957 // switch off 'swapfile'
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3958 set_option_value((char_u *)"swf", 0L, NULL, OPT_LOCAL);
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3959 set_option_value((char_u )"bt", 0L, (char_u )"quickfix",
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3960 OPT_LOCAL);
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3961 set_option_value((char_u )"bh", 0L, (char_u )"wipe", OPT_LOCAL);
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3962 RESET_BINDING(curwin);
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3963 #ifdef FEAT_DIFF
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3964 curwin->w_p_diff = FALSE;
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3965 #endif
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3966 #ifdef FEAT_FOLDING
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3967 set_option_value((char_u )"fdm", 0L, (char_u )"manual",
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3968 OPT_LOCAL);
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3969 #endif
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3970 }
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3971
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3972 // Only set the height when still in the same tab page and there is no
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3973 // window to the side.
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3974 if (curtab == prevtab && curwin->w_width == Columns)
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3975 win_setheight(height);
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3976 curwin->w_p_wfh = TRUE; // set 'winfixheight'
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3977 if (win_valid(win))
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3978 prevwin = win;
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3979
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3980 return OK;
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3981 }
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3982
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3983 /*
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3984 * ":copen": open a window that shows the list of errors.
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3985 * ":lopen": open a window that shows the location list.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3986 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3987 void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	3988 ex_copen(exarg_T *eap)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3989 {
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3990 qf_info_T *qi = &ql_info;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3991 int height;
14796 74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3992 int status = FAIL;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3993
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	3994 if (is_loclist_cmd(eap->cmdidx))
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3995 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3996 qi = GET_LOC_LIST(curwin);
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3997 if (qi == NULL)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3998 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3999 EMSG(_(e_loclist));
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4000 return;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4001 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4002 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4003
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4004 if (eap->addr_count != 0)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4005 height = eap->line2;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4006 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4007 height = QF_WINHEIGHT;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4008
14796 74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	4009 reset_VIsual_and_resel(); // stop Visual mode
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4010 #ifdef FEAT_GUI
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4011 need_mouse_correct = TRUE;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4012 #endif
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4013
14796 74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	4014 // Find an existing quickfix window, or open a new one.
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	4015 if (cmdmod.tab == 0)
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	4016 status = qf_goto_cwindow(qi, eap->addr_count != 0, height,
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	4017 cmdmod.split & WSP_VERT);
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	4018 if (status == FAIL)
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	4019 if (qf_open_new_cwindow(qi, height) == FAIL)
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	4020 return;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4021
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	4022 qf_set_title_var(&qi->qf_lists[qi->qf_curlist]);
6793 e1d59836eecc patch 7.4.718 Bram Moolenaar <bram@vim.org> parents: 6721 diff changeset	4023
14796 74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	4024 // Fill the buffer with the quickfix list.
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4025 qf_fill_buffer(qi, curbuf, NULL);
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4026
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4027 curwin->w_cursor.lnum = qi->qf_lists[qi->qf_curlist].qf_index;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4028 curwin->w_cursor.col = 0;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4029 check_cursor();
14796 74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	4030 update_topline(); // scroll to show the line
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4031 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4032
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4033 /*
9432 abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4034 * Move the cursor in the quickfix window to "lnum".
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4035 */
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4036 static void
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4037 qf_win_goto(win_T *win, linenr_T lnum)
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4038 {
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4039 win_T *old_curwin = curwin;
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4040
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4041 curwin = win;
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4042 curbuf = win->w_buffer;
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4043 curwin->w_cursor.lnum = lnum;
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4044 curwin->w_cursor.col = 0;
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4045 #ifdef FEAT_VIRTUALEDIT
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4046 curwin->w_cursor.coladd = 0;
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4047 #endif
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4048 curwin->w_curswant = 0;
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4049 update_topline(); /* scroll to show the line */
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4050 redraw_later(VALID);
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4051 curwin->w_redr_status = TRUE; /* update ruler */
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4052 curwin = old_curwin;
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4053 curbuf = curwin->w_buffer;
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4054 }
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4055
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4056 /*
9458 374afcf9d11d commit https://github.com/vim/vim/commit/537ef08408c50e0c4104d57f74993b3b0ed9560d Christian Brabandt <cb@256bit.org> parents: 9432 diff changeset	4057 * :cbottom/:lbottom commands.
9432 abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4058 */
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4059 void
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4060 ex_cbottom(exarg_T *eap)
9432 abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4061 {
9458 374afcf9d11d commit https://github.com/vim/vim/commit/537ef08408c50e0c4104d57f74993b3b0ed9560d Christian Brabandt <cb@256bit.org> parents: 9432 diff changeset	4062 qf_info_T *qi = &ql_info;
374afcf9d11d commit https://github.com/vim/vim/commit/537ef08408c50e0c4104d57f74993b3b0ed9560d Christian Brabandt <cb@256bit.org> parents: 9432 diff changeset	4063 win_T *win;
374afcf9d11d commit https://github.com/vim/vim/commit/537ef08408c50e0c4104d57f74993b3b0ed9560d Christian Brabandt <cb@256bit.org> parents: 9432 diff changeset	4064
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4065 if (is_loclist_cmd(eap->cmdidx))
9458 374afcf9d11d commit https://github.com/vim/vim/commit/537ef08408c50e0c4104d57f74993b3b0ed9560d Christian Brabandt <cb@256bit.org> parents: 9432 diff changeset	4066 {
374afcf9d11d commit https://github.com/vim/vim/commit/537ef08408c50e0c4104d57f74993b3b0ed9560d Christian Brabandt <cb@256bit.org> parents: 9432 diff changeset	4067 qi = GET_LOC_LIST(curwin);
374afcf9d11d commit https://github.com/vim/vim/commit/537ef08408c50e0c4104d57f74993b3b0ed9560d Christian Brabandt <cb@256bit.org> parents: 9432 diff changeset	4068 if (qi == NULL)
374afcf9d11d commit https://github.com/vim/vim/commit/537ef08408c50e0c4104d57f74993b3b0ed9560d Christian Brabandt <cb@256bit.org> parents: 9432 diff changeset	4069 {
374afcf9d11d commit https://github.com/vim/vim/commit/537ef08408c50e0c4104d57f74993b3b0ed9560d Christian Brabandt <cb@256bit.org> parents: 9432 diff changeset	4070 EMSG(_(e_loclist));
374afcf9d11d commit https://github.com/vim/vim/commit/537ef08408c50e0c4104d57f74993b3b0ed9560d Christian Brabandt <cb@256bit.org> parents: 9432 diff changeset	4071 return;
374afcf9d11d commit https://github.com/vim/vim/commit/537ef08408c50e0c4104d57f74993b3b0ed9560d Christian Brabandt <cb@256bit.org> parents: 9432 diff changeset	4072 }
374afcf9d11d commit https://github.com/vim/vim/commit/537ef08408c50e0c4104d57f74993b3b0ed9560d Christian Brabandt <cb@256bit.org> parents: 9432 diff changeset	4073 }
374afcf9d11d commit https://github.com/vim/vim/commit/537ef08408c50e0c4104d57f74993b3b0ed9560d Christian Brabandt <cb@256bit.org> parents: 9432 diff changeset	4074
374afcf9d11d commit https://github.com/vim/vim/commit/537ef08408c50e0c4104d57f74993b3b0ed9560d Christian Brabandt <cb@256bit.org> parents: 9432 diff changeset	4075 win = qf_find_win(qi);
9432 abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4076 if (win != NULL && win->w_cursor.lnum != win->w_buffer->b_ml.ml_line_count)
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4077 qf_win_goto(win, win->w_buffer->b_ml.ml_line_count);
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4078 }
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4079
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4080 /*
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4081 * Return the number of the current entry (line number in the quickfix
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4082 * window).
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4083 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4084 linenr_T
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4085 qf_current_entry(win_T *wp)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4086 {
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4087 qf_info_T *qi = &ql_info;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4088
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4089 if (IS_LL_WINDOW(wp))
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4090 /* In the location list window, use the referenced location list */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4091 qi = wp->w_llist_ref;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4092
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4093 return qi->qf_lists[qi->qf_curlist].qf_index;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4094 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4095
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4096 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4097 * Update the cursor position in the quickfix window to the current error.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4098 * Return TRUE if there is a quickfix window.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4099 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4100 static int
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4101 qf_win_pos_update(
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4102 qf_info_T *qi,
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4103 int old_qf_index) /* previous qf_index or zero */
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4104 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4105 win_T *win;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4106 int qf_index = qi->qf_lists[qi->qf_curlist].qf_index;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4107
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4108 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4109 * Put the cursor on the current error in the quickfix window, so that
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4110 * it's viewable.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4111 */
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4112 win = qf_find_win(qi);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4113 if (win != NULL
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4114 && qf_index <= win->w_buffer->b_ml.ml_line_count
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4115 && old_qf_index != qf_index)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4116 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4117 if (qf_index > old_qf_index)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4118 {
9432 abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4119 win->w_redraw_top = old_qf_index;
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4120 win->w_redraw_bot = qf_index;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4121 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4122 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4123 {
9432 abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4124 win->w_redraw_top = qf_index;
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4125 win->w_redraw_bot = old_qf_index;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4126 }
9432 abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4127 qf_win_goto(win, qf_index);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4128 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4129 return win != NULL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4130 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4131
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4132 /*
859 99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4133 * Check whether the given window is displaying the specified quickfix/location
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	4134 * stack.
859 99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4135 */
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4136 static int
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4137 is_qf_win(win_T win, qf_info_T qi)
859 99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4138 {
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4139 /*
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4140 * A window displaying the quickfix buffer will have the w_llist_ref field
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4141 * set to NULL.
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4142 * A window displaying a location list buffer will have the w_llist_ref
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4143 * pointing to the location list.
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4144 */
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4145 if (bt_quickfix(win->w_buffer))
14560 8413e66d00a1 patch 8.1.0293: checks for type of stack is cryptic Christian Brabandt <cb@256bit.org> parents: 14552 diff changeset	4146 if ((IS_QF_STACK(qi) && win->w_llist_ref == NULL)
8413e66d00a1 patch 8.1.0293: checks for type of stack is cryptic Christian Brabandt <cb@256bit.org> parents: 14552 diff changeset	4147 \|\| (IS_LL_STACK(qi) && win->w_llist_ref == qi))
859 99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4148 return TRUE;
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4149
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4150 return FALSE;
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4151 }
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4152
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4153 /*
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	4154 * Find a window displaying the quickfix/location stack 'qi'
13115 9812a9ca3ab2 patch 8.0.1432: after ":copen" can't get the window-ID of the quickfix window Christian Brabandt <cb@256bit.org> parents: 13105 diff changeset	4155 * Only searches in the current tabpage.
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4156 */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4157 static win_T *
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4158 qf_find_win(qf_info_T *qi)
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4159 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4160 win_T *win;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4161
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4162 FOR_ALL_WINDOWS(win)
859 99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4163 if (is_qf_win(win, qi))
13115 9812a9ca3ab2 patch 8.0.1432: after ":copen" can't get the window-ID of the quickfix window Christian Brabandt <cb@256bit.org> parents: 13105 diff changeset	4164 return win;
9812a9ca3ab2 patch 8.0.1432: after ":copen" can't get the window-ID of the quickfix window Christian Brabandt <cb@256bit.org> parents: 13105 diff changeset	4165 return NULL;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4166 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4167
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4168 /*
859 99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4169 * Find a quickfix buffer.
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4170 * Searches in windows opened in all the tabs.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4171 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4172 static buf_T *
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4173 qf_find_buf(qf_info_T *qi)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4174 {
859 99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4175 tabpage_T *tp;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4176 win_T *win;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4177
859 99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4178 FOR_ALL_TAB_WINDOWS(tp, win)
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4179 if (is_qf_win(win, qi))
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4180 return win->w_buffer;
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4181
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4182 return NULL;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4183 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4184
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4185 /*
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4186 * Update the w:quickfix_title variable in the quickfix/location list window
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4187 */
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4188 static void
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4189 qf_update_win_titlevar(qf_info_T *qi)
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4190 {
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4191 win_T *win;
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4192 win_T *curwin_save;
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4193
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4194 if ((win = qf_find_win(qi)) != NULL)
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4195 {
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4196 curwin_save = curwin;
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4197 curwin = win;
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	4198 qf_set_title_var(&qi->qf_lists[qi->qf_curlist]);
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4199 curwin = curwin_save;
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4200 }
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4201 }
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4202
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4203 /*
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4204 * Find the quickfix buffer. If it exists, update the contents.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4205 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4206 static void
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4207 qf_update_buffer(qf_info_T qi, qfline_T old_last)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4208 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4209 buf_T *buf;
3016 58bba69b3371 updated for version 7.3.280 Bram Moolenaar <bram@vim.org> parents: 3002 diff changeset	4210 win_T *win;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4211 aco_save_T aco;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4212
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4213 /* Check if a buffer for the quickfix list exists. Update it. */
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4214 buf = qf_find_buf(qi);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4215 if (buf != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4216 {
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4217 linenr_T old_line_count = buf->b_ml.ml_line_count;
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4218
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4219 if (old_last == NULL)
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4220 /* set curwin/curbuf to buf and save a few things */
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4221 aucmd_prepbuf(&aco, buf);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4222
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4223 qf_update_win_titlevar(qi);
3016 58bba69b3371 updated for version 7.3.280 Bram Moolenaar <bram@vim.org> parents: 3002 diff changeset	4224
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4225 qf_fill_buffer(qi, buf, old_last);
11705 c43118ecb0a3 patch 8.0.0735: no indication that the quickfix window/buffer changed Christian Brabandt <cb@256bit.org> parents: 11700 diff changeset	4226 ++CHANGEDTICK(buf);
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4227
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4228 if (old_last == NULL)
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4229 {
8932 25c2031e9f9f commit https://github.com/vim/vim/commit/c1808d5822ed9534ef7f0fe509b15bee92a5cc28 Christian Brabandt <cb@256bit.org> parents: 8751 diff changeset	4230 (void)qf_win_pos_update(qi, 0);
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4231
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4232 /* restore curwin/curbuf and a few other things */
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4233 aucmd_restbuf(&aco);
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4234 }
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4235
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4236 /* Only redraw when added lines are visible. This avoids flickering
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4237 * when the added lines are not visible. */
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4238 if ((win = qf_find_win(qi)) != NULL && old_line_count < win->w_botline)
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4239 redraw_buf_later(buf, NOT_VALID);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4240 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4241 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4242
6793 e1d59836eecc patch 7.4.718 Bram Moolenaar <bram@vim.org> parents: 6721 diff changeset	4243 /*
13992 710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4244 * Add an error line to the quickfix buffer.
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4245 */
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4246 static int
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4247 qf_buf_add_line(buf_T buf, linenr_T lnum, qfline_T qfp, char_u *dirname)
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4248 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4249 int len;
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4250 buf_T *errbuf;
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4251
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4252 if (qfp->qf_module != NULL)
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4253 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4254 STRCPY(IObuff, qfp->qf_module);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4255 len = (int)STRLEN(IObuff);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4256 }
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4257 else if (qfp->qf_fnum != 0
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4258 && (errbuf = buflist_findnr(qfp->qf_fnum)) != NULL
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4259 && errbuf->b_fname != NULL)
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4260 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4261 if (qfp->qf_type == 1) /* :helpgrep */
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4262 STRCPY(IObuff, gettail(errbuf->b_fname));
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4263 else
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4264 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4265 /* shorten the file name if not done already */
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4266 if (errbuf->b_sfname == NULL
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4267 \|\| mch_isFullName(errbuf->b_sfname))
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4268 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4269 if (*dirname == NUL)
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4270 mch_dirname(dirname, MAXPATHL);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4271 shorten_buf_fname(errbuf, dirname, FALSE);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4272 }
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4273 STRCPY(IObuff, errbuf->b_fname);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4274 }
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4275 len = (int)STRLEN(IObuff);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4276 }
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4277 else
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4278 len = 0;
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4279 IObuff[len++] = '\|';
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4280
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4281 if (qfp->qf_lnum > 0)
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4282 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4283 sprintf((char *)IObuff + len, "%ld", qfp->qf_lnum);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4284 len += (int)STRLEN(IObuff + len);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4285
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4286 if (qfp->qf_col > 0)
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4287 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4288 sprintf((char *)IObuff + len, " col %d", qfp->qf_col);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4289 len += (int)STRLEN(IObuff + len);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4290 }
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4291
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4292 sprintf((char *)IObuff + len, "%s",
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4293 (char *)qf_types(qfp->qf_type, qfp->qf_nr));
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4294 len += (int)STRLEN(IObuff + len);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4295 }
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4296 else if (qfp->qf_pattern != NULL)
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4297 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4298 qf_fmt_text(qfp->qf_pattern, IObuff + len, IOSIZE - len);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4299 len += (int)STRLEN(IObuff + len);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4300 }
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4301 IObuff[len++] = '\|';
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4302 IObuff[len++] = ' ';
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4303
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4304 /* Remove newlines and leading whitespace from the text.
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4305 * For an unrecognized line keep the indent, the compiler may
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4306 * mark a word with ^^^^. */
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4307 qf_fmt_text(len > 3 ? skipwhite(qfp->qf_text) : qfp->qf_text,
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4308 IObuff + len, IOSIZE - len);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4309
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4310 if (ml_append_buf(buf, lnum, IObuff,
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4311 (colnr_T)STRLEN(IObuff) + 1, FALSE) == FAIL)
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4312 return FAIL;
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4313
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4314 return OK;
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4315 }
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4316
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4317 /*
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4318 * Fill current buffer with quickfix errors, replacing any previous contents.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4319 * curbuf must be the quickfix buffer!
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4320 * If "old_last" is not NULL append the items after this one.
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4321 * When "old_last" is NULL then "buf" must equal "curbuf"! Because
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4322 * ml_delete() is used and autocommands will be triggered.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4323 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4324 static void
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4325 qf_fill_buffer(qf_info_T qi, buf_T buf, qfline_T *old_last)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4326 {
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	4327 linenr_T lnum;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	4328 qfline_T *qfp;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	4329 int old_KeyTyped = KeyTyped;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4330
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4331 if (old_last == NULL)
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4332 {
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4333 if (buf != curbuf)
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4334 {
10359 66f1b5bf3fa6 commit https://github.com/vim/vim/commit/95f096030ed1a8afea028f2ea295d6f6a70f466f Christian Brabandt <cb@256bit.org> parents: 10349 diff changeset	4335 internal_error("qf_fill_buffer()");
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4336 return;
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4337 }
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4338
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4339 /* delete all existing lines */
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4340 while ((curbuf->b_ml.ml_flags & ML_EMPTY) == 0)
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4341 (void)ml_delete((linenr_T)1, FALSE);
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4342 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4343
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4344 /* Check if there is anything to display */
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4345 if (qi->qf_curlist < qi->qf_listcount)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4346 {
13819 31bb8e1f7625 patch 8.0.1781: file names in quickfix window are not shortened Christian Brabandt <cb@256bit.org> parents: 13802 diff changeset	4347 char_u dirname[MAXPATHL];
31bb8e1f7625 patch 8.0.1781: file names in quickfix window are not shortened Christian Brabandt <cb@256bit.org> parents: 13802 diff changeset	4348
31bb8e1f7625 patch 8.0.1781: file names in quickfix window are not shortened Christian Brabandt <cb@256bit.org> parents: 13802 diff changeset	4349 *dirname = NUL;
31bb8e1f7625 patch 8.0.1781: file names in quickfix window are not shortened Christian Brabandt <cb@256bit.org> parents: 13802 diff changeset	4350
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4351 /* Add one line for each error */
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4352 if (old_last == NULL)
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4353 {
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4354 qfp = qi->qf_lists[qi->qf_curlist].qf_start;
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4355 lnum = 0;
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4356 }
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4357 else
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4358 {
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4359 qfp = old_last->qf_next;
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4360 lnum = buf->b_ml.ml_line_count;
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4361 }
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4362 while (lnum < qi->qf_lists[qi->qf_curlist].qf_count)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4363 {
13992 710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4364 if (qf_buf_add_line(buf, lnum, qfp, dirname) == FAIL)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4365 break;
13992 710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4366
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4367 ++lnum;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4368 qfp = qfp->qf_next;
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	4369 if (qfp == NULL)
543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	4370 break;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4371 }
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4372
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4373 if (old_last == NULL)
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4374 /* Delete the empty line which is now at the end */
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4375 (void)ml_delete(lnum + 1, FALSE);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4376 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4377
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4378 /* correct cursor position */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4379 check_lnums(TRUE);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4380
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4381 if (old_last == NULL)
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4382 {
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4383 /* Set the 'filetype' to "qf" each time after filling the buffer.
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4384 * This resembles reading a file into a buffer, it's more logical when
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4385 * using autocommands. */
11589 39787def24bb patch 8.0.0677: setting 'filetype' may switch buffers Christian Brabandt <cb@256bit.org> parents: 11549 diff changeset	4386 ++curbuf_lock;
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4387 set_option_value((char_u )"ft", 0L, (char_u )"qf", OPT_LOCAL);
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4388 curbuf->b_p_ma = FALSE;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4389
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4390 keep_filetype = TRUE; /* don't detect 'filetype' */
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4391 apply_autocmds(EVENT_BUFREADPOST, (char_u *)"quickfix", NULL,
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4392 FALSE, curbuf);
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4393 apply_autocmds(EVENT_BUFWINENTER, (char_u *)"quickfix", NULL,
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4394 FALSE, curbuf);
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4395 keep_filetype = FALSE;
11589 39787def24bb patch 8.0.0677: setting 'filetype' may switch buffers Christian Brabandt <cb@256bit.org> parents: 11549 diff changeset	4396 --curbuf_lock;
13380 69517d67421f patch 8.0.1564: too many #ifdefs Christian Brabandt <cb@256bit.org> parents: 13252 diff changeset	4397
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4398 /* make sure it will be redrawn */
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4399 redraw_curbuf_later(NOT_VALID);
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4400 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4401
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4402 /* Restore KeyTyped, setting 'filetype' may reset it. */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4403 KeyTyped = old_KeyTyped;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4404 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4405
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	4406 /*
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	4407 * For every change made to the quickfix list, update the changed tick.
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	4408 */
13062 6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	4409 static void
6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	4410 qf_list_changed(qf_info_T *qi, int qf_idx)
6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	4411 {
6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	4412 qi->qf_lists[qf_idx].qf_changedtick++;
6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	4413 }
6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	4414
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4415 /*
14250 ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4416 * Return the quickfix/location list number with the given identifier.
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4417 * Returns -1 if list is not found.
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4418 */
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4419 static int
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4420 qf_id2nr(qf_info_T *qi, int_u qfid)
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4421 {
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4422 int qf_idx;
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4423
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4424 for (qf_idx = 0; qf_idx < qi->qf_listcount; qf_idx++)
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4425 if (qi->qf_lists[qf_idx].qf_id == qfid)
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4426 return qf_idx;
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4427 return INVALID_QFIDX;
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4428 }
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4429
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4430 /*
14495 178162aeebeb patch 8.1.0261: Coverity complains about a negative array index Christian Brabandt <cb@256bit.org> parents: 14491 diff changeset	4431 * If the current list is not "save_qfid" and we can find the list with that ID
178162aeebeb patch 8.1.0261: Coverity complains about a negative array index Christian Brabandt <cb@256bit.org> parents: 14491 diff changeset	4432 * then make it the current list.
178162aeebeb patch 8.1.0261: Coverity complains about a negative array index Christian Brabandt <cb@256bit.org> parents: 14491 diff changeset	4433 * This is used when autocommands may have changed the current list.
14507 5a10a0020c3e patch 8.1.0267: no good check if restoring quickfix list worked Christian Brabandt <cb@256bit.org> parents: 14495 diff changeset	4434 * Returns OK if successfully restored the list. Returns FAIL if the list with
5a10a0020c3e patch 8.1.0267: no good check if restoring quickfix list worked Christian Brabandt <cb@256bit.org> parents: 14495 diff changeset	4435 * the specified identifier (save_qfid) is not found in the stack.
5a10a0020c3e patch 8.1.0267: no good check if restoring quickfix list worked Christian Brabandt <cb@256bit.org> parents: 14495 diff changeset	4436 */
5a10a0020c3e patch 8.1.0267: no good check if restoring quickfix list worked Christian Brabandt <cb@256bit.org> parents: 14495 diff changeset	4437 static int
14495 178162aeebeb patch 8.1.0261: Coverity complains about a negative array index Christian Brabandt <cb@256bit.org> parents: 14491 diff changeset	4438 qf_restore_list(qf_info_T *qi, int_u save_qfid)
178162aeebeb patch 8.1.0261: Coverity complains about a negative array index Christian Brabandt <cb@256bit.org> parents: 14491 diff changeset	4439 {
178162aeebeb patch 8.1.0261: Coverity complains about a negative array index Christian Brabandt <cb@256bit.org> parents: 14491 diff changeset	4440 int curlist;
178162aeebeb patch 8.1.0261: Coverity complains about a negative array index Christian Brabandt <cb@256bit.org> parents: 14491 diff changeset	4441
178162aeebeb patch 8.1.0261: Coverity complains about a negative array index Christian Brabandt <cb@256bit.org> parents: 14491 diff changeset	4442 if (qi->qf_lists[qi->qf_curlist].qf_id != save_qfid)
178162aeebeb patch 8.1.0261: Coverity complains about a negative array index Christian Brabandt <cb@256bit.org> parents: 14491 diff changeset	4443 {
178162aeebeb patch 8.1.0261: Coverity complains about a negative array index Christian Brabandt <cb@256bit.org> parents: 14491 diff changeset	4444 curlist = qf_id2nr(qi, save_qfid);
14507 5a10a0020c3e patch 8.1.0267: no good check if restoring quickfix list worked Christian Brabandt <cb@256bit.org> parents: 14495 diff changeset	4445 if (curlist < 0)
5a10a0020c3e patch 8.1.0267: no good check if restoring quickfix list worked Christian Brabandt <cb@256bit.org> parents: 14495 diff changeset	4446 // list is not present
5a10a0020c3e patch 8.1.0267: no good check if restoring quickfix list worked Christian Brabandt <cb@256bit.org> parents: 14495 diff changeset	4447 return FAIL;
5a10a0020c3e patch 8.1.0267: no good check if restoring quickfix list worked Christian Brabandt <cb@256bit.org> parents: 14495 diff changeset	4448 qi->qf_curlist = curlist;
5a10a0020c3e patch 8.1.0267: no good check if restoring quickfix list worked Christian Brabandt <cb@256bit.org> parents: 14495 diff changeset	4449 }
5a10a0020c3e patch 8.1.0267: no good check if restoring quickfix list worked Christian Brabandt <cb@256bit.org> parents: 14495 diff changeset	4450 return OK;
14495 178162aeebeb patch 8.1.0261: Coverity complains about a negative array index Christian Brabandt <cb@256bit.org> parents: 14491 diff changeset	4451 }
178162aeebeb patch 8.1.0261: Coverity complains about a negative array index Christian Brabandt <cb@256bit.org> parents: 14491 diff changeset	4452
178162aeebeb patch 8.1.0261: Coverity complains about a negative array index Christian Brabandt <cb@256bit.org> parents: 14491 diff changeset	4453 /*
14469 0211e295835e patch 8.1.0248: duplicated quickfix code Christian Brabandt <cb@256bit.org> parents: 14433 diff changeset	4454 * Jump to the first entry if there is one.
0211e295835e patch 8.1.0248: duplicated quickfix code Christian Brabandt <cb@256bit.org> parents: 14433 diff changeset	4455 */
0211e295835e patch 8.1.0248: duplicated quickfix code Christian Brabandt <cb@256bit.org> parents: 14433 diff changeset	4456 static void
0211e295835e patch 8.1.0248: duplicated quickfix code Christian Brabandt <cb@256bit.org> parents: 14433 diff changeset	4457 qf_jump_first(qf_info_T *qi, int_u save_qfid, int forceit)
0211e295835e patch 8.1.0248: duplicated quickfix code Christian Brabandt <cb@256bit.org> parents: 14433 diff changeset	4458 {
14507 5a10a0020c3e patch 8.1.0267: no good check if restoring quickfix list worked Christian Brabandt <cb@256bit.org> parents: 14495 diff changeset	4459 if (qf_restore_list(qi, save_qfid) == FAIL)
5a10a0020c3e patch 8.1.0267: no good check if restoring quickfix list worked Christian Brabandt <cb@256bit.org> parents: 14495 diff changeset	4460 return;
5a10a0020c3e patch 8.1.0267: no good check if restoring quickfix list worked Christian Brabandt <cb@256bit.org> parents: 14495 diff changeset	4461
5a10a0020c3e patch 8.1.0267: no good check if restoring quickfix list worked Christian Brabandt <cb@256bit.org> parents: 14495 diff changeset	4462 // Autocommands might have cleared the list, check for that.
14491 9df0fcbfebb2 patch 8.1.0259: no test for fixed quickfix issue Christian Brabandt <cb@256bit.org> parents: 14477 diff changeset	4463 if (!qf_list_empty(qi, qi->qf_curlist))
14469 0211e295835e patch 8.1.0248: duplicated quickfix code Christian Brabandt <cb@256bit.org> parents: 14433 diff changeset	4464 qf_jump(qi, 0, 0, forceit);
0211e295835e patch 8.1.0248: duplicated quickfix code Christian Brabandt <cb@256bit.org> parents: 14433 diff changeset	4465 }
0211e295835e patch 8.1.0248: duplicated quickfix code Christian Brabandt <cb@256bit.org> parents: 14433 diff changeset	4466
0211e295835e patch 8.1.0248: duplicated quickfix code Christian Brabandt <cb@256bit.org> parents: 14433 diff changeset	4467 /*
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	4468 * Return TRUE when using ":vimgrep" for ":grep".
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	4469 */
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	4470 int
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4471 grep_internal(cmdidx_T cmdidx)
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	4472 {
661 e93a99ef31d0 updated for version 7.0195 vimboss parents: 659 diff changeset	4473 return ((cmdidx == CMD_grep
e93a99ef31d0 updated for version 7.0195 vimboss parents: 659 diff changeset	4474 \|\| cmdidx == CMD_lgrep
e93a99ef31d0 updated for version 7.0195 vimboss parents: 659 diff changeset	4475 \|\| cmdidx == CMD_grepadd
e93a99ef31d0 updated for version 7.0195 vimboss parents: 659 diff changeset	4476 \|\| cmdidx == CMD_lgrepadd)
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	4477 && STRCMP("internal",
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	4478 *curbuf->b_p_gp == NUL ? p_gp : curbuf->b_p_gp) == 0);
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	4479 }
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	4480
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	4481 /*
14852 3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4482 * Return the make/grep autocmd name.
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4483 */
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4484 static char_u *
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4485 make_get_auname(cmdidx_T cmdidx)
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4486 {
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4487 switch (cmdidx)
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4488 {
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4489 case CMD_make: return (char_u *)"make";
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4490 case CMD_lmake: return (char_u *)"lmake";
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4491 case CMD_grep: return (char_u *)"grep";
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4492 case CMD_lgrep: return (char_u *)"lgrep";
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4493 case CMD_grepadd: return (char_u *)"grepadd";
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4494 case CMD_lgrepadd: return (char_u *)"lgrepadd";
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4495 default: return NULL;
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4496 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4497 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4498
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4499 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4500 * Return the name for the errorfile, in allocated memory.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4501 * Find a new unique name when 'makeef' contains "##".
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4502 * Returns NULL for error.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4503 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4504 static char_u *
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4505 get_mef_name(void)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4506 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4507 char_u *p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4508 char_u *name;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4509 static int start = -1;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4510 static int off = 0;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4511 #ifdef HAVE_LSTAT
9387 f094d4085014 commit https://github.com/vim/vim/commit/8767f52fbfd4f053ce00a978227c95f1d7d323fe Christian Brabandt <cb@256bit.org> parents: 9379 diff changeset	4512 stat_T sb;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4513 #endif
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4514
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4515 if (*p_mef == NUL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4516 {
6721 7347229a646a updated for version 7.4.684 Bram Moolenaar <bram@vim.org> parents: 6450 diff changeset	4517 name = vim_tempname('e', FALSE);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4518 if (name == NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4519 EMSG(_(e_notmp));
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4520 return name;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4521 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4522
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4523 for (p = p_mef; *p; ++p)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4524 if (p[0] == '#' && p[1] == '#')
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4525 break;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4526
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4527 if (*p == NUL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4528 return vim_strsave(p_mef);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4529
14852 3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4530 // Keep trying until the name doesn't exist yet.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4531 for (;;)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4532 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4533 if (start == -1)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4534 start = mch_get_pid();
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4535 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4536 off += 19;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4537
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4538 name = alloc((unsigned)STRLEN(p_mef) + 30);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4539 if (name == NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4540 break;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4541 STRCPY(name, p_mef);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4542 sprintf((char *)name + (p - p_mef), "%d%d", start, off);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4543 STRCAT(name, p + 2);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4544 if (mch_getperm(name) < 0
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4545 #ifdef HAVE_LSTAT
14852 3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4546 // Don't accept a symbolic link, it's a security risk.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4547 && mch_lstat((char *)name, &sb) < 0
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4548 #endif
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4549 )
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4550 break;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4551 vim_free(name);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4552 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4553 return name;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4554 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4555
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4556 /*
14852 3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4557 * Form the complete command line to invoke 'make'/'grep'. Quote the command
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4558 * using 'shellquote' and append 'shellpipe'. Echo the fully formed command.
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4559 */
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4560 static char_u *
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4561 make_get_fullcmd(char_u makecmd, char_u fname)
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4562 {
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4563 char_u *cmd;
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4564 unsigned len;
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4565
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4566 len = (unsigned)STRLEN(p_shq) * 2 + (unsigned)STRLEN(makecmd) + 1;
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4567 if (*p_sp != NUL)
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4568 len += (unsigned)STRLEN(p_sp) + (unsigned)STRLEN(fname) + 3;
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4569 cmd = alloc(len);
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4570 if (cmd == NULL)
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4571 return NULL;
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4572 sprintf((char )cmd, "%s%s%s", (char )p_shq, (char *)makecmd,
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4573 (char *)p_shq);
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4574
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4575 // If 'shellpipe' empty: don't redirect to 'errorfile'.
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4576 if (*p_sp != NUL)
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4577 append_redir(cmd, len, p_sp, fname);
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4578
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4579 // Display the fully formed command. Output a newline if there's something
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4580 // else than the :make command that was typed (in which case the cursor is
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4581 // in column 0).
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4582 if (msg_col == 0)
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4583 msg_didout = FALSE;
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4584 msg_start();
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4585 MSG_PUTS(":!");
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4586 msg_outtrans(cmd); // show what we are doing
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4587
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4588 return cmd;
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4589 }
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4590
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4591 /*
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4592 * Used for ":make", ":lmake", ":grep", ":lgrep", ":grepadd", and ":lgrepadd"
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4593 */
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4594 void
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4595 ex_make(exarg_T *eap)
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4596 {
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4597 char_u *fname;
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4598 char_u *cmd;
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4599 char_u *enc = NULL;
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4600 win_T *wp = NULL;
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4601 qf_info_T *qi = &ql_info;
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4602 int res;
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4603 char_u *au_name = NULL;
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4604 int_u save_qfid;
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4605
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4606 // Redirect ":grep" to ":vimgrep" if 'grepprg' is "internal".
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4607 if (grep_internal(eap->cmdidx))
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4608 {
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4609 ex_vimgrep(eap);
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4610 return;
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4611 }
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4612
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4613 au_name = make_get_auname(eap->cmdidx);
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4614 if (au_name != NULL && apply_autocmds(EVENT_QUICKFIXCMDPRE, au_name,
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4615 curbuf->b_fname, TRUE, curbuf))
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4616 {
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4617 #ifdef FEAT_EVAL
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4618 if (aborting())
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4619 return;
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4620 #endif
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4621 }
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4622 #ifdef FEAT_MBYTE
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4623 enc = (*curbuf->b_p_menc != NUL) ? curbuf->b_p_menc : p_menc;
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4624 #endif
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4625
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4626 if (is_loclist_cmd(eap->cmdidx))
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4627 wp = curwin;
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4628
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4629 autowrite_all();
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4630 fname = get_mef_name();
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4631 if (fname == NULL)
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4632 return;
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4633 mch_remove(fname); // in case it's not unique
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4634
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4635 cmd = make_get_fullcmd(eap->arg, fname);
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4636 if (cmd == NULL)
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4637 return;
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4638
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4639 // let the shell know if we are redirecting output or not
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4640 do_shell(cmd, *p_sp != NUL ? SHELL_DOOUT : 0);
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4641
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4642 #ifdef AMIGA
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4643 out_flush();
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4644 // read window status report and redraw before message
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4645 (void)char_avail();
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4646 #endif
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4647
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4648 res = qf_init(wp, fname, (eap->cmdidx != CMD_make
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4649 && eap->cmdidx != CMD_lmake) ? p_gefm : p_efm,
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4650 (eap->cmdidx != CMD_grepadd
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4651 && eap->cmdidx != CMD_lgrepadd),
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4652 qf_cmdtitle(*eap->cmdlinep), enc);
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4653 if (wp != NULL)
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4654 {
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4655 qi = GET_LOC_LIST(wp);
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4656 if (qi == NULL)
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4657 goto cleanup;
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4658 }
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4659 if (res >= 0)
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4660 qf_list_changed(qi, qi->qf_curlist);
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4661
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4662 // Remember the current quickfix list identifier, so that we can
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4663 // check for autocommands changing the current quickfix list.
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4664 save_qfid = qi->qf_lists[qi->qf_curlist].qf_id;
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4665 if (au_name != NULL)
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4666 apply_autocmds(EVENT_QUICKFIXCMDPOST, au_name,
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4667 curbuf->b_fname, TRUE, curbuf);
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4668 if (res > 0 && !eap->forceit && qflist_valid(wp, save_qfid))
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4669 // display the first error
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4670 qf_jump_first(qi, save_qfid, FALSE);
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4671
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4672 cleanup:
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4673 mch_remove(fname);
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4674 vim_free(fname);
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4675 vim_free(cmd);
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4676 }
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4677
3c8a4b25427c patch 8.1.0438: the ex_make() function is too long Christian Brabandt <cb@256bit.org> parents: 14844 diff changeset	4678 /*
7092 64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4679 * Returns the number of valid entries in the current quickfix/location list.
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4680 */
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4681 int
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4682 qf_get_size(exarg_T *eap)
7092 64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4683 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4684 qf_info_T *qi = &ql_info;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4685 qfline_T *qfp;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4686 int i, sz = 0;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4687 int prev_fnum = 0;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4688
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4689 if (is_loclist_cmd(eap->cmdidx))
7092 64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4690 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4691 /* Location list */
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4692 qi = GET_LOC_LIST(curwin);
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4693 if (qi == NULL)
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4694 return 0;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4695 }
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4696
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4697 for (i = 0, qfp = qi->qf_lists[qi->qf_curlist].qf_start;
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	4698 i < qi->qf_lists[qi->qf_curlist].qf_count && qfp != NULL;
7092 64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4699 ++i, qfp = qfp->qf_next)
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4700 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4701 if (qfp->qf_valid)
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4702 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4703 if (eap->cmdidx == CMD_cdo \|\| eap->cmdidx == CMD_ldo)
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4704 sz++; /* Count all valid entries */
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4705 else if (qfp->qf_fnum > 0 && qfp->qf_fnum != prev_fnum)
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4706 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4707 /* Count the number of files */
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4708 sz++;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4709 prev_fnum = qfp->qf_fnum;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4710 }
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4711 }
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4712 }
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4713
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4714 return sz;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4715 }
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4716
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4717 /*
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4718 * Returns the current index of the quickfix/location list.
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4719 * Returns 0 if there is an error.
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4720 */
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4721 int
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4722 qf_get_cur_idx(exarg_T *eap)
7092 64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4723 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4724 qf_info_T *qi = &ql_info;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4725
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4726 if (is_loclist_cmd(eap->cmdidx))
7092 64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4727 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4728 /* Location list */
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4729 qi = GET_LOC_LIST(curwin);
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4730 if (qi == NULL)
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4731 return 0;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4732 }
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4733
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4734 return qi->qf_lists[qi->qf_curlist].qf_index;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4735 }
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4736
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4737 /*
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4738 * Returns the current index in the quickfix/location list (counting only valid
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4739 * entries). If no valid entries are in the list, then returns 1.
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4740 */
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4741 int
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4742 qf_get_cur_valid_idx(exarg_T *eap)
7092 64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4743 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4744 qf_info_T *qi = &ql_info;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4745 qf_list_T *qfl;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4746 qfline_T *qfp;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4747 int i, eidx = 0;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4748 int prev_fnum = 0;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4749
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4750 if (is_loclist_cmd(eap->cmdidx))
7092 64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4751 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4752 /* Location list */
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4753 qi = GET_LOC_LIST(curwin);
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4754 if (qi == NULL)
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4755 return 1;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4756 }
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4757
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4758 qfl = &qi->qf_lists[qi->qf_curlist];
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4759 qfp = qfl->qf_start;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4760
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4761 /* check if the list has valid errors */
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4762 if (qfl->qf_count <= 0 \|\| qfl->qf_nonevalid)
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4763 return 1;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4764
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4765 for (i = 1; i <= qfl->qf_index && qfp!= NULL; i++, qfp = qfp->qf_next)
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4766 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4767 if (qfp->qf_valid)
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4768 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4769 if (eap->cmdidx == CMD_cfdo \|\| eap->cmdidx == CMD_lfdo)
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4770 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4771 if (qfp->qf_fnum > 0 && qfp->qf_fnum != prev_fnum)
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4772 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4773 /* Count the number of files */
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4774 eidx++;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4775 prev_fnum = qfp->qf_fnum;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4776 }
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4777 }
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4778 else
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4779 eidx++;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4780 }
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4781 }
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4782
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4783 return eidx ? eidx : 1;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4784 }
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4785
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4786 /*
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4787 * Get the 'n'th valid error entry in the quickfix or location list.
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4788 * Used by :cdo, :ldo, :cfdo and :lfdo commands.
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4789 * For :cdo and :ldo returns the 'n'th valid error entry.
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4790 * For :cfdo and :lfdo returns the 'n'th valid file entry.
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4791 */
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4792 static int
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	4793 qf_get_nth_valid_entry(qf_list_T *qfl, int n, int fdo)
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	4794 {
7092 64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4795 qfline_T *qfp = qfl->qf_start;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4796 int i, eidx;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4797 int prev_fnum = 0;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4798
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4799 /* check if the list has valid errors */
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4800 if (qfl->qf_count <= 0 \|\| qfl->qf_nonevalid)
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4801 return 1;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4802
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	4803 for (i = 1, eidx = 0; i <= qfl->qf_count && qfp != NULL;
7092 64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4804 i++, qfp = qfp->qf_next)
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4805 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4806 if (qfp->qf_valid)
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4807 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4808 if (fdo)
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4809 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4810 if (qfp->qf_fnum > 0 && qfp->qf_fnum != prev_fnum)
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4811 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4812 /* Count the number of files */
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4813 eidx++;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4814 prev_fnum = qfp->qf_fnum;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4815 }
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4816 }
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4817 else
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4818 eidx++;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4819 }
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4820
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4821 if (eidx == n)
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4822 break;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4823 }
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4824
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4825 if (i <= qfl->qf_count)
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4826 return i;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4827 else
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4828 return 1;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4829 }
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4830
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4831 /*
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4832 * ":cc", ":crewind", ":cfirst" and ":clast".
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4833 * ":ll", ":lrewind", ":lfirst" and ":llast".
7092 64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4834 * ":cdo", ":ldo", ":cfdo" and ":lfdo"
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4835 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4836 void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4837 ex_cc(exarg_T *eap)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4838 {
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	4839 qf_info_T *qi = &ql_info;
7092 64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4840 int errornr;
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	4841
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4842 if (is_loclist_cmd(eap->cmdidx))
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4843 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4844 qi = GET_LOC_LIST(curwin);
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4845 if (qi == NULL)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4846 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4847 EMSG(_(e_loclist));
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4848 return;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4849 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4850 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4851
7092 64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4852 if (eap->addr_count > 0)
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4853 errornr = (int)eap->line2;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4854 else
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4855 {
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4856 switch (eap->cmdidx)
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4857 {
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4858 case CMD_cc: case CMD_ll:
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4859 errornr = 0;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4860 break;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4861 case CMD_crewind: case CMD_lrewind: case CMD_cfirst:
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4862 case CMD_lfirst:
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4863 errornr = 1;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4864 break;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4865 default:
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4866 errornr = 32767;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4867 }
7092 64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4868 }
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4869
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4870 /* For cdo and ldo commands, jump to the nth valid error.
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4871 * For cfdo and lfdo commands, jump to the nth valid file entry.
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4872 */
12084 69ce6b3f0834 patch 8.0.0922: quickfix list always added after current one Christian Brabandt <cb@256bit.org> parents: 12048 diff changeset	4873 if (eap->cmdidx == CMD_cdo \|\| eap->cmdidx == CMD_ldo
69ce6b3f0834 patch 8.0.0922: quickfix list always added after current one Christian Brabandt <cb@256bit.org> parents: 12048 diff changeset	4874 \|\| eap->cmdidx == CMD_cfdo \|\| eap->cmdidx == CMD_lfdo)
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	4875 errornr = qf_get_nth_valid_entry(&qi->qf_lists[qi->qf_curlist],
7092 64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4876 eap->addr_count > 0 ? (int)eap->line1 : 1,
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4877 eap->cmdidx == CMD_cfdo \|\| eap->cmdidx == CMD_lfdo);
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4878
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4879 qf_jump(qi, 0, errornr, eap->forceit);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4880 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4881
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4882 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4883 * ":cnext", ":cnfile", ":cNext" and ":cprevious".
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4884 * ":lnext", ":lNext", ":lprevious", ":lnfile", ":lNfile" and ":lpfile".
7092 64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4885 * Also, used by ":cdo", ":ldo", ":cfdo" and ":lfdo" commands.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4886 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4887 void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4888 ex_cnext(exarg_T *eap)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4889 {
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	4890 qf_info_T *qi = &ql_info;
7092 64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4891 int errornr;
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4892 int dir;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4893
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4894 if (is_loclist_cmd(eap->cmdidx))
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4895 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4896 qi = GET_LOC_LIST(curwin);
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4897 if (qi == NULL)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4898 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4899 EMSG(_(e_loclist));
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4900 return;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4901 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4902 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4903
12084 69ce6b3f0834 patch 8.0.0922: quickfix list always added after current one Christian Brabandt <cb@256bit.org> parents: 12048 diff changeset	4904 if (eap->addr_count > 0
69ce6b3f0834 patch 8.0.0922: quickfix list always added after current one Christian Brabandt <cb@256bit.org> parents: 12048 diff changeset	4905 && (eap->cmdidx != CMD_cdo && eap->cmdidx != CMD_ldo
69ce6b3f0834 patch 8.0.0922: quickfix list always added after current one Christian Brabandt <cb@256bit.org> parents: 12048 diff changeset	4906 && eap->cmdidx != CMD_cfdo && eap->cmdidx != CMD_lfdo))
7092 64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4907 errornr = (int)eap->line2;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4908 else
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4909 errornr = 1;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4910
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4911 // Depending on the command jump to either next or previous entry/file.
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4912 switch (eap->cmdidx)
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4913 {
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4914 case CMD_cnext: case CMD_lnext: case CMD_cdo: case CMD_ldo:
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4915 dir = FORWARD;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4916 break;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4917 case CMD_cprevious: case CMD_lprevious: case CMD_cNext:
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4918 case CMD_lNext:
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4919 dir = BACKWARD;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4920 break;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4921 case CMD_cnfile: case CMD_lnfile: case CMD_cfdo: case CMD_lfdo:
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4922 dir = FORWARD_FILE;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4923 break;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4924 case CMD_cpfile: case CMD_lpfile: case CMD_cNfile: case CMD_lNfile:
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4925 dir = BACKWARD_FILE;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4926 break;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4927 default:
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4928 dir = FORWARD;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4929 break;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4930 }
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4931
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4932 qf_jump(qi, dir, errornr, eap->forceit);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4933 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4934
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4935 /*
446 7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	4936 * ":cfile"/":cgetfile"/":caddfile" commands.
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4937 * ":lfile"/":lgetfile"/":laddfile" commands.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4938 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4939 void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4940 ex_cfile(exarg_T *eap)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4941 {
11063 e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	4942 char_u *enc = NULL;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4943 win_T *wp = NULL;
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	4944 qf_info_T *qi = &ql_info;
3404 38a135730423 updated for version 7.3.468 Bram Moolenaar <bram@vim.org> parents: 3365 diff changeset	4945 char_u *au_name = NULL;
14250 ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4946 int_u save_qfid = 0; /* init for gcc */
12954 49e136457c66 patch 8.0.1353: QuickFixCmdPost is not used consistently Christian Brabandt <cb@256bit.org> parents: 12912 diff changeset	4947 int res;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4948
3404 38a135730423 updated for version 7.3.468 Bram Moolenaar <bram@vim.org> parents: 3365 diff changeset	4949 switch (eap->cmdidx)
38a135730423 updated for version 7.3.468 Bram Moolenaar <bram@vim.org> parents: 3365 diff changeset	4950 {
38a135730423 updated for version 7.3.468 Bram Moolenaar <bram@vim.org> parents: 3365 diff changeset	4951 case CMD_cfile: au_name = (char_u *)"cfile"; break;
38a135730423 updated for version 7.3.468 Bram Moolenaar <bram@vim.org> parents: 3365 diff changeset	4952 case CMD_cgetfile: au_name = (char_u *)"cgetfile"; break;
38a135730423 updated for version 7.3.468 Bram Moolenaar <bram@vim.org> parents: 3365 diff changeset	4953 case CMD_caddfile: au_name = (char_u *)"caddfile"; break;
38a135730423 updated for version 7.3.468 Bram Moolenaar <bram@vim.org> parents: 3365 diff changeset	4954 case CMD_lfile: au_name = (char_u *)"lfile"; break;
38a135730423 updated for version 7.3.468 Bram Moolenaar <bram@vim.org> parents: 3365 diff changeset	4955 case CMD_lgetfile: au_name = (char_u *)"lgetfile"; break;
38a135730423 updated for version 7.3.468 Bram Moolenaar <bram@vim.org> parents: 3365 diff changeset	4956 case CMD_laddfile: au_name = (char_u *)"laddfile"; break;
38a135730423 updated for version 7.3.468 Bram Moolenaar <bram@vim.org> parents: 3365 diff changeset	4957 default: break;
38a135730423 updated for version 7.3.468 Bram Moolenaar <bram@vim.org> parents: 3365 diff changeset	4958 }
38a135730423 updated for version 7.3.468 Bram Moolenaar <bram@vim.org> parents: 3365 diff changeset	4959 if (au_name != NULL)
38a135730423 updated for version 7.3.468 Bram Moolenaar <bram@vim.org> parents: 3365 diff changeset	4960 apply_autocmds(EVENT_QUICKFIXCMDPRE, au_name, NULL, FALSE, curbuf);
11063 e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	4961 #ifdef FEAT_MBYTE
e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	4962 enc = (*curbuf->b_p_menc != NUL) ? curbuf->b_p_menc : p_menc;
e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	4963 #endif
2296 eb7be7b075a6 Support :browse for commands that use an error file argument. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2146 diff changeset	4964 #ifdef FEAT_BROWSE
eb7be7b075a6 Support :browse for commands that use an error file argument. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2146 diff changeset	4965 if (cmdmod.browse)
eb7be7b075a6 Support :browse for commands that use an error file argument. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2146 diff changeset	4966 {
eb7be7b075a6 Support :browse for commands that use an error file argument. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2146 diff changeset	4967 char_u browse_file = do_browse(0, (char_u )_("Error file"), eap->arg,
13802 378f9f8e6d8f patch 8.0.1773: dialog messages are not translated Christian Brabandt <cb@256bit.org> parents: 13800 diff changeset	4968 NULL, NULL,
378f9f8e6d8f patch 8.0.1773: dialog messages are not translated Christian Brabandt <cb@256bit.org> parents: 13800 diff changeset	4969 (char_u *)_(BROWSE_FILTER_ALL_FILES), NULL);
2296 eb7be7b075a6 Support :browse for commands that use an error file argument. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2146 diff changeset	4970 if (browse_file == NULL)
eb7be7b075a6 Support :browse for commands that use an error file argument. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2146 diff changeset	4971 return;
eb7be7b075a6 Support :browse for commands that use an error file argument. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2146 diff changeset	4972 set_string_option_direct((char_u *)"ef", -1, browse_file, OPT_FREE, 0);
eb7be7b075a6 Support :browse for commands that use an error file argument. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2146 diff changeset	4973 vim_free(browse_file);
eb7be7b075a6 Support :browse for commands that use an error file argument. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2146 diff changeset	4974 }
eb7be7b075a6 Support :browse for commands that use an error file argument. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2146 diff changeset	4975 else
eb7be7b075a6 Support :browse for commands that use an error file argument. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2146 diff changeset	4976 #endif
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4977 if (*eap->arg != NUL)
694 07d199fe02ed updated for version 7.0209 vimboss parents: 682 diff changeset	4978 set_string_option_direct((char_u *)"ef", -1, eap->arg, OPT_FREE, 0);
446 7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	4979
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4980 if (is_loclist_cmd(eap->cmdidx))
13078 a1f8939a4644 patch 8.0.1414: accessing freed memory in :lfile. Christian Brabandt <cb@256bit.org> parents: 13076 diff changeset	4981 wp = curwin;
a1f8939a4644 patch 8.0.1414: accessing freed memory in :lfile. Christian Brabandt <cb@256bit.org> parents: 13076 diff changeset	4982
446 7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	4983 /*
7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	4984 * This function is used by the :cfile, :cgetfile and :caddfile
7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	4985 * commands.
7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	4986 * :cfile always creates a new quickfix list and jumps to the
7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	4987 * first error.
7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	4988 * :cgetfile creates a new quickfix list but doesn't jump to the
7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	4989 * first error.
7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	4990 * :caddfile adds to an existing quickfix list. If there is no
7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	4991 * quickfix list then a new list is created.
7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	4992 */
12954 49e136457c66 patch 8.0.1353: QuickFixCmdPost is not used consistently Christian Brabandt <cb@256bit.org> parents: 12912 diff changeset	4993 res = qf_init(wp, p_ef, p_efm, (eap->cmdidx != CMD_caddfile
13921 3b6c29f8c1a2 patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':' Christian Brabandt <cb@256bit.org> parents: 13882 diff changeset	4994 && eap->cmdidx != CMD_laddfile),
3b6c29f8c1a2 patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':' Christian Brabandt <cb@256bit.org> parents: 13882 diff changeset	4995 qf_cmdtitle(*eap->cmdlinep), enc);
13062 6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	4996 if (wp != NULL)
14250 ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4997 {
13062 6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	4998 qi = GET_LOC_LIST(wp);
14250 ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4999 if (qi == NULL)
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	5000 return;
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	5001 }
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	5002 if (res >= 0)
13062 6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	5003 qf_list_changed(qi, qi->qf_curlist);
14250 ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	5004 save_qfid = qi->qf_lists[qi->qf_curlist].qf_id;
12954 49e136457c66 patch 8.0.1353: QuickFixCmdPost is not used consistently Christian Brabandt <cb@256bit.org> parents: 12912 diff changeset	5005 if (au_name != NULL)
49e136457c66 patch 8.0.1353: QuickFixCmdPost is not used consistently Christian Brabandt <cb@256bit.org> parents: 12912 diff changeset	5006 apply_autocmds(EVENT_QUICKFIXCMDPOST, au_name, NULL, FALSE, curbuf);
13252 66b8b29854d9 patch 8.0.1500: possible NULL pointer dereference Christian Brabandt <cb@256bit.org> parents: 13244 diff changeset	5007
14250 ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	5008 // Jump to the first error for a new list and if autocmds didn't
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	5009 // free the list.
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	5010 if (res > 0 && (eap->cmdidx == CMD_cfile \|\| eap->cmdidx == CMD_lfile)
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	5011 && qflist_valid(wp, save_qfid))
14469 0211e295835e patch 8.1.0248: duplicated quickfix code Christian Brabandt <cb@256bit.org> parents: 14433 diff changeset	5012 // display the first error
0211e295835e patch 8.1.0248: duplicated quickfix code Christian Brabandt <cb@256bit.org> parents: 14433 diff changeset	5013 qf_jump_first(qi, save_qfid, eap->forceit);
13594 4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5014 }
4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5015
4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5016 /*
13521 15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5017 * Return the vimgrep autocmd name.
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5018 */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5019 static char_u *
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5020 vgr_get_auname(cmdidx_T cmdidx)
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5021 {
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5022 switch (cmdidx)
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5023 {
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5024 case CMD_vimgrep: return (char_u *)"vimgrep";
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5025 case CMD_lvimgrep: return (char_u *)"lvimgrep";
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5026 case CMD_vimgrepadd: return (char_u *)"vimgrepadd";
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5027 case CMD_lvimgrepadd: return (char_u *)"lvimgrepadd";
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5028 case CMD_grep: return (char_u *)"grep";
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5029 case CMD_lgrep: return (char_u *)"lgrep";
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5030 case CMD_grepadd: return (char_u *)"grepadd";
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5031 case CMD_lgrepadd: return (char_u *)"lgrepadd";
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5032 default: return NULL;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5033 }
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5034 }
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5035
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5036 /*
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5037 * Initialize the regmatch used by vimgrep for pattern "s".
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5038 */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5039 static void
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5040 vgr_init_regmatch(regmmatch_T regmatch, char_u s)
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5041 {
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5042 /* Get the search pattern: either white-separated or enclosed in // */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5043 regmatch->regprog = NULL;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5044
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5045 if (s == NULL \|\| *s == NUL)
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5046 {
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5047 /* Pattern is empty, use last search pattern. */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5048 if (last_search_pat() == NULL)
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5049 {
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5050 EMSG(_(e_noprevre));
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5051 return;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5052 }
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5053 regmatch->regprog = vim_regcomp(last_search_pat(), RE_MAGIC);
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5054 }
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5055 else
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5056 regmatch->regprog = vim_regcomp(s, RE_MAGIC);
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5057
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5058 regmatch->rmm_ic = p_ic;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5059 regmatch->rmm_maxcol = 0;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5060 }
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5061
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5062 /*
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5063 * Display a file name when vimgrep is running.
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5064 */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5065 static void
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5066 vgr_display_fname(char_u *fname)
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5067 {
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5068 char_u *p;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5069
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5070 msg_start();
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5071 p = msg_strtrunc(fname, TRUE);
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5072 if (p == NULL)
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5073 msg_outtrans(fname);
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5074 else
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5075 {
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5076 msg_outtrans(p);
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5077 vim_free(p);
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5078 }
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5079 msg_clr_eos();
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5080 msg_didout = FALSE; /* overwrite this message */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5081 msg_nowait = TRUE; /* don't wait for this message */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5082 msg_col = 0;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5083 out_flush();
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5084 }
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5085
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5086 /*
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5087 * Load a dummy buffer to search for a pattern using vimgrep.
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5088 */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5089 static buf_T *
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5090 vgr_load_dummy_buf(
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5091 char_u *fname,
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5092 char_u *dirname_start,
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5093 char_u *dirname_now)
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5094 {
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5095 int save_mls;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5096 #if defined(FEAT_SYN_HL)
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5097 char_u *save_ei = NULL;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5098 #endif
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5099 buf_T *buf;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5100
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5101 #if defined(FEAT_SYN_HL)
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5102 /* Don't do Filetype autocommands to avoid loading syntax and
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5103 * indent scripts, a great speed improvement. */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5104 save_ei = au_event_disable(",Filetype");
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5105 #endif
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5106 /* Don't use modelines here, it's useless. */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5107 save_mls = p_mls;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5108 p_mls = 0;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5109
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5110 /* Load file into a buffer, so that 'fileencoding' is detected,
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5111 * autocommands applied, etc. */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5112 buf = load_dummy_buffer(fname, dirname_start, dirname_now);
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5113
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5114 p_mls = save_mls;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5115 #if defined(FEAT_SYN_HL)
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5116 au_event_restore(save_ei);
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5117 #endif
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5118
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5119 return buf;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5120 }
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5121
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5122 /*
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5123 * Check whether a quickfix/location list valid. Autocmds may remove or change
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5124 * a quickfix list when vimgrep is running. If the list is not found, create a
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5125 * new list.
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5126 */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5127 static int
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5128 vgr_qflist_valid(
13594 4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5129 win_T *wp,
13521 15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5130 qf_info_T *qi,
13594 4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5131 int_u qfid,
13521 15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5132 char_u *title)
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5133 {
13594 4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5134 /* Verify that the quickfix/location list was not freed by an autocmd */
4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5135 if (!qflist_valid(wp, qfid))
4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5136 {
4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5137 if (wp != NULL)
13521 15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5138 {
13594 4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5139 /* An autocmd has freed the location list. */
13521 15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5140 EMSG(_(e_loc_list_changed));
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5141 return FALSE;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5142 }
13594 4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5143 else
4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5144 {
4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5145 /* Quickfix list is not found, create a new one. */
4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5146 qf_new_list(qi, title);
4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5147 return TRUE;
4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5148 }
4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5149 }
4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5150
14507 5a10a0020c3e patch 8.1.0267: no good check if restoring quickfix list worked Christian Brabandt <cb@256bit.org> parents: 14495 diff changeset	5151 if (qf_restore_list(qi, qfid) == FAIL)
5a10a0020c3e patch 8.1.0267: no good check if restoring quickfix list worked Christian Brabandt <cb@256bit.org> parents: 14495 diff changeset	5152 return FALSE;
13521 15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5153
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5154 return TRUE;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5155 }
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5156
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5157 /*
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5158 * Search for a pattern in all the lines in a buffer and add the matching lines
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5159 * to a quickfix list.
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5160 */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5161 static int
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5162 vgr_match_buflines(
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5163 qf_info_T *qi,
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5164 char_u *fname,
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5165 buf_T *buf,
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5166 regmmatch_T *regmatch,
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5167 long tomatch,
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5168 int duplicate_name,
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5169 int flags)
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5170 {
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5171 int found_match = FALSE;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5172 long lnum;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5173 colnr_T col;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5174
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5175 for (lnum = 1; lnum <= buf->b_ml.ml_line_count && tomatch > 0; ++lnum)
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5176 {
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5177 col = 0;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5178 while (vim_regexec_multi(regmatch, curwin, buf, lnum,
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5179 col, NULL, NULL) > 0)
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5180 {
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5181 /* Pass the buffer number so that it gets used even for a
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5182 * dummy buffer, unless duplicate_name is set, then the
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5183 * buffer will be wiped out below. */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5184 if (qf_add_entry(qi,
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5185 qi->qf_curlist,
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5186 NULL, /* dir */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5187 fname,
13821 98274127d675 patch 8.0.1782: no simple way to label quickfix entries Christian Brabandt <cb@256bit.org> parents: 13819 diff changeset	5188 NULL,
13521 15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5189 duplicate_name ? 0 : buf->b_fnum,
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5190 ml_get_buf(buf,
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5191 regmatch->startpos[0].lnum + lnum, FALSE),
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5192 regmatch->startpos[0].lnum + lnum,
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5193 regmatch->startpos[0].col + 1,
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5194 FALSE, /* vis_col */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5195 NULL, /* search pattern */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5196 0, /* nr */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5197 0, /* type */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5198 TRUE /* valid */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5199 ) == FAIL)
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5200 {
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5201 got_int = TRUE;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5202 break;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5203 }
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5204 found_match = TRUE;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5205 if (--tomatch == 0)
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5206 break;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5207 if ((flags & VGR_GLOBAL) == 0
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5208 \|\| regmatch->endpos[0].lnum > 0)
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5209 break;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5210 col = regmatch->endpos[0].col
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5211 + (col == regmatch->endpos[0].col);
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5212 if (col > (colnr_T)STRLEN(ml_get_buf(buf, lnum, FALSE)))
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5213 break;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5214 }
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5215 line_breakcheck();
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5216 if (got_int)
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5217 break;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5218 }
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5219
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5220 return found_match;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5221 }
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5222
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5223 /*
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5224 * Jump to the first match and update the directory.
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5225 */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5226 static void
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5227 vgr_jump_to_match(
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5228 qf_info_T *qi,
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5229 int forceit,
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5230 int *redraw_for_dummy,
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5231 buf_T *first_match_buf,
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5232 char_u *target_dir)
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5233 {
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5234 buf_T *buf;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5235
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5236 buf = curbuf;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5237 qf_jump(qi, 0, 0, forceit);
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5238 if (buf != curbuf)
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5239 /* If we jumped to another buffer redrawing will already be
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5240 * taken care of. */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5241 *redraw_for_dummy = FALSE;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5242
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5243 /* Jump to the directory used after loading the buffer. */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5244 if (curbuf == first_match_buf && target_dir != NULL)
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5245 {
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5246 exarg_T ea;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5247
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5248 ea.arg = target_dir;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5249 ea.cmdidx = CMD_lcd;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5250 ex_cd(&ea);
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5251 }
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5252 }
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5253
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5254 /*
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5255 * ":vimgrep {pattern} file(s)"
657 b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	5256 * ":vimgrepadd {pattern} file(s)"
b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	5257 * ":lvimgrep {pattern} file(s)"
b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	5258 * ":lvimgrepadd {pattern} file(s)"
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5259 */
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5260 void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	5261 ex_vimgrep(exarg_T *eap)
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5262 {
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5263 regmmatch_T regmatch;
153 19670b05ee32 updated for version 7.0047 vimboss parents: 129 diff changeset	5264 int fcount;
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5265 char_u **fnames;
1411 0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5266 char_u *fname;
8603 bfa74b84c41c commit https://github.com/vim/vim/commit/5584df65a0ca2315d1eebc13c54a448bee4d0758 Christian Brabandt <cb@256bit.org> parents: 7833 diff changeset	5267 char_u *title;
153 19670b05ee32 updated for version 7.0047 vimboss parents: 129 diff changeset	5268 char_u *s;
19670b05ee32 updated for version 7.0047 vimboss parents: 129 diff changeset	5269 char_u *p;
19670b05ee32 updated for version 7.0047 vimboss parents: 129 diff changeset	5270 int fi;
657 b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	5271 qf_info_T *qi = &ql_info;
13090 a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	5272 int_u save_qfid;
13594 4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5273 win_T *wp = NULL;
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5274 buf_T *buf;
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5275 int duplicate_name = FALSE;
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5276 int using_dummy;
1396 3e0f9984e98e updated for version 7.1-111 vimboss parents: 1302 diff changeset	5277 int redraw_for_dummy = FALSE;
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5278 int found_match;
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5279 buf_T *first_match_buf = NULL;
f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5280 time_t seconds = 0;
f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5281 aco_save_T aco;
170 8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5282 int flags = 0;
716 8ae24f338cab updated for version 7.0217 vimboss parents: 712 diff changeset	5283 long tomatch;
2770 25672ad7f377 updated for version 7.3.161 Bram Moolenaar <bram@vim.org> parents: 2651 diff changeset	5284 char_u *dirname_start = NULL;
25672ad7f377 updated for version 7.3.161 Bram Moolenaar <bram@vim.org> parents: 2651 diff changeset	5285 char_u *dirname_now = NULL;
1411 0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5286 char_u *target_dir = NULL;
1683 75dbeedddaa9 updated for version 7.2b-016 vimboss parents: 1672 diff changeset	5287 char_u *au_name = NULL;
161 6df0106fc595 updated for version 7.0049 vimboss parents: 153 diff changeset	5288
13521 15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5289 au_name = vgr_get_auname(eap->cmdidx);
10346 d52d97bf675e commit https://github.com/vim/vim/commit/21662be2211675824df1771c7f169948ede40c41 Christian Brabandt <cb@256bit.org> parents: 10281 diff changeset	5290 if (au_name != NULL && apply_autocmds(EVENT_QUICKFIXCMDPRE, au_name,
d52d97bf675e commit https://github.com/vim/vim/commit/21662be2211675824df1771c7f169948ede40c41 Christian Brabandt <cb@256bit.org> parents: 10281 diff changeset	5291 curbuf->b_fname, TRUE, curbuf))
161 6df0106fc595 updated for version 7.0049 vimboss parents: 153 diff changeset	5292 {
13380 69517d67421f patch 8.0.1564: too many #ifdefs Christian Brabandt <cb@256bit.org> parents: 13252 diff changeset	5293 #ifdef FEAT_EVAL
10346 d52d97bf675e commit https://github.com/vim/vim/commit/21662be2211675824df1771c7f169948ede40c41 Christian Brabandt <cb@256bit.org> parents: 10281 diff changeset	5294 if (aborting())
161 6df0106fc595 updated for version 7.0049 vimboss parents: 153 diff changeset	5295 return;
6df0106fc595 updated for version 7.0049 vimboss parents: 153 diff changeset	5296 #endif
13380 69517d67421f patch 8.0.1564: too many #ifdefs Christian Brabandt <cb@256bit.org> parents: 13252 diff changeset	5297 }
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5298
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	5299 if (is_loclist_cmd(eap->cmdidx))
657 b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	5300 {
b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	5301 qi = ll_get_or_alloc_list(curwin);
b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	5302 if (qi == NULL)
b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	5303 return;
13594 4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5304 wp = curwin;
657 b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	5305 }
b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	5306
716 8ae24f338cab updated for version 7.0217 vimboss parents: 712 diff changeset	5307 if (eap->addr_count > 0)
8ae24f338cab updated for version 7.0217 vimboss parents: 712 diff changeset	5308 tomatch = eap->line2;
8ae24f338cab updated for version 7.0217 vimboss parents: 712 diff changeset	5309 else
8ae24f338cab updated for version 7.0217 vimboss parents: 712 diff changeset	5310 tomatch = MAXLNUM;
8ae24f338cab updated for version 7.0217 vimboss parents: 712 diff changeset	5311
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5312 /* Get the search pattern: either white-separated or enclosed in // */
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5313 regmatch.regprog = NULL;
13921 3b6c29f8c1a2 patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':' Christian Brabandt <cb@256bit.org> parents: 13882 diff changeset	5314 title = vim_strsave(qf_cmdtitle(*eap->cmdlinep));
170 8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5315 p = skip_vimgrep_pat(eap->arg, &s, &flags);
153 19670b05ee32 updated for version 7.0047 vimboss parents: 129 diff changeset	5316 if (p == NULL)
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5317 {
282 33d9c918b8ab updated for version 7.0075 vimboss parents: 277 diff changeset	5318 EMSG(_(e_invalpat));
153 19670b05ee32 updated for version 7.0047 vimboss parents: 129 diff changeset	5319 goto theend;
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5320 }
4197 07fef68eb018 updated for version 7.3.850 Bram Moolenaar <bram@vim.org> parents: 4003 diff changeset	5321
13521 15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5322 vgr_init_regmatch(&regmatch, s);
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5323 if (regmatch.regprog == NULL)
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5324 goto theend;
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5325
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5326 p = skipwhite(p);
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5327 if (*p == NUL)
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5328 {
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5329 EMSG(_("E683: File name missing or invalid pattern"));
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5330 goto theend;
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5331 }
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5332
12084 69ce6b3f0834 patch 8.0.0922: quickfix list always added after current one Christian Brabandt <cb@256bit.org> parents: 12048 diff changeset	5333 if ((eap->cmdidx != CMD_grepadd && eap->cmdidx != CMD_lgrepadd
13521 15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5334 && eap->cmdidx != CMD_vimgrepadd
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5335 && eap->cmdidx != CMD_lvimgrepadd)
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	5336 \|\| qi->qf_curlist == qi->qf_listcount)
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5337 /* make place for a new list */
13921 3b6c29f8c1a2 patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':' Christian Brabandt <cb@256bit.org> parents: 13882 diff changeset	5338 qf_new_list(qi, title != NULL ? title : qf_cmdtitle(*eap->cmdlinep));
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5339
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5340 /* parse the list of arguments */
3620 4f1c511e71f8 updated for version 7.3.570 Bram Moolenaar <bram@vim.org> parents: 3555 diff changeset	5341 if (get_arglist_exp(p, &fcount, &fnames, TRUE) == FAIL)
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5342 goto theend;
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5343 if (fcount == 0)
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5344 {
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5345 EMSG(_(e_nomatch));
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5346 goto theend;
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5347 }
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5348
7558 9a4c9dccd603 commit https://github.com/vim/vim/commit/b86a343280b08d6701da68ee0651e960a0a7a61c Christian Brabandt <cb@256bit.org> parents: 7515 diff changeset	5349 dirname_start = alloc_id(MAXPATHL, aid_qf_dirname_start);
9a4c9dccd603 commit https://github.com/vim/vim/commit/b86a343280b08d6701da68ee0651e960a0a7a61c Christian Brabandt <cb@256bit.org> parents: 7515 diff changeset	5350 dirname_now = alloc_id(MAXPATHL, aid_qf_dirname_now);
2770 25672ad7f377 updated for version 7.3.161 Bram Moolenaar <bram@vim.org> parents: 2651 diff changeset	5351 if (dirname_start == NULL \|\| dirname_now == NULL)
7662 4d34891e98f4 commit https://github.com/vim/vim/commit/61ff4dd6a4d47bd32383fe28087be2b37dec53f4 Christian Brabandt <cb@256bit.org> parents: 7558 diff changeset	5352 {
4d34891e98f4 commit https://github.com/vim/vim/commit/61ff4dd6a4d47bd32383fe28087be2b37dec53f4 Christian Brabandt <cb@256bit.org> parents: 7558 diff changeset	5353 FreeWild(fcount, fnames);
2770 25672ad7f377 updated for version 7.3.161 Bram Moolenaar <bram@vim.org> parents: 2651 diff changeset	5354 goto theend;
7662 4d34891e98f4 commit https://github.com/vim/vim/commit/61ff4dd6a4d47bd32383fe28087be2b37dec53f4 Christian Brabandt <cb@256bit.org> parents: 7558 diff changeset	5355 }
2770 25672ad7f377 updated for version 7.3.161 Bram Moolenaar <bram@vim.org> parents: 2651 diff changeset	5356
1411 0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5357 /* Remember the current directory, because a BufRead autocommand that does
0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5358 * ":lcd %:p:h" changes the meaning of short path names. */
0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5359 mch_dirname(dirname_start, MAXPATHL);
0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5360
13594 4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5361 /* Remember the current quickfix list identifier, so that we can check for
4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5362 * autocommands changing the current quickfix list. */
13090 a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	5363 save_qfid = qi->qf_lists[qi->qf_curlist].qf_id;
4003 706c87d16d40 updated for version 7.3.756 Bram Moolenaar <bram@vim.org> parents: 3982 diff changeset	5364
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5365 seconds = (time_t)0;
716 8ae24f338cab updated for version 7.0217 vimboss parents: 712 diff changeset	5366 for (fi = 0; fi < fcount && !got_int && tomatch > 0; ++fi)
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5367 {
1411 0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5368 fname = shorten_fname1(fnames[fi]);
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5369 if (time(NULL) > seconds)
f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5370 {
1411 0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5371 /* Display the file name every second or so, show the user we are
0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5372 * working on it. */
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5373 seconds = time(NULL);
13521 15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5374 vgr_display_fname(fname);
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5375 }
f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5376
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5377 buf = buflist_findname_exp(fnames[fi]);
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5378 if (buf == NULL \|\| buf->b_ml.ml_mfp == NULL)
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5379 {
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5380 /* Remember that a buffer with this name already exists. */
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5381 duplicate_name = (buf != NULL);
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5382 using_dummy = TRUE;
1396 3e0f9984e98e updated for version 7.1-111 vimboss parents: 1302 diff changeset	5383 redraw_for_dummy = TRUE;
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5384
13521 15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5385 buf = vgr_load_dummy_buf(fname, dirname_start, dirname_now);
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5386 }
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5387 else
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5388 /* Use existing, loaded buffer. */
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5389 using_dummy = FALSE;
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5390
13594 4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5391 /* Check whether the quickfix list is still valid. When loading a
4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5392 * buffer above, autocommands might have changed the quickfix list. */
13921 3b6c29f8c1a2 patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':' Christian Brabandt <cb@256bit.org> parents: 13882 diff changeset	5393 if (!vgr_qflist_valid(wp, qi, save_qfid, qf_cmdtitle(*eap->cmdlinep)))
13660 2d94fcb0277d patch 8.0.1702: leaking memory when autocommands make quickfix list invalid Christian Brabandt <cb@256bit.org> parents: 13612 diff changeset	5394 {
2d94fcb0277d patch 8.0.1702: leaking memory when autocommands make quickfix list invalid Christian Brabandt <cb@256bit.org> parents: 13612 diff changeset	5395 FreeWild(fcount, fnames);
13521 15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5396 goto theend;
13660 2d94fcb0277d patch 8.0.1702: leaking memory when autocommands make quickfix list invalid Christian Brabandt <cb@256bit.org> parents: 13612 diff changeset	5397 }
13594 4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5398 save_qfid = qi->qf_lists[qi->qf_curlist].qf_id;
4003 706c87d16d40 updated for version 7.3.756 Bram Moolenaar <bram@vim.org> parents: 3982 diff changeset	5399
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5400 if (buf == NULL)
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5401 {
f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5402 if (!got_int)
1411 0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5403 smsg((char_u *)_("Cannot open file \"%s\""), fname);
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5404 }
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5405 else
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5406 {
717 2fa8cb05b861 updated for version 7.0218 vimboss parents: 716 diff changeset	5407 /* Try for a match in all lines of the buffer.
2fa8cb05b861 updated for version 7.0218 vimboss parents: 716 diff changeset	5408 * For ":1vimgrep" look for first match only. */
13521 15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5409 found_match = vgr_match_buflines(qi, fname, buf, &regmatch,
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5410 tomatch, duplicate_name, flags);
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5411
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5412 if (using_dummy)
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5413 {
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5414 if (found_match && first_match_buf == NULL)
f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5415 first_match_buf = buf;
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5416 if (duplicate_name)
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5417 {
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5418 /* Never keep a dummy buffer if there is another buffer
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5419 * with the same name. */
3490 8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5420 wipe_dummy_buffer(buf, dirname_start);
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5421 buf = NULL;
f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5422 }
717 2fa8cb05b861 updated for version 7.0218 vimboss parents: 716 diff changeset	5423 else if (!cmdmod.hide
2fa8cb05b861 updated for version 7.0218 vimboss parents: 716 diff changeset	5424 \|\| buf->b_p_bh[0] == 'u' /* "unload" */
2fa8cb05b861 updated for version 7.0218 vimboss parents: 716 diff changeset	5425 \|\| buf->b_p_bh[0] == 'w' /* "wipe" */
2fa8cb05b861 updated for version 7.0218 vimboss parents: 716 diff changeset	5426 \|\| buf->b_p_bh[0] == 'd') /* "delete" */
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5427 {
717 2fa8cb05b861 updated for version 7.0218 vimboss parents: 716 diff changeset	5428 /* When no match was found we don't need to remember the
2fa8cb05b861 updated for version 7.0218 vimboss parents: 716 diff changeset	5429 * buffer, wipe it out. If there was a match and it
2fa8cb05b861 updated for version 7.0218 vimboss parents: 716 diff changeset	5430 * wasn't the first one or we won't jump there: only
2fa8cb05b861 updated for version 7.0218 vimboss parents: 716 diff changeset	5431 * unload the buffer.
2fa8cb05b861 updated for version 7.0218 vimboss parents: 716 diff changeset	5432 * Ignore 'hidden' here, because it may lead to having too
2fa8cb05b861 updated for version 7.0218 vimboss parents: 716 diff changeset	5433 * many swap files. */
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5434 if (!found_match)
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5435 {
3490 8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5436 wipe_dummy_buffer(buf, dirname_start);
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5437 buf = NULL;
f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5438 }
170 8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5439 else if (buf != first_match_buf \|\| (flags & VGR_NOJUMP))
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5440 {
3490 8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5441 unload_dummy_buffer(buf, dirname_start);
9540 64a791c53418 commit https://github.com/vim/vim/commit/015102e91e978a0bb42a14461c132a85e8f7e1ea Christian Brabandt <cb@256bit.org> parents: 9538 diff changeset	5442 /* Keeping the buffer, remove the dummy flag. */
64a791c53418 commit https://github.com/vim/vim/commit/015102e91e978a0bb42a14461c132a85e8f7e1ea Christian Brabandt <cb@256bit.org> parents: 9538 diff changeset	5443 buf->b_flags &= ~BF_DUMMY;
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5444 buf = NULL;
f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5445 }
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5446 }
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5447
f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5448 if (buf != NULL)
f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5449 {
9540 64a791c53418 commit https://github.com/vim/vim/commit/015102e91e978a0bb42a14461c132a85e8f7e1ea Christian Brabandt <cb@256bit.org> parents: 9538 diff changeset	5450 /* Keeping the buffer, remove the dummy flag. */
64a791c53418 commit https://github.com/vim/vim/commit/015102e91e978a0bb42a14461c132a85e8f7e1ea Christian Brabandt <cb@256bit.org> parents: 9538 diff changeset	5451 buf->b_flags &= ~BF_DUMMY;
64a791c53418 commit https://github.com/vim/vim/commit/015102e91e978a0bb42a14461c132a85e8f7e1ea Christian Brabandt <cb@256bit.org> parents: 9538 diff changeset	5452
1411 0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5453 /* If the buffer is still loaded we need to use the
0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5454 * directory we jumped to below. */
0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5455 if (buf == first_match_buf
0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5456 && target_dir == NULL
0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5457 && STRCMP(dirname_start, dirname_now) != 0)
0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5458 target_dir = vim_strsave(dirname_now);
0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5459
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5460 /* The buffer is still loaded, the Filetype autocommands
677 e649c78407e6 updated for version 7.0202 vimboss parents: 665 diff changeset	5461 * need to be done now, in that buffer. And the modelines
717 2fa8cb05b861 updated for version 7.0218 vimboss parents: 716 diff changeset	5462 * need to be done (again). But not the window-local
2fa8cb05b861 updated for version 7.0218 vimboss parents: 716 diff changeset	5463 * options! */
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5464 aucmd_prepbuf(&aco, buf);
13380 69517d67421f patch 8.0.1564: too many #ifdefs Christian Brabandt <cb@256bit.org> parents: 13252 diff changeset	5465 #if defined(FEAT_SYN_HL)
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5466 apply_autocmds(EVENT_FILETYPE, buf->b_p_ft,
f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5467 buf->b_fname, TRUE, buf);
677 e649c78407e6 updated for version 7.0202 vimboss parents: 665 diff changeset	5468 #endif
717 2fa8cb05b861 updated for version 7.0218 vimboss parents: 716 diff changeset	5469 do_modelines(OPT_NOWIN);
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5470 aucmd_restbuf(&aco);
f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5471 }
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5472 }
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5473 }
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5474 }
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5475
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5476 FreeWild(fcount, fnames);
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5477
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	5478 qi->qf_lists[qi->qf_curlist].qf_nonevalid = FALSE;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	5479 qi->qf_lists[qi->qf_curlist].qf_ptr = qi->qf_lists[qi->qf_curlist].qf_start;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	5480 qi->qf_lists[qi->qf_curlist].qf_index = 1;
13062 6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	5481 qf_list_changed(qi, qi->qf_curlist);
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5482
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	5483 qf_update_buffer(qi, NULL);
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5484
842 a209672376fd updated for version 7.0f vimboss parents: 835 diff changeset	5485 if (au_name != NULL)
a209672376fd updated for version 7.0f vimboss parents: 835 diff changeset	5486 apply_autocmds(EVENT_QUICKFIXCMDPOST, au_name,
a209672376fd updated for version 7.0f vimboss parents: 835 diff changeset	5487 curbuf->b_fname, TRUE, curbuf);
13090 a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	5488 /*
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	5489 * The QuickFixCmdPost autocmd may free the quickfix list. Check the list
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	5490 * is still valid.
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	5491 */
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	5492 if (!qflist_valid(wp, save_qfid))
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	5493 goto theend;
842 a209672376fd updated for version 7.0f vimboss parents: 835 diff changeset	5494
14507 5a10a0020c3e patch 8.1.0267: no good check if restoring quickfix list worked Christian Brabandt <cb@256bit.org> parents: 14495 diff changeset	5495 if (qf_restore_list(qi, save_qfid) == FAIL)
5a10a0020c3e patch 8.1.0267: no good check if restoring quickfix list worked Christian Brabandt <cb@256bit.org> parents: 14495 diff changeset	5496 goto theend;
14250 ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	5497
14603 d1b69129db99 patch 8.1.0315: helpgrep with language doesn't work properly Christian Brabandt <cb@256bit.org> parents: 14560 diff changeset	5498 // Jump to first match.
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	5499 if (!qf_list_empty(qi, qi->qf_curlist))
170 8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5500 {
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5501 if ((flags & VGR_NOJUMP) == 0)
13521 15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5502 vgr_jump_to_match(qi, eap->forceit, &redraw_for_dummy,
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5503 first_match_buf, target_dir);
170 8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5504 }
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5505 else
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5506 EMSG2(_(e_nomatch2), s);
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5507
1396 3e0f9984e98e updated for version 7.1-111 vimboss parents: 1302 diff changeset	5508 /* If we loaded a dummy buffer into the current window, the autocommands
3e0f9984e98e updated for version 7.1-111 vimboss parents: 1302 diff changeset	5509 * may have messed up things, need to redraw and recompute folds. */
3e0f9984e98e updated for version 7.1-111 vimboss parents: 1302 diff changeset	5510 if (redraw_for_dummy)
3e0f9984e98e updated for version 7.1-111 vimboss parents: 1302 diff changeset	5511 {
3e0f9984e98e updated for version 7.1-111 vimboss parents: 1302 diff changeset	5512 #ifdef FEAT_FOLDING
3e0f9984e98e updated for version 7.1-111 vimboss parents: 1302 diff changeset	5513 foldUpdateAll(curwin);
3e0f9984e98e updated for version 7.1-111 vimboss parents: 1302 diff changeset	5514 #else
3e0f9984e98e updated for version 7.1-111 vimboss parents: 1302 diff changeset	5515 redraw_later(NOT_VALID);
3e0f9984e98e updated for version 7.1-111 vimboss parents: 1302 diff changeset	5516 #endif
3e0f9984e98e updated for version 7.1-111 vimboss parents: 1302 diff changeset	5517 }
3e0f9984e98e updated for version 7.1-111 vimboss parents: 1302 diff changeset	5518
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5519 theend:
8603 bfa74b84c41c commit https://github.com/vim/vim/commit/5584df65a0ca2315d1eebc13c54a448bee4d0758 Christian Brabandt <cb@256bit.org> parents: 7833 diff changeset	5520 vim_free(title);
2770 25672ad7f377 updated for version 7.3.161 Bram Moolenaar <bram@vim.org> parents: 2651 diff changeset	5521 vim_free(dirname_now);
25672ad7f377 updated for version 7.3.161 Bram Moolenaar <bram@vim.org> parents: 2651 diff changeset	5522 vim_free(dirname_start);
1411 0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5523 vim_free(target_dir);
4805 66803af09906 updated for version 7.3.1149 Bram Moolenaar <bram@vim.org> parents: 4371 diff changeset	5524 vim_regfree(regmatch.regprog);
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5525 }
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5526
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5527 /*
3490 8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5528 * Restore current working directory to "dirname_start" if they differ, taking
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5529 * into account whether it is set locally or globally.
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5530 */
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5531 static void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	5532 restore_start_dir(char_u *dirname_start)
3490 8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5533 {
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5534 char_u *dirname_now = alloc(MAXPATHL);
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5535
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5536 if (NULL != dirname_now)
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5537 {
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5538 mch_dirname(dirname_now, MAXPATHL);
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5539 if (STRCMP(dirname_start, dirname_now) != 0)
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5540 {
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5541 /* If the directory has changed, change it back by building up an
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5542 * appropriate ex command and executing it. */
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5543 exarg_T ea;
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5544
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5545 ea.arg = dirname_start;
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5546 ea.cmdidx = (curwin->w_localdir == NULL) ? CMD_cd : CMD_lcd;
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5547 ex_cd(&ea);
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5548 }
3974 4d1753f3e85c updated for version 7.3.742 Bram Moolenaar <bram@vim.org> parents: 3965 diff changeset	5549 vim_free(dirname_now);
3490 8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5550 }
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5551 }
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5552
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5553 /*
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5554 * Load file "fname" into a dummy buffer and return the buffer pointer,
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5555 * placing the directory resulting from the buffer load into the
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5556 * "resulting_dir" pointer. "resulting_dir" must be allocated by the caller
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5557 * prior to calling this function. Restores directory to "dirname_start" prior
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5558 * to returning, if autocmds or the 'autochdir' option have changed it.
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5559 *
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5560 * If creating the dummy buffer does not fail, must call unload_dummy_buffer()
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5561 * or wipe_dummy_buffer() later!
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5562 *
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5563 * Returns NULL if it fails.
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5564 */
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5565 static buf_T *
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	5566 load_dummy_buffer(
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	5567 char_u *fname,
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	5568 char_u dirname_start, / in: old directory */
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	5569 char_u resulting_dir) / out: new directory */
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5570 {
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5571 buf_T *newbuf;
9487 69ed2c9d34a6 commit https://github.com/vim/vim/commit/7c0a2f367f2507669560b1a66423155c70d2e75b Christian Brabandt <cb@256bit.org> parents: 9485 diff changeset	5572 bufref_T newbufref;
69ed2c9d34a6 commit https://github.com/vim/vim/commit/7c0a2f367f2507669560b1a66423155c70d2e75b Christian Brabandt <cb@256bit.org> parents: 9485 diff changeset	5573 bufref_T newbuf_to_wipe;
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5574 int failed = TRUE;
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5575 aco_save_T aco;
13056 b931b2751650 patch 8.0.1403: using freed buffer in grep command Christian Brabandt <cb@256bit.org> parents: 13026 diff changeset	5576 int readfile_result;
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5577
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5578 /* Allocate a buffer without putting it in the buffer list. */
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5579 newbuf = buflist_new(NULL, NULL, (linenr_T)1, BLN_DUMMY);
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5580 if (newbuf == NULL)
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5581 return NULL;
9487 69ed2c9d34a6 commit https://github.com/vim/vim/commit/7c0a2f367f2507669560b1a66423155c70d2e75b Christian Brabandt <cb@256bit.org> parents: 9485 diff changeset	5582 set_bufref(&newbufref, newbuf);
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5583
177 84c21eb4fc40 updated for version 7.0054 vimboss parents: 170 diff changeset	5584 /* Init the options. */
84c21eb4fc40 updated for version 7.0054 vimboss parents: 170 diff changeset	5585 buf_copy_options(newbuf, BCO_ENTER \| BCO_NOHELP);
84c21eb4fc40 updated for version 7.0054 vimboss parents: 170 diff changeset	5586
1918 eac2556d4620 updated for version 7.2-215 vimboss parents: 1883 diff changeset	5587 /* need to open the memfile before putting the buffer in a window */
eac2556d4620 updated for version 7.2-215 vimboss parents: 1883 diff changeset	5588 if (ml_open(newbuf) == OK)
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5589 {
14250 ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	5590 /* Make sure this buffer isn't wiped out by autocommands. */
13056 b931b2751650 patch 8.0.1403: using freed buffer in grep command Christian Brabandt <cb@256bit.org> parents: 13026 diff changeset	5591 ++newbuf->b_locked;
b931b2751650 patch 8.0.1403: using freed buffer in grep command Christian Brabandt <cb@256bit.org> parents: 13026 diff changeset	5592
1918 eac2556d4620 updated for version 7.2-215 vimboss parents: 1883 diff changeset	5593 /* set curwin/curbuf to buf and save a few things */
eac2556d4620 updated for version 7.2-215 vimboss parents: 1883 diff changeset	5594 aucmd_prepbuf(&aco, newbuf);
eac2556d4620 updated for version 7.2-215 vimboss parents: 1883 diff changeset	5595
eac2556d4620 updated for version 7.2-215 vimboss parents: 1883 diff changeset	5596 /* Need to set the filename for autocommands. */
eac2556d4620 updated for version 7.2-215 vimboss parents: 1883 diff changeset	5597 (void)setfname(curbuf, fname, NULL, FALSE);
eac2556d4620 updated for version 7.2-215 vimboss parents: 1883 diff changeset	5598
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5599 /* Create swap file now to avoid the ATTENTION message. */
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5600 check_need_swap(TRUE);
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5601
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5602 /* Remove the "dummy" flag, otherwise autocommands may not
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5603 * work. */
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5604 curbuf->b_flags &= ~BF_DUMMY;
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5605
9487 69ed2c9d34a6 commit https://github.com/vim/vim/commit/7c0a2f367f2507669560b1a66423155c70d2e75b Christian Brabandt <cb@256bit.org> parents: 9485 diff changeset	5606 newbuf_to_wipe.br_buf = NULL;
13056 b931b2751650 patch 8.0.1403: using freed buffer in grep command Christian Brabandt <cb@256bit.org> parents: 13026 diff changeset	5607 readfile_result = readfile(fname, NULL,
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5608 (linenr_T)0, (linenr_T)0, (linenr_T)MAXLNUM,
13056 b931b2751650 patch 8.0.1403: using freed buffer in grep command Christian Brabandt <cb@256bit.org> parents: 13026 diff changeset	5609 NULL, READ_NEW \| READ_DUMMY);
b931b2751650 patch 8.0.1403: using freed buffer in grep command Christian Brabandt <cb@256bit.org> parents: 13026 diff changeset	5610 --newbuf->b_locked;
b931b2751650 patch 8.0.1403: using freed buffer in grep command Christian Brabandt <cb@256bit.org> parents: 13026 diff changeset	5611 if (readfile_result == OK
857 b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5612 && !got_int
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5613 && !(curbuf->b_flags & BF_NEW))
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5614 {
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5615 failed = FALSE;
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5616 if (curbuf != newbuf)
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5617 {
2646 ff3a304b4ac2 updated for version 7.3.066 Bram Moolenaar <bram@vim.org> parents: 2583 diff changeset	5618 /* Bloody autocommands changed the buffer! Can happen when
ff3a304b4ac2 updated for version 7.3.066 Bram Moolenaar <bram@vim.org> parents: 2583 diff changeset	5619 * using netrw and editing a remote file. Use the current
ff3a304b4ac2 updated for version 7.3.066 Bram Moolenaar <bram@vim.org> parents: 2583 diff changeset	5620 * buffer instead, delete the dummy one after restoring the
ff3a304b4ac2 updated for version 7.3.066 Bram Moolenaar <bram@vim.org> parents: 2583 diff changeset	5621 * window stuff. */
9487 69ed2c9d34a6 commit https://github.com/vim/vim/commit/7c0a2f367f2507669560b1a66423155c70d2e75b Christian Brabandt <cb@256bit.org> parents: 9485 diff changeset	5622 set_bufref(&newbuf_to_wipe, newbuf);
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5623 newbuf = curbuf;
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5624 }
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5625 }
1918 eac2556d4620 updated for version 7.2-215 vimboss parents: 1883 diff changeset	5626
eac2556d4620 updated for version 7.2-215 vimboss parents: 1883 diff changeset	5627 /* restore curwin/curbuf and a few other things */
eac2556d4620 updated for version 7.2-215 vimboss parents: 1883 diff changeset	5628 aucmd_restbuf(&aco);
9487 69ed2c9d34a6 commit https://github.com/vim/vim/commit/7c0a2f367f2507669560b1a66423155c70d2e75b Christian Brabandt <cb@256bit.org> parents: 9485 diff changeset	5629 if (newbuf_to_wipe.br_buf != NULL && bufref_valid(&newbuf_to_wipe))
69ed2c9d34a6 commit https://github.com/vim/vim/commit/7c0a2f367f2507669560b1a66423155c70d2e75b Christian Brabandt <cb@256bit.org> parents: 9485 diff changeset	5630 wipe_buffer(newbuf_to_wipe.br_buf, FALSE);
9485 c16e207dc465 commit https://github.com/vim/vim/commit/ea3f2e7be447a8f0c4436869620f908de5e8ef1e Christian Brabandt <cb@256bit.org> parents: 9475 diff changeset	5631
c16e207dc465 commit https://github.com/vim/vim/commit/ea3f2e7be447a8f0c4436869620f908de5e8ef1e Christian Brabandt <cb@256bit.org> parents: 9475 diff changeset	5632 /* Add back the "dummy" flag, otherwise buflist_findname_stat() won't
c16e207dc465 commit https://github.com/vim/vim/commit/ea3f2e7be447a8f0c4436869620f908de5e8ef1e Christian Brabandt <cb@256bit.org> parents: 9475 diff changeset	5633 * skip it. */
c16e207dc465 commit https://github.com/vim/vim/commit/ea3f2e7be447a8f0c4436869620f908de5e8ef1e Christian Brabandt <cb@256bit.org> parents: 9475 diff changeset	5634 newbuf->b_flags \|= BF_DUMMY;
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5635 }
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5636
3490 8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5637 /*
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5638 * When autocommands/'autochdir' option changed directory: go back.
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5639 * Let the caller know what the resulting dir was first, in case it is
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5640 * important.
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5641 */
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5642 mch_dirname(resulting_dir, MAXPATHL);
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5643 restore_start_dir(dirname_start);
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5644
9487 69ed2c9d34a6 commit https://github.com/vim/vim/commit/7c0a2f367f2507669560b1a66423155c70d2e75b Christian Brabandt <cb@256bit.org> parents: 9485 diff changeset	5645 if (!bufref_valid(&newbufref))
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5646 return NULL;
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5647 if (failed)
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5648 {
3490 8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5649 wipe_dummy_buffer(newbuf, dirname_start);
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5650 return NULL;
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5651 }
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5652 return newbuf;
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5653 }
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5654
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5655 /*
3490 8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5656 * Wipe out the dummy buffer that load_dummy_buffer() created. Restores
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5657 * directory to "dirname_start" prior to returning, if autocmds or the
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5658 * 'autochdir' option have changed it.
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5659 */
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5660 static void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	5661 wipe_dummy_buffer(buf_T buf, char_u dirname_start)
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5662 {
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5663 if (curbuf != buf) /* safety check */
857 b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5664 {
13380 69517d67421f patch 8.0.1564: too many #ifdefs Christian Brabandt <cb@256bit.org> parents: 13252 diff changeset	5665 #if defined(FEAT_EVAL)
857 b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5666 cleanup_T cs;
b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5667
b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5668 /* Reset the error/interrupt/exception state here so that aborting()
b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5669 * returns FALSE when wiping out the buffer. Otherwise it doesn't
b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5670 * work when got_int is set. */
b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5671 enter_cleanup(&cs);
b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5672 #endif
b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5673
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5674 wipe_buffer(buf, FALSE);
857 b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5675
13380 69517d67421f patch 8.0.1564: too many #ifdefs Christian Brabandt <cb@256bit.org> parents: 13252 diff changeset	5676 #if defined(FEAT_EVAL)
857 b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5677 /* Restore the error/interrupt/exception state if not discarded by a
b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5678 * new aborting error, interrupt, or uncaught exception. */
b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5679 leave_cleanup(&cs);
b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5680 #endif
3490 8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5681 /* When autocommands/'autochdir' option changed directory: go back. */
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5682 restore_start_dir(dirname_start);
857 b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5683 }
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5684 }
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5685
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5686 /*
3490 8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5687 * Unload the dummy buffer that load_dummy_buffer() created. Restores
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5688 * directory to "dirname_start" prior to returning, if autocmds or the
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5689 * 'autochdir' option have changed it.
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5690 */
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5691 static void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	5692 unload_dummy_buffer(buf_T buf, char_u dirname_start)
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5693 {
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5694 if (curbuf != buf) /* safety check */
3490 8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5695 {
3365 9ccdc4a69d8f updated for version 7.3.449 Bram Moolenaar <bram@vim.org> parents: 3269 diff changeset	5696 close_buffer(NULL, buf, DOBUF_UNLOAD, FALSE);
3490 8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5697
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5698 /* When autocommands/'autochdir' option changed directory: go back. */
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5699 restore_start_dir(dirname_start);
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5700 }
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5701 }
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5702
170 8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5703 #if defined(FEAT_EVAL) \|\| defined(PROTO)
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5704 /*
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5705 * Add each quickfix error to list "list" as a dictionary.
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5706 * If qf_idx is -1, use the current list. Otherwise, use the specified list.
170 8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5707 */
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5708 int
12252 3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5709 get_errorlist(qf_info_T qi_arg, win_T wp, int qf_idx, list_T *list)
170 8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5710 {
12252 3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5711 qf_info_T *qi = qi_arg;
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	5712 dict_T *dict;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	5713 char_u buf[2];
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	5714 qfline_T *qfp;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	5715 int i;
1065 caa550fe4457 updated for version 7.0-191 vimboss parents: 1020 diff changeset	5716 int bufnum;
170 8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5717
12252 3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5718 if (qi == NULL)
647 19106f131c87 updated for version 7.0188 vimboss parents: 644 diff changeset	5719 {
12252 3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5720 qi = &ql_info;
3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5721 if (wp != NULL)
3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5722 {
3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5723 qi = GET_LOC_LIST(wp);
3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5724 if (qi == NULL)
3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5725 return FAIL;
3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5726 }
647 19106f131c87 updated for version 7.0188 vimboss parents: 644 diff changeset	5727 }
19106f131c87 updated for version 7.0188 vimboss parents: 644 diff changeset	5728
13800 e4dc4ede9ef8 patch 8.0.1772: quickfix: mixup of FALSE and FAIL, returning -1 Christian Brabandt <cb@256bit.org> parents: 13764 diff changeset	5729 if (qf_idx == INVALID_QFIDX)
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5730 qf_idx = qi->qf_curlist;
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5731
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	5732 if (qf_idx >= qi->qf_listcount \|\| qf_list_empty(qi, qf_idx))
170 8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5733 return FAIL;
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5734
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5735 qfp = qi->qf_lists[qf_idx].qf_start;
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5736 for (i = 1; !got_int && i <= qi->qf_lists[qf_idx].qf_count; ++i)
170 8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5737 {
1065 caa550fe4457 updated for version 7.0-191 vimboss parents: 1020 diff changeset	5738 /* Handle entries with a non-existing buffer number. */
caa550fe4457 updated for version 7.0-191 vimboss parents: 1020 diff changeset	5739 bufnum = qfp->qf_fnum;
caa550fe4457 updated for version 7.0-191 vimboss parents: 1020 diff changeset	5740 if (bufnum != 0 && (buflist_findnr(bufnum) == NULL))
caa550fe4457 updated for version 7.0-191 vimboss parents: 1020 diff changeset	5741 bufnum = 0;
caa550fe4457 updated for version 7.0-191 vimboss parents: 1020 diff changeset	5742
170 8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5743 if ((dict = dict_alloc()) == NULL)
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5744 return FAIL;
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5745 if (list_append_dict(list, dict) == FAIL)
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5746 return FAIL;
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5747
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5748 buf[0] = qfp->qf_type;
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5749 buf[1] = NUL;
14301 3c80092eb211 patch 8.1.0166: using dict_add_nr_str() is clumsy Christian Brabandt <cb@256bit.org> parents: 14299 diff changeset	5750 if ( dict_add_number(dict, "bufnr", (long)bufnum) == FAIL
3c80092eb211 patch 8.1.0166: using dict_add_nr_str() is clumsy Christian Brabandt <cb@256bit.org> parents: 14299 diff changeset	5751 \|\| dict_add_number(dict, "lnum", (long)qfp->qf_lnum) == FAIL
3c80092eb211 patch 8.1.0166: using dict_add_nr_str() is clumsy Christian Brabandt <cb@256bit.org> parents: 14299 diff changeset	5752 \|\| dict_add_number(dict, "col", (long)qfp->qf_col) == FAIL
3c80092eb211 patch 8.1.0166: using dict_add_nr_str() is clumsy Christian Brabandt <cb@256bit.org> parents: 14299 diff changeset	5753 \|\| dict_add_number(dict, "vcol", (long)qfp->qf_viscol) == FAIL
3c80092eb211 patch 8.1.0166: using dict_add_nr_str() is clumsy Christian Brabandt <cb@256bit.org> parents: 14299 diff changeset	5754 \|\| dict_add_number(dict, "nr", (long)qfp->qf_nr) == FAIL
3c80092eb211 patch 8.1.0166: using dict_add_nr_str() is clumsy Christian Brabandt <cb@256bit.org> parents: 14299 diff changeset	5755 \|\| dict_add_string(dict, "module", qfp->qf_module) == FAIL
3c80092eb211 patch 8.1.0166: using dict_add_nr_str() is clumsy Christian Brabandt <cb@256bit.org> parents: 14299 diff changeset	5756 \|\| dict_add_string(dict, "pattern", qfp->qf_pattern) == FAIL
3c80092eb211 patch 8.1.0166: using dict_add_nr_str() is clumsy Christian Brabandt <cb@256bit.org> parents: 14299 diff changeset	5757 \|\| dict_add_string(dict, "text", qfp->qf_text) == FAIL
3c80092eb211 patch 8.1.0166: using dict_add_nr_str() is clumsy Christian Brabandt <cb@256bit.org> parents: 14299 diff changeset	5758 \|\| dict_add_string(dict, "type", buf) == FAIL
3c80092eb211 patch 8.1.0166: using dict_add_nr_str() is clumsy Christian Brabandt <cb@256bit.org> parents: 14299 diff changeset	5759 \|\| dict_add_number(dict, "valid", (long)qfp->qf_valid) == FAIL)
170 8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5760 return FAIL;
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5761
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5762 qfp = qfp->qf_next;
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	5763 if (qfp == NULL)
543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	5764 break;
170 8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5765 }
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5766 return OK;
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5767 }
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	5768
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	5769 /*
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5770 * Flags used by getqflist()/getloclist() to determine which fields to return.
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5771 */
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5772 enum {
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5773 QF_GETLIST_NONE = 0x0,
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5774 QF_GETLIST_TITLE = 0x1,
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5775 QF_GETLIST_ITEMS = 0x2,
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5776 QF_GETLIST_NR = 0x4,
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5777 QF_GETLIST_WINID = 0x8,
11412 84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	5778 QF_GETLIST_CONTEXT = 0x10,
12287 20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	5779 QF_GETLIST_ID = 0x20,
12465 805f7fd40e0d patch 8.0.1112: can't get size or current index from quickfix list Christian Brabandt <cb@256bit.org> parents: 12449 diff changeset	5780 QF_GETLIST_IDX = 0x40,
805f7fd40e0d patch 8.0.1112: can't get size or current index from quickfix list Christian Brabandt <cb@256bit.org> parents: 12449 diff changeset	5781 QF_GETLIST_SIZE = 0x80,
13062 6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	5782 QF_GETLIST_TICK = 0x100,
14664 8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	5783 QF_GETLIST_FILEWINID = 0x200,
8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	5784 QF_GETLIST_ALL = 0x3FF,
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5785 };
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5786
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5787 /*
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5788 * Parse text from 'di' and return the quickfix list items.
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5789 * Existing quickfix lists are not modified.
12252 3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5790 */
3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5791 static int
12321 2779d593a706 patch 8.0.1040: cannot use another error format in getqflist() Christian Brabandt <cb@256bit.org> parents: 12303 diff changeset	5792 qf_get_list_from_lines(dict_T what, dictitem_T di, dict_T *retdict)
12252 3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5793 {
3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5794 int status = FAIL;
3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5795 qf_info_T *qi;
12321 2779d593a706 patch 8.0.1040: cannot use another error format in getqflist() Christian Brabandt <cb@256bit.org> parents: 12303 diff changeset	5796 char_u *errorformat = p_efm;
2779d593a706 patch 8.0.1040: cannot use another error format in getqflist() Christian Brabandt <cb@256bit.org> parents: 12303 diff changeset	5797 dictitem_T *efm_di;
2779d593a706 patch 8.0.1040: cannot use another error format in getqflist() Christian Brabandt <cb@256bit.org> parents: 12303 diff changeset	5798 list_T *l;
12252 3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5799
12303 ec7a4fd21dd5 patch 8.0.1031: "text" argument for getqflist() is confusing Christian Brabandt <cb@256bit.org> parents: 12299 diff changeset	5800 /* Only a List value is supported */
ec7a4fd21dd5 patch 8.0.1031: "text" argument for getqflist() is confusing Christian Brabandt <cb@256bit.org> parents: 12299 diff changeset	5801 if (di->di_tv.v_type == VAR_LIST && di->di_tv.vval.v_list != NULL)
12252 3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5802 {
12321 2779d593a706 patch 8.0.1040: cannot use another error format in getqflist() Christian Brabandt <cb@256bit.org> parents: 12303 diff changeset	5803 /* If errorformat is supplied then use it, otherwise use the 'efm'
2779d593a706 patch 8.0.1040: cannot use another error format in getqflist() Christian Brabandt <cb@256bit.org> parents: 12303 diff changeset	5804 * option setting
2779d593a706 patch 8.0.1040: cannot use another error format in getqflist() Christian Brabandt <cb@256bit.org> parents: 12303 diff changeset	5805 */
2779d593a706 patch 8.0.1040: cannot use another error format in getqflist() Christian Brabandt <cb@256bit.org> parents: 12303 diff changeset	5806 if ((efm_di = dict_find(what, (char_u *)"efm", -1)) != NULL)
2779d593a706 patch 8.0.1040: cannot use another error format in getqflist() Christian Brabandt <cb@256bit.org> parents: 12303 diff changeset	5807 {
2779d593a706 patch 8.0.1040: cannot use another error format in getqflist() Christian Brabandt <cb@256bit.org> parents: 12303 diff changeset	5808 if (efm_di->di_tv.v_type != VAR_STRING \|\|
2779d593a706 patch 8.0.1040: cannot use another error format in getqflist() Christian Brabandt <cb@256bit.org> parents: 12303 diff changeset	5809 efm_di->di_tv.vval.v_string == NULL)
2779d593a706 patch 8.0.1040: cannot use another error format in getqflist() Christian Brabandt <cb@256bit.org> parents: 12303 diff changeset	5810 return FAIL;
2779d593a706 patch 8.0.1040: cannot use another error format in getqflist() Christian Brabandt <cb@256bit.org> parents: 12303 diff changeset	5811 errorformat = efm_di->di_tv.vval.v_string;
2779d593a706 patch 8.0.1040: cannot use another error format in getqflist() Christian Brabandt <cb@256bit.org> parents: 12303 diff changeset	5812 }
2779d593a706 patch 8.0.1040: cannot use another error format in getqflist() Christian Brabandt <cb@256bit.org> parents: 12303 diff changeset	5813
2779d593a706 patch 8.0.1040: cannot use another error format in getqflist() Christian Brabandt <cb@256bit.org> parents: 12303 diff changeset	5814 l = list_alloc();
12299 f4d00472e617 patch 8.0.1029: return value of getqflist() is inconsistent Christian Brabandt <cb@256bit.org> parents: 12287 diff changeset	5815 if (l == NULL)
f4d00472e617 patch 8.0.1029: return value of getqflist() is inconsistent Christian Brabandt <cb@256bit.org> parents: 12287 diff changeset	5816 return FAIL;
f4d00472e617 patch 8.0.1029: return value of getqflist() is inconsistent Christian Brabandt <cb@256bit.org> parents: 12287 diff changeset	5817
14495 178162aeebeb patch 8.1.0261: Coverity complains about a negative array index Christian Brabandt <cb@256bit.org> parents: 14491 diff changeset	5818 qi = ll_new_list();
12252 3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5819 if (qi != NULL)
3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5820 {
12321 2779d593a706 patch 8.0.1040: cannot use another error format in getqflist() Christian Brabandt <cb@256bit.org> parents: 12303 diff changeset	5821 if (qf_init_ext(qi, 0, NULL, NULL, &di->di_tv, errorformat,
12252 3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5822 TRUE, (linenr_T)0, (linenr_T)0, NULL, NULL) > 0)
3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5823 {
12299 f4d00472e617 patch 8.0.1029: return value of getqflist() is inconsistent Christian Brabandt <cb@256bit.org> parents: 12287 diff changeset	5824 (void)get_errorlist(qi, NULL, 0, l);
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	5825 qf_free(&qi->qf_lists[0]);
12252 3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5826 }
3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5827 free(qi);
3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5828 }
12299 f4d00472e617 patch 8.0.1029: return value of getqflist() is inconsistent Christian Brabandt <cb@256bit.org> parents: 12287 diff changeset	5829 dict_add_list(retdict, "items", l);
f4d00472e617 patch 8.0.1029: return value of getqflist() is inconsistent Christian Brabandt <cb@256bit.org> parents: 12287 diff changeset	5830 status = OK;
12252 3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5831 }
3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5832
3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5833 return status;
3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5834 }
3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5835
3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5836 /*
13115 9812a9ca3ab2 patch 8.0.1432: after ":copen" can't get the window-ID of the quickfix window Christian Brabandt <cb@256bit.org> parents: 13105 diff changeset	5837 * Return the quickfix/location list window identifier in the current tabpage.
9812a9ca3ab2 patch 8.0.1432: after ":copen" can't get the window-ID of the quickfix window Christian Brabandt <cb@256bit.org> parents: 13105 diff changeset	5838 */
9812a9ca3ab2 patch 8.0.1432: after ":copen" can't get the window-ID of the quickfix window Christian Brabandt <cb@256bit.org> parents: 13105 diff changeset	5839 static int
9812a9ca3ab2 patch 8.0.1432: after ":copen" can't get the window-ID of the quickfix window Christian Brabandt <cb@256bit.org> parents: 13105 diff changeset	5840 qf_winid(qf_info_T *qi)
9812a9ca3ab2 patch 8.0.1432: after ":copen" can't get the window-ID of the quickfix window Christian Brabandt <cb@256bit.org> parents: 13105 diff changeset	5841 {
9812a9ca3ab2 patch 8.0.1432: after ":copen" can't get the window-ID of the quickfix window Christian Brabandt <cb@256bit.org> parents: 13105 diff changeset	5842 win_T *win;
9812a9ca3ab2 patch 8.0.1432: after ":copen" can't get the window-ID of the quickfix window Christian Brabandt <cb@256bit.org> parents: 13105 diff changeset	5843
9812a9ca3ab2 patch 8.0.1432: after ":copen" can't get the window-ID of the quickfix window Christian Brabandt <cb@256bit.org> parents: 13105 diff changeset	5844 /* The quickfix window can be opened even if the quickfix list is not set
9812a9ca3ab2 patch 8.0.1432: after ":copen" can't get the window-ID of the quickfix window Christian Brabandt <cb@256bit.org> parents: 13105 diff changeset	5845 * using ":copen". This is not true for location lists. */
9812a9ca3ab2 patch 8.0.1432: after ":copen" can't get the window-ID of the quickfix window Christian Brabandt <cb@256bit.org> parents: 13105 diff changeset	5846 if (qi == NULL)
9812a9ca3ab2 patch 8.0.1432: after ":copen" can't get the window-ID of the quickfix window Christian Brabandt <cb@256bit.org> parents: 13105 diff changeset	5847 return 0;
9812a9ca3ab2 patch 8.0.1432: after ":copen" can't get the window-ID of the quickfix window Christian Brabandt <cb@256bit.org> parents: 13105 diff changeset	5848 win = qf_find_win(qi);
9812a9ca3ab2 patch 8.0.1432: after ":copen" can't get the window-ID of the quickfix window Christian Brabandt <cb@256bit.org> parents: 13105 diff changeset	5849 if (win != NULL)
9812a9ca3ab2 patch 8.0.1432: after ":copen" can't get the window-ID of the quickfix window Christian Brabandt <cb@256bit.org> parents: 13105 diff changeset	5850 return win->w_id;
9812a9ca3ab2 patch 8.0.1432: after ":copen" can't get the window-ID of the quickfix window Christian Brabandt <cb@256bit.org> parents: 13105 diff changeset	5851 return 0;
9812a9ca3ab2 patch 8.0.1432: after ":copen" can't get the window-ID of the quickfix window Christian Brabandt <cb@256bit.org> parents: 13105 diff changeset	5852 }
9812a9ca3ab2 patch 8.0.1432: after ":copen" can't get the window-ID of the quickfix window Christian Brabandt <cb@256bit.org> parents: 13105 diff changeset	5853
9812a9ca3ab2 patch 8.0.1432: after ":copen" can't get the window-ID of the quickfix window Christian Brabandt <cb@256bit.org> parents: 13105 diff changeset	5854 /*
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5855 * Convert the keys in 'what' to quickfix list property flags.
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	5856 */
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5857 static int
14664 8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	5858 qf_getprop_keys2flags(dict_T *what, int loclist)
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5859 {
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5860 int flags = QF_GETLIST_NONE;
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5861
12287 20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	5862 if (dict_find(what, (char_u *)"all", -1) != NULL)
14664 8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	5863 {
12287 20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	5864 flags \|= QF_GETLIST_ALL;
14664 8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	5865 if (!loclist)
8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	5866 // File window ID is applicable only to location list windows
8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	5867 flags &= ~ QF_GETLIST_FILEWINID;
8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	5868 }
12287 20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	5869
20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	5870 if (dict_find(what, (char_u *)"title", -1) != NULL)
20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	5871 flags \|= QF_GETLIST_TITLE;
20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	5872
13026 7c0e0e923537 patch 8.0.1389: getqflist() items are missing if not set Christian Brabandt <cb@256bit.org> parents: 13016 diff changeset	5873 if (dict_find(what, (char_u *)"nr", -1) != NULL)
7c0e0e923537 patch 8.0.1389: getqflist() items are missing if not set Christian Brabandt <cb@256bit.org> parents: 13016 diff changeset	5874 flags \|= QF_GETLIST_NR;
7c0e0e923537 patch 8.0.1389: getqflist() items are missing if not set Christian Brabandt <cb@256bit.org> parents: 13016 diff changeset	5875
12287 20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	5876 if (dict_find(what, (char_u *)"winid", -1) != NULL)
20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	5877 flags \|= QF_GETLIST_WINID;
20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	5878
20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	5879 if (dict_find(what, (char_u *)"context", -1) != NULL)
20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	5880 flags \|= QF_GETLIST_CONTEXT;
20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	5881
13026 7c0e0e923537 patch 8.0.1389: getqflist() items are missing if not set Christian Brabandt <cb@256bit.org> parents: 13016 diff changeset	5882 if (dict_find(what, (char_u *)"id", -1) != NULL)
7c0e0e923537 patch 8.0.1389: getqflist() items are missing if not set Christian Brabandt <cb@256bit.org> parents: 13016 diff changeset	5883 flags \|= QF_GETLIST_ID;
7c0e0e923537 patch 8.0.1389: getqflist() items are missing if not set Christian Brabandt <cb@256bit.org> parents: 13016 diff changeset	5884
12287 20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	5885 if (dict_find(what, (char_u *)"items", -1) != NULL)
20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	5886 flags \|= QF_GETLIST_ITEMS;
11412 84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	5887
12465 805f7fd40e0d patch 8.0.1112: can't get size or current index from quickfix list Christian Brabandt <cb@256bit.org> parents: 12449 diff changeset	5888 if (dict_find(what, (char_u *)"idx", -1) != NULL)
805f7fd40e0d patch 8.0.1112: can't get size or current index from quickfix list Christian Brabandt <cb@256bit.org> parents: 12449 diff changeset	5889 flags \|= QF_GETLIST_IDX;
805f7fd40e0d patch 8.0.1112: can't get size or current index from quickfix list Christian Brabandt <cb@256bit.org> parents: 12449 diff changeset	5890
805f7fd40e0d patch 8.0.1112: can't get size or current index from quickfix list Christian Brabandt <cb@256bit.org> parents: 12449 diff changeset	5891 if (dict_find(what, (char_u *)"size", -1) != NULL)
805f7fd40e0d patch 8.0.1112: can't get size or current index from quickfix list Christian Brabandt <cb@256bit.org> parents: 12449 diff changeset	5892 flags \|= QF_GETLIST_SIZE;
805f7fd40e0d patch 8.0.1112: can't get size or current index from quickfix list Christian Brabandt <cb@256bit.org> parents: 12449 diff changeset	5893
13062 6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	5894 if (dict_find(what, (char_u *)"changedtick", -1) != NULL)
6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	5895 flags \|= QF_GETLIST_TICK;
6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	5896
14664 8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	5897 if (loclist && dict_find(what, (char_u *)"filewinid", -1) != NULL)
8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	5898 flags \|= QF_GETLIST_FILEWINID;
8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	5899
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5900 return flags;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5901 }
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5902
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5903 /*
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5904 * Return the quickfix list index based on 'nr' or 'id' in 'what'.
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5905 * If 'nr' and 'id' are not present in 'what' then return the current
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5906 * quickfix list index.
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5907 * If 'nr' is zero then return the current quickfix list index.
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5908 * If 'nr' is '$' then return the last quickfix list index.
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5909 * If 'id' is present then return the index of the quickfix list with that id.
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5910 * If 'id' is zero then return the quickfix list index specified by 'nr'.
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5911 * Return -1, if quickfix list is not present or if the stack is empty.
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5912 */
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5913 static int
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5914 qf_getprop_qfidx(qf_info_T qi, dict_T what)
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5915 {
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5916 int qf_idx;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5917 dictitem_T *di;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5918
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5919 qf_idx = qi->qf_curlist; /* default is the current list */
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5920 if ((di = dict_find(what, (char_u *)"nr", -1)) != NULL)
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5921 {
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5922 /* Use the specified quickfix/location list */
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5923 if (di->di_tv.v_type == VAR_NUMBER)
13026 7c0e0e923537 patch 8.0.1389: getqflist() items are missing if not set Christian Brabandt <cb@256bit.org> parents: 13016 diff changeset	5924 {
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5925 /* for zero use the current list */
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5926 if (di->di_tv.vval.v_number != 0)
13026 7c0e0e923537 patch 8.0.1389: getqflist() items are missing if not set Christian Brabandt <cb@256bit.org> parents: 13016 diff changeset	5927 {
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5928 qf_idx = di->di_tv.vval.v_number - 1;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5929 if (qf_idx < 0 \|\| qf_idx >= qi->qf_listcount)
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	5930 qf_idx = INVALID_QFIDX;
13026 7c0e0e923537 patch 8.0.1389: getqflist() items are missing if not set Christian Brabandt <cb@256bit.org> parents: 13016 diff changeset	5931 }
7c0e0e923537 patch 8.0.1389: getqflist() items are missing if not set Christian Brabandt <cb@256bit.org> parents: 13016 diff changeset	5932 }
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5933 else if (di->di_tv.v_type == VAR_STRING
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5934 && di->di_tv.vval.v_string != NULL
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5935 && STRCMP(di->di_tv.vval.v_string, "$") == 0)
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5936 /* Get the last quickfix list number */
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5937 qf_idx = qi->qf_listcount - 1;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5938 else
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	5939 qf_idx = INVALID_QFIDX;
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5940 }
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5941
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5942 if ((di = dict_find(what, (char_u *)"id", -1)) != NULL)
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5943 {
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5944 /* Look for a list with the specified id */
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5945 if (di->di_tv.v_type == VAR_NUMBER)
13026 7c0e0e923537 patch 8.0.1389: getqflist() items are missing if not set Christian Brabandt <cb@256bit.org> parents: 13016 diff changeset	5946 {
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5947 /*
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5948 * For zero, use the current list or the list specified by 'nr'
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5949 */
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5950 if (di->di_tv.vval.v_number != 0)
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5951 qf_idx = qf_id2nr(qi, di->di_tv.vval.v_number);
13026 7c0e0e923537 patch 8.0.1389: getqflist() items are missing if not set Christian Brabandt <cb@256bit.org> parents: 13016 diff changeset	5952 }
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5953 else
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	5954 qf_idx = INVALID_QFIDX;
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5955 }
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5956
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5957 return qf_idx;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5958 }
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5959
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5960 /*
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5961 * Return default values for quickfix list properties in retdict.
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5962 */
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5963 static int
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5964 qf_getprop_defaults(qf_info_T qi, int flags, dict_T retdict)
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5965 {
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5966 int status = OK;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5967
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5968 if (flags & QF_GETLIST_TITLE)
14301 3c80092eb211 patch 8.1.0166: using dict_add_nr_str() is clumsy Christian Brabandt <cb@256bit.org> parents: 14299 diff changeset	5969 status = dict_add_string(retdict, "title", (char_u *)"");
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5970 if ((status == OK) && (flags & QF_GETLIST_ITEMS))
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5971 {
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5972 list_T *l = list_alloc();
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5973 if (l != NULL)
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5974 status = dict_add_list(retdict, "items", l);
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5975 else
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5976 status = FAIL;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5977 }
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5978 if ((status == OK) && (flags & QF_GETLIST_NR))
14301 3c80092eb211 patch 8.1.0166: using dict_add_nr_str() is clumsy Christian Brabandt <cb@256bit.org> parents: 14299 diff changeset	5979 status = dict_add_number(retdict, "nr", 0);
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5980 if ((status == OK) && (flags & QF_GETLIST_WINID))
14301 3c80092eb211 patch 8.1.0166: using dict_add_nr_str() is clumsy Christian Brabandt <cb@256bit.org> parents: 14299 diff changeset	5981 status = dict_add_number(retdict, "winid", qf_winid(qi));
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5982 if ((status == OK) && (flags & QF_GETLIST_CONTEXT))
14301 3c80092eb211 patch 8.1.0166: using dict_add_nr_str() is clumsy Christian Brabandt <cb@256bit.org> parents: 14299 diff changeset	5983 status = dict_add_string(retdict, "context", (char_u *)"");
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5984 if ((status == OK) && (flags & QF_GETLIST_ID))
14301 3c80092eb211 patch 8.1.0166: using dict_add_nr_str() is clumsy Christian Brabandt <cb@256bit.org> parents: 14299 diff changeset	5985 status = dict_add_number(retdict, "id", 0);
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5986 if ((status == OK) && (flags & QF_GETLIST_IDX))
14301 3c80092eb211 patch 8.1.0166: using dict_add_nr_str() is clumsy Christian Brabandt <cb@256bit.org> parents: 14299 diff changeset	5987 status = dict_add_number(retdict, "idx", 0);
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5988 if ((status == OK) && (flags & QF_GETLIST_SIZE))
14301 3c80092eb211 patch 8.1.0166: using dict_add_nr_str() is clumsy Christian Brabandt <cb@256bit.org> parents: 14299 diff changeset	5989 status = dict_add_number(retdict, "size", 0);
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5990 if ((status == OK) && (flags & QF_GETLIST_TICK))
14301 3c80092eb211 patch 8.1.0166: using dict_add_nr_str() is clumsy Christian Brabandt <cb@256bit.org> parents: 14299 diff changeset	5991 status = dict_add_number(retdict, "changedtick", 0);
14664 8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	5992 if ((status == OK) && (qi != &ql_info) && (flags & QF_GETLIST_FILEWINID))
8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	5993 status = dict_add_number(retdict, "filewinid", 0);
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5994
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5995 return status;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5996 }
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5997
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5998 /*
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5999 * Return the quickfix list title as 'title' in retdict
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6000 */
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6001 static int
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6002 qf_getprop_title(qf_info_T qi, int qf_idx, dict_T retdict)
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6003 {
14301 3c80092eb211 patch 8.1.0166: using dict_add_nr_str() is clumsy Christian Brabandt <cb@256bit.org> parents: 14299 diff changeset	6004 return dict_add_string(retdict, "title", qi->qf_lists[qf_idx].qf_title);
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6005 }
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6006
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6007 /*
14664 8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	6008 * Returns the identifier of the window used to display files from a location
8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	6009 * list. If there is no associated window, then returns 0. Useful only when
8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	6010 * called from a location list window.
8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	6011 */
8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	6012 static int
8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	6013 qf_getprop_filewinid(win_T wp, qf_info_T qi, dict_T *retdict)
8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	6014 {
8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	6015 int winid = 0;
8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	6016
8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	6017 if (wp != NULL && IS_LL_WINDOW(wp))
8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	6018 {
8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	6019 win_T *ll_wp = qf_find_win_with_loclist(qi);
8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	6020 if (ll_wp != NULL)
8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	6021 winid = ll_wp->w_id;
8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	6022 }
8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	6023
8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	6024 return dict_add_number(retdict, "filewinid", winid);
8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	6025 }
8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	6026
8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	6027 /*
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6028 * Return the quickfix list items/entries as 'items' in retdict
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6029 */
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6030 static int
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6031 qf_getprop_items(qf_info_T qi, int qf_idx, dict_T retdict)
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6032 {
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6033 int status = OK;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6034 list_T *l = list_alloc();
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6035 if (l != NULL)
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6036 {
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6037 (void)get_errorlist(qi, NULL, qf_idx, l);
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6038 dict_add_list(retdict, "items", l);
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6039 }
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6040 else
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6041 status = FAIL;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6042
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6043 return status;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6044 }
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6045
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6046 /*
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6047 * Return the quickfix list context (if any) as 'context' in retdict.
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6048 */
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6049 static int
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6050 qf_getprop_ctx(qf_info_T qi, int qf_idx, dict_T retdict)
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6051 {
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6052 int status;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6053 dictitem_T *di;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6054
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6055 if (qi->qf_lists[qf_idx].qf_ctx != NULL)
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6056 {
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6057 di = dictitem_alloc((char_u *)"context");
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6058 if (di != NULL)
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6059 {
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6060 copy_tv(qi->qf_lists[qf_idx].qf_ctx, &di->di_tv);
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6061 status = dict_add(retdict, di);
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6062 if (status == FAIL)
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6063 dictitem_free(di);
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6064 }
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6065 else
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6066 status = FAIL;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6067 }
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6068 else
14301 3c80092eb211 patch 8.1.0166: using dict_add_nr_str() is clumsy Christian Brabandt <cb@256bit.org> parents: 14299 diff changeset	6069 status = dict_add_string(retdict, "context", (char_u *)"");
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6070
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6071 return status;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6072 }
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6073
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6074 /*
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6075 * Return the quickfix list index as 'idx' in retdict
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6076 */
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6077 static int
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6078 qf_getprop_idx(qf_info_T qi, int qf_idx, dict_T retdict)
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6079 {
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6080 int idx = qi->qf_lists[qf_idx].qf_index;
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	6081 if (qf_list_empty(qi, qf_idx))
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6082 /* For empty lists, qf_index is set to 1 */
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6083 idx = 0;
14301 3c80092eb211 patch 8.1.0166: using dict_add_nr_str() is clumsy Christian Brabandt <cb@256bit.org> parents: 14299 diff changeset	6084 return dict_add_number(retdict, "idx", idx);
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6085 }
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6086
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6087 /*
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6088 * Return quickfix/location list details (title) as a
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6089 * dictionary. 'what' contains the details to return. If 'list_idx' is -1,
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6090 * then current list is used. Otherwise the specified list is used.
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6091 */
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6092 int
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6093 qf_get_properties(win_T wp, dict_T what, dict_T *retdict)
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6094 {
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6095 qf_info_T *qi = &ql_info;
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6096 qf_list_T *qfl;
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6097 int status = OK;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6098 int qf_idx;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6099 dictitem_T *di;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6100 int flags = QF_GETLIST_NONE;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6101
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6102 if ((di = dict_find(what, (char_u *)"lines", -1)) != NULL)
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6103 return qf_get_list_from_lines(what, di, retdict);
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6104
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6105 if (wp != NULL)
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6106 qi = GET_LOC_LIST(wp);
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6107
14664 8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	6108 flags = qf_getprop_keys2flags(what, (wp != NULL));
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6109
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6110 if (qi != NULL && qi->qf_listcount != 0)
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6111 qf_idx = qf_getprop_qfidx(qi, what);
13026 7c0e0e923537 patch 8.0.1389: getqflist() items are missing if not set Christian Brabandt <cb@256bit.org> parents: 13016 diff changeset	6112
7c0e0e923537 patch 8.0.1389: getqflist() items are missing if not set Christian Brabandt <cb@256bit.org> parents: 13016 diff changeset	6113 /* List is not present or is empty */
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6114 if (qi == NULL \|\| qi->qf_listcount == 0 \|\| qf_idx == INVALID_QFIDX)
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6115 return qf_getprop_defaults(qi, flags, retdict);
13026 7c0e0e923537 patch 8.0.1389: getqflist() items are missing if not set Christian Brabandt <cb@256bit.org> parents: 13016 diff changeset	6116
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6117 qfl = &qi->qf_lists[qf_idx];
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6118
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6119 if (flags & QF_GETLIST_TITLE)
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6120 status = qf_getprop_title(qi, qf_idx, retdict);
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6121 if ((status == OK) && (flags & QF_GETLIST_NR))
14301 3c80092eb211 patch 8.1.0166: using dict_add_nr_str() is clumsy Christian Brabandt <cb@256bit.org> parents: 14299 diff changeset	6122 status = dict_add_number(retdict, "nr", qf_idx + 1);
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6123 if ((status == OK) && (flags & QF_GETLIST_WINID))
14301 3c80092eb211 patch 8.1.0166: using dict_add_nr_str() is clumsy Christian Brabandt <cb@256bit.org> parents: 14299 diff changeset	6124 status = dict_add_number(retdict, "winid", qf_winid(qi));
11549 f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	6125 if ((status == OK) && (flags & QF_GETLIST_ITEMS))
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6126 status = qf_getprop_items(qi, qf_idx, retdict);
11412 84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6127 if ((status == OK) && (flags & QF_GETLIST_CONTEXT))
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6128 status = qf_getprop_ctx(qi, qf_idx, retdict);
12287 20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	6129 if ((status == OK) && (flags & QF_GETLIST_ID))
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6130 status = dict_add_number(retdict, "id", qfl->qf_id);
12465 805f7fd40e0d patch 8.0.1112: can't get size or current index from quickfix list Christian Brabandt <cb@256bit.org> parents: 12449 diff changeset	6131 if ((status == OK) && (flags & QF_GETLIST_IDX))
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6132 status = qf_getprop_idx(qi, qf_idx, retdict);
12465 805f7fd40e0d patch 8.0.1112: can't get size or current index from quickfix list Christian Brabandt <cb@256bit.org> parents: 12449 diff changeset	6133 if ((status == OK) && (flags & QF_GETLIST_SIZE))
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6134 status = dict_add_number(retdict, "size", qfl->qf_count);
13062 6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	6135 if ((status == OK) && (flags & QF_GETLIST_TICK))
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6136 status = dict_add_number(retdict, "changedtick", qfl->qf_changedtick);
14664 8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	6137 if ((status == OK) && (wp != NULL) && (flags & QF_GETLIST_FILEWINID))
8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	6138 status = qf_getprop_filewinid(wp, qi, retdict);
13062 6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	6139
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6140 return status;
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6141 }
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6142
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6143 /*
14633 462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6144 * Add a new quickfix entry to list at 'qf_idx' in the stack 'qi' from the
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6145 * items in the dict 'd'.
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6146 */
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6147 static int
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6148 qf_add_entry_from_dict(
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6149 qf_info_T *qi,
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6150 int qf_idx,
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6151 dict_T *d,
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6152 int first_entry)
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6153 {
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6154 static int did_bufnr_emsg;
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6155 char_u filename, module, pattern, text, *type;
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6156 int bufnum, valid, status, col, vcol, nr;
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6157 long lnum;
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6158
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6159 if (first_entry)
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6160 did_bufnr_emsg = FALSE;
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6161
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6162 filename = get_dict_string(d, (char_u *)"filename", TRUE);
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6163 module = get_dict_string(d, (char_u *)"module", TRUE);
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6164 bufnum = (int)get_dict_number(d, (char_u *)"bufnr");
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6165 lnum = (int)get_dict_number(d, (char_u *)"lnum");
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6166 col = (int)get_dict_number(d, (char_u *)"col");
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6167 vcol = (int)get_dict_number(d, (char_u *)"vcol");
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6168 nr = (int)get_dict_number(d, (char_u *)"nr");
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6169 type = get_dict_string(d, (char_u *)"type", TRUE);
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6170 pattern = get_dict_string(d, (char_u *)"pattern", TRUE);
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6171 text = get_dict_string(d, (char_u *)"text", TRUE);
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6172 if (text == NULL)
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6173 text = vim_strsave((char_u *)"");
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6174
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6175 valid = TRUE;
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6176 if ((filename == NULL && bufnum == 0) \|\| (lnum == 0 && pattern == NULL))
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6177 valid = FALSE;
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6178
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6179 // Mark entries with non-existing buffer number as not valid. Give the
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6180 // error message only once.
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6181 if (bufnum != 0 && (buflist_findnr(bufnum) == NULL))
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6182 {
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6183 if (!did_bufnr_emsg)
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6184 {
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6185 did_bufnr_emsg = TRUE;
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6186 EMSGN(_("E92: Buffer %ld not found"), bufnum);
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6187 }
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6188 valid = FALSE;
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6189 bufnum = 0;
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6190 }
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6191
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6192 // If the 'valid' field is present it overrules the detected value.
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6193 if ((dict_find(d, (char_u *)"valid", -1)) != NULL)
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6194 valid = (int)get_dict_number(d, (char_u *)"valid");
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6195
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6196 status = qf_add_entry(qi,
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6197 qf_idx,
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6198 NULL, // dir
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6199 filename,
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6200 module,
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6201 bufnum,
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6202 text,
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6203 lnum,
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6204 col,
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6205 vcol, // vis_col
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6206 pattern, // search pattern
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6207 nr,
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6208 type == NULL ? NUL : *type,
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6209 valid);
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6210
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6211 vim_free(filename);
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6212 vim_free(module);
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6213 vim_free(pattern);
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6214 vim_free(text);
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6215 vim_free(type);
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6216
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6217 return status;
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6218 }
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6219
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6220 /*
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6221 * Add list of entries to quickfix/location list. Each list entry is
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6222 * a dictionary with item information.
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6223 */
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6224 static int
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6225 qf_add_entries(
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6226 qf_info_T *qi,
11449 d2f00eb352b9 patch 8.0.0608: cannot manipulate other than the current quickfix list Christian Brabandt <cb@256bit.org> parents: 11447 diff changeset	6227 int qf_idx,
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6228 list_T *list,
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6229 char_u *title,
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6230 int action)
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6231 {
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6232 qf_list_T *qfl = &qi->qf_lists[qf_idx];
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6233 listitem_T *li;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6234 dict_T *d;
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	6235 qfline_T *old_last = NULL;
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6236 int retval = OK;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	6237
11449 d2f00eb352b9 patch 8.0.0608: cannot manipulate other than the current quickfix list Christian Brabandt <cb@256bit.org> parents: 11447 diff changeset	6238 if (action == ' ' \|\| qf_idx == qi->qf_listcount)
d2f00eb352b9 patch 8.0.0608: cannot manipulate other than the current quickfix list Christian Brabandt <cb@256bit.org> parents: 11447 diff changeset	6239 {
277 fe16c18c24a7 updated for version 7.0074 vimboss parents: 273 diff changeset	6240 /* make place for a new list */
3965 eccae034465b updated for version 7.3.738 Bram Moolenaar <bram@vim.org> parents: 3949 diff changeset	6241 qf_new_list(qi, title);
11449 d2f00eb352b9 patch 8.0.0608: cannot manipulate other than the current quickfix list Christian Brabandt <cb@256bit.org> parents: 11447 diff changeset	6242 qf_idx = qi->qf_curlist;
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6243 qfl = &qi->qf_lists[qf_idx];
11449 d2f00eb352b9 patch 8.0.0608: cannot manipulate other than the current quickfix list Christian Brabandt <cb@256bit.org> parents: 11447 diff changeset	6244 }
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	6245 else if (action == 'a' && !qf_list_empty(qi, qf_idx))
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	6246 /* Adding to existing list, use last entry. */
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6247 old_last = qfl->qf_last;
277 fe16c18c24a7 updated for version 7.0074 vimboss parents: 273 diff changeset	6248 else if (action == 'r')
6079 75ae211df37d updated for version 7.4.378 Bram Moolenaar <bram@vim.org> parents: 5753 diff changeset	6249 {
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6250 qf_free_items(qfl);
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6251 qf_store_title(qfl, title);
6079 75ae211df37d updated for version 7.4.378 Bram Moolenaar <bram@vim.org> parents: 5753 diff changeset	6252 }
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6253
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6254 for (li = list->lv_first; li != NULL; li = li->li_next)
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6255 {
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6256 if (li->li_tv.v_type != VAR_DICT)
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6257 continue; /* Skip non-dict items */
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6258
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6259 d = li->li_tv.vval.v_dict;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6260 if (d == NULL)
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6261 continue;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6262
14633 462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6263 retval = qf_add_entry_from_dict(qi, qf_idx, d, li == list->lv_first);
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6264 if (retval == FAIL)
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6265 break;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6266 }
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6267
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6268 if (qfl->qf_index == 0)
2795 133d089f247e updated for version 7.3.173 Bram Moolenaar <bram@vim.org> parents: 2782 diff changeset	6269 /* no valid entry */
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6270 qfl->qf_nonevalid = TRUE;
2146 c17a42da3920 updated for version 7.2.428 Bram Moolenaar <bram@zimbu.org> parents: 2047 diff changeset	6271 else
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6272 qfl->qf_nonevalid = FALSE;
11263 ae5f9f26f81c patch 8.0.0517: there is no way to remove quickfix lists Christian Brabandt <cb@256bit.org> parents: 11195 diff changeset	6273 if (action != 'a')
ae5f9f26f81c patch 8.0.0517: there is no way to remove quickfix lists Christian Brabandt <cb@256bit.org> parents: 11195 diff changeset	6274 {
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6275 qfl->qf_ptr = qfl->qf_start;
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	6276 if (!qf_list_empty(qi, qf_idx))
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6277 qfl->qf_index = 1;
8932 25c2031e9f9f commit https://github.com/vim/vim/commit/c1808d5822ed9534ef7f0fe509b15bee92a5cc28 Christian Brabandt <cb@256bit.org> parents: 8751 diff changeset	6278 }
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6279
8932 25c2031e9f9f commit https://github.com/vim/vim/commit/c1808d5822ed9534ef7f0fe509b15bee92a5cc28 Christian Brabandt <cb@256bit.org> parents: 8751 diff changeset	6280 /* Don't update the cursor in quickfix window when appending entries */
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	6281 qf_update_buffer(qi, old_last);
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6282
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6283 return retval;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6284 }
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6285
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6286 /*
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6287 * Get the quickfix list index from 'nr' or 'id'
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6288 */
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6289 static int
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6290 qf_setprop_get_qfidx(
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6291 qf_info_T *qi,
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6292 dict_T *what,
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6293 int action,
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6294 int *newlist)
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6295 {
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6296 dictitem_T *di;
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6297 int qf_idx = qi->qf_curlist; /* default is the current list */
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6298
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6299 if ((di = dict_find(what, (char_u *)"nr", -1)) != NULL)
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6300 {
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6301 /* Use the specified quickfix/location list */
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6302 if (di->di_tv.v_type == VAR_NUMBER)
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6303 {
11445 461ac47c3793 patch 8.0.0606: cannot set the context for a specified quickfix list Christian Brabandt <cb@256bit.org> parents: 11443 diff changeset	6304 /* for zero use the current list */
461ac47c3793 patch 8.0.0606: cannot set the context for a specified quickfix list Christian Brabandt <cb@256bit.org> parents: 11443 diff changeset	6305 if (di->di_tv.vval.v_number != 0)
461ac47c3793 patch 8.0.0606: cannot set the context for a specified quickfix list Christian Brabandt <cb@256bit.org> parents: 11443 diff changeset	6306 qf_idx = di->di_tv.vval.v_number - 1;
11549 f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	6307
12084 69ce6b3f0834 patch 8.0.0922: quickfix list always added after current one Christian Brabandt <cb@256bit.org> parents: 12048 diff changeset	6308 if ((action == ' ' \|\| action == 'a') && qf_idx == qi->qf_listcount)
69ce6b3f0834 patch 8.0.0922: quickfix list always added after current one Christian Brabandt <cb@256bit.org> parents: 12048 diff changeset	6309 {
11549 f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	6310 /*
f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	6311 * When creating a new list, accept qf_idx pointing to the next
12084 69ce6b3f0834 patch 8.0.0922: quickfix list always added after current one Christian Brabandt <cb@256bit.org> parents: 12048 diff changeset	6312 * non-available list and add the new list at the end of the
69ce6b3f0834 patch 8.0.0922: quickfix list always added after current one Christian Brabandt <cb@256bit.org> parents: 12048 diff changeset	6313 * stack.
11549 f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	6314 */
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6315 *newlist = TRUE;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6316 qf_idx = qi->qf_listcount > 0 ? qi->qf_listcount - 1 : 0;
12084 69ce6b3f0834 patch 8.0.0922: quickfix list always added after current one Christian Brabandt <cb@256bit.org> parents: 12048 diff changeset	6317 }
11549 f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	6318 else if (qf_idx < 0 \|\| qf_idx >= qi->qf_listcount)
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6319 return INVALID_QFIDX;
12084 69ce6b3f0834 patch 8.0.0922: quickfix list always added after current one Christian Brabandt <cb@256bit.org> parents: 12048 diff changeset	6320 else if (action != ' ')
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6321 newlist = FALSE; / use the specified list */
12084 69ce6b3f0834 patch 8.0.0922: quickfix list always added after current one Christian Brabandt <cb@256bit.org> parents: 12048 diff changeset	6322 }
69ce6b3f0834 patch 8.0.0922: quickfix list always added after current one Christian Brabandt <cb@256bit.org> parents: 12048 diff changeset	6323 else if (di->di_tv.v_type == VAR_STRING
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6324 && di->di_tv.vval.v_string != NULL
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6325 && STRCMP(di->di_tv.vval.v_string, "$") == 0)
11549 f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	6326 {
12084 69ce6b3f0834 patch 8.0.0922: quickfix list always added after current one Christian Brabandt <cb@256bit.org> parents: 12048 diff changeset	6327 if (qi->qf_listcount > 0)
69ce6b3f0834 patch 8.0.0922: quickfix list always added after current one Christian Brabandt <cb@256bit.org> parents: 12048 diff changeset	6328 qf_idx = qi->qf_listcount - 1;
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6329 else if (*newlist)
12084 69ce6b3f0834 patch 8.0.0922: quickfix list always added after current one Christian Brabandt <cb@256bit.org> parents: 12048 diff changeset	6330 qf_idx = 0;
69ce6b3f0834 patch 8.0.0922: quickfix list always added after current one Christian Brabandt <cb@256bit.org> parents: 12048 diff changeset	6331 else
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6332 return INVALID_QFIDX;
11549 f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	6333 }
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6334 else
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6335 return INVALID_QFIDX;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6336 }
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6337
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6338 if (!newlist && (di = dict_find(what, (char_u )"id", -1)) != NULL)
12287 20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	6339 {
20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	6340 /* Use the quickfix/location list with the specified id */
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6341 if (di->di_tv.v_type != VAR_NUMBER)
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6342 return INVALID_QFIDX;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6343
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6344 return qf_id2nr(qi, di->di_tv.vval.v_number);
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6345 }
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6346
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6347 return qf_idx;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6348 }
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6349
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6350 /*
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6351 * Set the quickfix list title.
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6352 */
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6353 static int
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6354 qf_setprop_title(qf_info_T qi, int qf_idx, dict_T what, dictitem_T *di)
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6355 {
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6356 if (di->di_tv.v_type != VAR_STRING)
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6357 return FAIL;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6358
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6359 vim_free(qi->qf_lists[qf_idx].qf_title);
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6360 qi->qf_lists[qf_idx].qf_title =
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6361 get_dict_string(what, (char_u *)"title", TRUE);
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6362 if (qf_idx == qi->qf_curlist)
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6363 qf_update_win_titlevar(qi);
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6364
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6365 return OK;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6366 }
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6367
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6368 /*
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6369 * Set quickfix list items/entries.
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6370 */
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6371 static int
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6372 qf_setprop_items(qf_info_T qi, int qf_idx, dictitem_T di, int action)
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6373 {
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6374 int retval = FAIL;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6375 char_u *title_save;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6376
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6377 if (di->di_tv.v_type != VAR_LIST)
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6378 return FAIL;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6379
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6380 title_save = vim_strsave(qi->qf_lists[qf_idx].qf_title);
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6381 retval = qf_add_entries(qi, qf_idx, di->di_tv.vval.v_list,
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6382 title_save, action == ' ' ? 'a' : action);
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6383 vim_free(title_save);
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6384
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6385 return retval;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6386 }
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6387
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6388 /*
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6389 * Set quickfix list items/entries from a list of lines.
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6390 */
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6391 static int
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6392 qf_setprop_items_from_lines(
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6393 qf_info_T *qi,
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6394 int qf_idx,
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6395 dict_T *what,
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6396 dictitem_T *di,
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6397 int action)
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6398 {
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6399 char_u *errorformat = p_efm;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6400 dictitem_T *efm_di;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6401 int retval = FAIL;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6402
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6403 /* Use the user supplied errorformat settings (if present) */
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6404 if ((efm_di = dict_find(what, (char_u *)"efm", -1)) != NULL)
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6405 {
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6406 if (efm_di->di_tv.v_type != VAR_STRING \|\|
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6407 efm_di->di_tv.vval.v_string == NULL)
12287 20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	6408 return FAIL;
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6409 errorformat = efm_di->di_tv.vval.v_string;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6410 }
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6411
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6412 /* Only a List value is supported */
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6413 if (di->di_tv.v_type != VAR_LIST \|\| di->di_tv.vval.v_list == NULL)
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6414 return FAIL;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6415
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6416 if (action == 'r')
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6417 qf_free_items(&qi->qf_lists[qf_idx]);
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6418 if (qf_init_ext(qi, qf_idx, NULL, NULL, &di->di_tv, errorformat,
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6419 FALSE, (linenr_T)0, (linenr_T)0, NULL, NULL) > 0)
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6420 retval = OK;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6421
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6422 return retval;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6423 }
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6424
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6425 /*
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6426 * Set quickfix list context.
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6427 */
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6428 static int
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6429 qf_setprop_context(qf_list_T qfl, dictitem_T di)
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6430 {
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6431 typval_T *ctx;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6432
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6433 free_tv(qfl->qf_ctx);
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6434 ctx = alloc_tv();
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6435 if (ctx != NULL)
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6436 copy_tv(&di->di_tv, ctx);
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6437 qfl->qf_ctx = ctx;
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6438
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6439 return OK;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6440 }
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6441
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6442 /*
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6443 * Set quickfix/location list properties (title, items, context).
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6444 * Also used to add items from parsing a list of lines.
13882 f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	6445 * Used by the setqflist() and setloclist() Vim script functions.
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6446 */
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6447 static int
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6448 qf_set_properties(qf_info_T qi, dict_T what, int action, char_u *title)
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6449 {
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6450 dictitem_T *di;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6451 int retval = FAIL;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6452 int qf_idx;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6453 int newlist = FALSE;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6454
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6455 if (action == ' ' \|\| qi->qf_curlist == qi->qf_listcount)
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6456 newlist = TRUE;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6457
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6458 qf_idx = qf_setprop_get_qfidx(qi, what, action, &newlist);
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6459 if (qf_idx == INVALID_QFIDX) /* List not found */
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6460 return FAIL;
12287 20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	6461
9982 e24aa20d815c commit https://github.com/vim/vim/commit/2b529bb6260b52246e92429375d995b9b5ce76b6 Christian Brabandt <cb@256bit.org> parents: 9931 diff changeset	6462 if (newlist)
e24aa20d815c commit https://github.com/vim/vim/commit/2b529bb6260b52246e92429375d995b9b5ce76b6 Christian Brabandt <cb@256bit.org> parents: 9931 diff changeset	6463 {
12084 69ce6b3f0834 patch 8.0.0922: quickfix list always added after current one Christian Brabandt <cb@256bit.org> parents: 12048 diff changeset	6464 qi->qf_curlist = qf_idx;
12048 ebd313aa5a6c patch 8.0.0904: cannot set a location list from text Christian Brabandt <cb@256bit.org> parents: 11800 diff changeset	6465 qf_new_list(qi, title);
9982 e24aa20d815c commit https://github.com/vim/vim/commit/2b529bb6260b52246e92429375d995b9b5ce76b6 Christian Brabandt <cb@256bit.org> parents: 9931 diff changeset	6466 qf_idx = qi->qf_curlist;
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6467 }
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6468
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6469 if ((di = dict_find(what, (char_u *)"title", -1)) != NULL)
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6470 retval = qf_setprop_title(qi, qf_idx, what, di);
11549 f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	6471 if ((di = dict_find(what, (char_u *)"items", -1)) != NULL)
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6472 retval = qf_setprop_items(qi, qf_idx, di, action);
12303 ec7a4fd21dd5 patch 8.0.1031: "text" argument for getqflist() is confusing Christian Brabandt <cb@256bit.org> parents: 12299 diff changeset	6473 if ((di = dict_find(what, (char_u *)"lines", -1)) != NULL)
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6474 retval = qf_setprop_items_from_lines(qi, qf_idx, what, di, action);
11412 84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6475 if ((di = dict_find(what, (char_u *)"context", -1)) != NULL)
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6476 retval = qf_setprop_context(&qi->qf_lists[qf_idx], di);
11412 84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6477
13062 6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	6478 if (retval == OK)
6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	6479 qf_list_changed(qi, qf_idx);
6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	6480
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6481 return retval;
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6482 }
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6483
11301 cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6484 /*
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6485 * Find the non-location list window with the specified location list in the
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6486 * current tabpage.
11301 cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6487 */
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6488 static win_T *
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6489 find_win_with_ll(qf_info_T *qi)
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6490 {
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6491 win_T *wp = NULL;
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6492
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6493 FOR_ALL_WINDOWS(wp)
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6494 if ((wp->w_llist == qi) && !bt_quickfix(wp->w_buffer))
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6495 return wp;
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6496
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6497 return NULL;
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6498 }
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6499
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6500 /*
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6501 * Free the entire quickfix/location list stack.
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6502 * If the quickfix/location list window is open, then clear it.
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6503 */
11263 ae5f9f26f81c patch 8.0.0517: there is no way to remove quickfix lists Christian Brabandt <cb@256bit.org> parents: 11195 diff changeset	6504 static void
ae5f9f26f81c patch 8.0.0517: there is no way to remove quickfix lists Christian Brabandt <cb@256bit.org> parents: 11195 diff changeset	6505 qf_free_stack(win_T wp, qf_info_T qi)
ae5f9f26f81c patch 8.0.0517: there is no way to remove quickfix lists Christian Brabandt <cb@256bit.org> parents: 11195 diff changeset	6506 {
11301 cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6507 win_T *qfwin = qf_find_win(qi);
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6508 win_T *llwin = NULL;
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6509 win_T *orig_wp = wp;
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6510
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6511 if (qfwin != NULL)
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6512 {
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6513 /* If the quickfix/location list window is open, then clear it */
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6514 if (qi->qf_curlist < qi->qf_listcount)
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6515 qf_free(&qi->qf_lists[qi->qf_curlist]);
11301 cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6516 qf_update_buffer(qi, NULL);
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6517 }
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6518
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6519 if (wp != NULL && IS_LL_WINDOW(wp))
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6520 {
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6521 /* If in the location list window, then use the non-location list
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6522 * window with this location list (if present)
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6523 */
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6524 llwin = find_win_with_ll(qi);
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6525 if (llwin != NULL)
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6526 wp = llwin;
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6527 }
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6528
11263 ae5f9f26f81c patch 8.0.0517: there is no way to remove quickfix lists Christian Brabandt <cb@256bit.org> parents: 11195 diff changeset	6529 qf_free_all(wp);
ae5f9f26f81c patch 8.0.0517: there is no way to remove quickfix lists Christian Brabandt <cb@256bit.org> parents: 11195 diff changeset	6530 if (wp == NULL)
ae5f9f26f81c patch 8.0.0517: there is no way to remove quickfix lists Christian Brabandt <cb@256bit.org> parents: 11195 diff changeset	6531 {
ae5f9f26f81c patch 8.0.0517: there is no way to remove quickfix lists Christian Brabandt <cb@256bit.org> parents: 11195 diff changeset	6532 /* quickfix list */
ae5f9f26f81c patch 8.0.0517: there is no way to remove quickfix lists Christian Brabandt <cb@256bit.org> parents: 11195 diff changeset	6533 qi->qf_curlist = 0;
ae5f9f26f81c patch 8.0.0517: there is no way to remove quickfix lists Christian Brabandt <cb@256bit.org> parents: 11195 diff changeset	6534 qi->qf_listcount = 0;
ae5f9f26f81c patch 8.0.0517: there is no way to remove quickfix lists Christian Brabandt <cb@256bit.org> parents: 11195 diff changeset	6535 }
11301 cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6536 else if (IS_LL_WINDOW(orig_wp))
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6537 {
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6538 /* If the location list window is open, then create a new empty
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6539 * location list */
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6540 qf_info_T *new_ll = ll_new_list();
11378 2ed7a34ecc54 patch 8.0.0574: get only one quickfix list after :caddbuf Christian Brabandt <cb@256bit.org> parents: 11360 diff changeset	6541
11398 30af33f4d353 patch 8.0.0584: memory leak when executing quickfix tests Christian Brabandt <cb@256bit.org> parents: 11390 diff changeset	6542 /* first free the list reference in the location list window */
30af33f4d353 patch 8.0.0584: memory leak when executing quickfix tests Christian Brabandt <cb@256bit.org> parents: 11390 diff changeset	6543 ll_free_all(&orig_wp->w_llist_ref);
30af33f4d353 patch 8.0.0584: memory leak when executing quickfix tests Christian Brabandt <cb@256bit.org> parents: 11390 diff changeset	6544
11301 cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6545 orig_wp->w_llist_ref = new_ll;
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6546 if (llwin != NULL)
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6547 {
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6548 llwin->w_llist = new_ll;
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6549 new_ll->qf_refcount++;
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6550 }
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6551 }
11263 ae5f9f26f81c patch 8.0.0517: there is no way to remove quickfix lists Christian Brabandt <cb@256bit.org> parents: 11195 diff changeset	6552 }
ae5f9f26f81c patch 8.0.0517: there is no way to remove quickfix lists Christian Brabandt <cb@256bit.org> parents: 11195 diff changeset	6553
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6554 /*
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6555 * Populate the quickfix list with the items supplied in the list
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6556 * of dictionaries. "title" will be copied to w:quickfix_title.
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6557 * "action" is 'a' for add, 'r' for replace. Otherwise create a new list.
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6558 */
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6559 int
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6560 set_errorlist(
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6561 win_T *wp,
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6562 list_T *list,
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6563 int action,
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6564 char_u *title,
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6565 dict_T *what)
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6566 {
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6567 qf_info_T *qi = &ql_info;
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6568 int retval = OK;
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6569
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6570 if (wp != NULL)
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6571 {
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6572 qi = ll_get_or_alloc_list(wp);
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6573 if (qi == NULL)
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6574 return FAIL;
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6575 }
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6576
11263 ae5f9f26f81c patch 8.0.0517: there is no way to remove quickfix lists Christian Brabandt <cb@256bit.org> parents: 11195 diff changeset	6577 if (action == 'f')
ae5f9f26f81c patch 8.0.0517: there is no way to remove quickfix lists Christian Brabandt <cb@256bit.org> parents: 11195 diff changeset	6578 {
ae5f9f26f81c patch 8.0.0517: there is no way to remove quickfix lists Christian Brabandt <cb@256bit.org> parents: 11195 diff changeset	6579 /* Free the entire quickfix or location list stack */
ae5f9f26f81c patch 8.0.0517: there is no way to remove quickfix lists Christian Brabandt <cb@256bit.org> parents: 11195 diff changeset	6580 qf_free_stack(wp, qi);
ae5f9f26f81c patch 8.0.0517: there is no way to remove quickfix lists Christian Brabandt <cb@256bit.org> parents: 11195 diff changeset	6581 }
ae5f9f26f81c patch 8.0.0517: there is no way to remove quickfix lists Christian Brabandt <cb@256bit.org> parents: 11195 diff changeset	6582 else if (what != NULL)
12048 ebd313aa5a6c patch 8.0.0904: cannot set a location list from text Christian Brabandt <cb@256bit.org> parents: 11800 diff changeset	6583 retval = qf_set_properties(qi, what, action, title);
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6584 else
13062 6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	6585 {
11449 d2f00eb352b9 patch 8.0.0608: cannot manipulate other than the current quickfix list Christian Brabandt <cb@256bit.org> parents: 11447 diff changeset	6586 retval = qf_add_entries(qi, qi->qf_curlist, list, title, action);
13062 6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	6587 if (retval == OK)
6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	6588 qf_list_changed(qi, qi->qf_curlist);
6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	6589 }
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6590
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6591 return retval;
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6592 }
11412 84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6593
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	6594 /*
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	6595 * Mark the context as in use for all the lists in a quickfix stack.
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	6596 */
11412 84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6597 static int
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6598 mark_quickfix_ctx(qf_info_T *qi, int copyID)
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6599 {
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6600 int i;
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6601 int abort = FALSE;
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6602 typval_T *ctx;
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6603
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6604 for (i = 0; i < LISTCOUNT && !abort; ++i)
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6605 {
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6606 ctx = qi->qf_lists[i].qf_ctx;
12084 69ce6b3f0834 patch 8.0.0922: quickfix list always added after current one Christian Brabandt <cb@256bit.org> parents: 12048 diff changeset	6607 if (ctx != NULL && ctx->v_type != VAR_NUMBER
69ce6b3f0834 patch 8.0.0922: quickfix list always added after current one Christian Brabandt <cb@256bit.org> parents: 12048 diff changeset	6608 && ctx->v_type != VAR_STRING && ctx->v_type != VAR_FLOAT)
11412 84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6609 abort = set_ref_in_item(ctx, copyID, NULL, NULL);
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6610 }
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6611
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6612 return abort;
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6613 }
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6614
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6615 /*
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6616 * Mark the context of the quickfix list and the location lists (if present) as
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6617 * "in use". So that garbage collection doesn't free the context.
11412 84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6618 */
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6619 int
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6620 set_ref_in_quickfix(int copyID)
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6621 {
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6622 int abort = FALSE;
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6623 tabpage_T *tp;
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6624 win_T *win;
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6625
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6626 abort = mark_quickfix_ctx(&ql_info, copyID);
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6627 if (abort)
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6628 return abort;
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6629
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6630 FOR_ALL_TAB_WINDOWS(tp, win)
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6631 {
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6632 if (win->w_llist != NULL)
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6633 {
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6634 abort = mark_quickfix_ctx(win->w_llist, copyID);
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6635 if (abort)
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6636 return abort;
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6637 }
13074 66c014c71dad patch 8.0.1412: using free memory using setloclist() Christian Brabandt <cb@256bit.org> parents: 13066 diff changeset	6638 if (IS_LL_WINDOW(win) && (win->w_llist_ref->qf_refcount == 1))
66c014c71dad patch 8.0.1412: using free memory using setloclist() Christian Brabandt <cb@256bit.org> parents: 13066 diff changeset	6639 {
66c014c71dad patch 8.0.1412: using free memory using setloclist() Christian Brabandt <cb@256bit.org> parents: 13066 diff changeset	6640 /* In a location list window and none of the other windows is
66c014c71dad patch 8.0.1412: using free memory using setloclist() Christian Brabandt <cb@256bit.org> parents: 13066 diff changeset	6641 * referring to this location list. Mark the location list
66c014c71dad patch 8.0.1412: using free memory using setloclist() Christian Brabandt <cb@256bit.org> parents: 13066 diff changeset	6642 * context as still in use.
66c014c71dad patch 8.0.1412: using free memory using setloclist() Christian Brabandt <cb@256bit.org> parents: 13066 diff changeset	6643 */
66c014c71dad patch 8.0.1412: using free memory using setloclist() Christian Brabandt <cb@256bit.org> parents: 13066 diff changeset	6644 abort = mark_quickfix_ctx(win->w_llist_ref, copyID);
66c014c71dad patch 8.0.1412: using free memory using setloclist() Christian Brabandt <cb@256bit.org> parents: 13066 diff changeset	6645 if (abort)
66c014c71dad patch 8.0.1412: using free memory using setloclist() Christian Brabandt <cb@256bit.org> parents: 13066 diff changeset	6646 return abort;
66c014c71dad patch 8.0.1412: using free memory using setloclist() Christian Brabandt <cb@256bit.org> parents: 13066 diff changeset	6647 }
11412 84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6648 }
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6649
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6650 return abort;
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6651 }
170 8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	6652 #endif
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	6653
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	6654 /*
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6655 * ":[range]cbuffer [bufnr]" command.
657 b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	6656 * ":[range]caddbuffer [bufnr]" command.
798 95dac6af3b3a updated for version 7.0232 vimboss parents: 789 diff changeset	6657 * ":[range]cgetbuffer [bufnr]" command.
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	6658 * ":[range]lbuffer [bufnr]" command.
657 b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	6659 * ":[range]laddbuffer [bufnr]" command.
798 95dac6af3b3a updated for version 7.0232 vimboss parents: 789 diff changeset	6660 * ":[range]lgetbuffer [bufnr]" command.
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6661 */
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6662 void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	6663 ex_cbuffer(exarg_T *eap)
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6664 {
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6665 buf_T *buf = NULL;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	6666 qf_info_T *qi = &ql_info;
10056 21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6667 char_u *au_name = NULL;
12954 49e136457c66 patch 8.0.1353: QuickFixCmdPost is not used consistently Christian Brabandt <cb@256bit.org> parents: 12912 diff changeset	6668 int res;
14250 ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	6669 int_u save_qfid;
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	6670 win_T *wp = NULL;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	6671
10056 21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6672 switch (eap->cmdidx)
21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6673 {
21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6674 case CMD_cbuffer: au_name = (char_u *)"cbuffer"; break;
21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6675 case CMD_cgetbuffer: au_name = (char_u *)"cgetbuffer"; break;
21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6676 case CMD_caddbuffer: au_name = (char_u *)"caddbuffer"; break;
21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6677 case CMD_lbuffer: au_name = (char_u *)"lbuffer"; break;
21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6678 case CMD_lgetbuffer: au_name = (char_u *)"lgetbuffer"; break;
21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6679 case CMD_laddbuffer: au_name = (char_u *)"laddbuffer"; break;
21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6680 default: break;
21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6681 }
10346 d52d97bf675e commit https://github.com/vim/vim/commit/21662be2211675824df1771c7f169948ede40c41 Christian Brabandt <cb@256bit.org> parents: 10281 diff changeset	6682 if (au_name != NULL && apply_autocmds(EVENT_QUICKFIXCMDPRE, au_name,
d52d97bf675e commit https://github.com/vim/vim/commit/21662be2211675824df1771c7f169948ede40c41 Christian Brabandt <cb@256bit.org> parents: 10281 diff changeset	6683 curbuf->b_fname, TRUE, curbuf))
10056 21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6684 {
13380 69517d67421f patch 8.0.1564: too many #ifdefs Christian Brabandt <cb@256bit.org> parents: 13252 diff changeset	6685 #ifdef FEAT_EVAL
10346 d52d97bf675e commit https://github.com/vim/vim/commit/21662be2211675824df1771c7f169948ede40c41 Christian Brabandt <cb@256bit.org> parents: 10281 diff changeset	6686 if (aborting())
10056 21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6687 return;
21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6688 #endif
13380 69517d67421f patch 8.0.1564: too many #ifdefs Christian Brabandt <cb@256bit.org> parents: 13252 diff changeset	6689 }
10056 21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6690
13076 7c071a3f7f8e patch 8.0.1413: accessing freed memory in :cbuffer Christian Brabandt <cb@256bit.org> parents: 13074 diff changeset	6691 /* Must come after autocommands. */
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	6692 if (is_loclist_cmd(eap->cmdidx))
13076 7c071a3f7f8e patch 8.0.1413: accessing freed memory in :cbuffer Christian Brabandt <cb@256bit.org> parents: 13074 diff changeset	6693 {
7c071a3f7f8e patch 8.0.1413: accessing freed memory in :cbuffer Christian Brabandt <cb@256bit.org> parents: 13074 diff changeset	6694 qi = ll_get_or_alloc_list(curwin);
7c071a3f7f8e patch 8.0.1413: accessing freed memory in :cbuffer Christian Brabandt <cb@256bit.org> parents: 13074 diff changeset	6695 if (qi == NULL)
7c071a3f7f8e patch 8.0.1413: accessing freed memory in :cbuffer Christian Brabandt <cb@256bit.org> parents: 13074 diff changeset	6696 return;
14250 ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	6697 wp = curwin;
13076 7c071a3f7f8e patch 8.0.1413: accessing freed memory in :cbuffer Christian Brabandt <cb@256bit.org> parents: 13074 diff changeset	6698 }
7c071a3f7f8e patch 8.0.1413: accessing freed memory in :cbuffer Christian Brabandt <cb@256bit.org> parents: 13074 diff changeset	6699
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6700 if (*eap->arg == NUL)
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6701 buf = curbuf;
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6702 else if (*skipwhite(skipdigits(eap->arg)) == NUL)
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6703 buf = buflist_findnr(atoi((char *)eap->arg));
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6704 if (buf == NULL)
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6705 EMSG(_(e_invarg));
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6706 else if (buf->b_ml.ml_mfp == NULL)
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6707 EMSG(_("E681: Buffer is not loaded"));
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6708 else
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6709 {
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6710 if (eap->addr_count == 0)
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6711 {
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6712 eap->line1 = 1;
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6713 eap->line2 = buf->b_ml.ml_line_count;
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6714 }
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6715 if (eap->line1 < 1 \|\| eap->line1 > buf->b_ml.ml_line_count
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6716 \|\| eap->line2 < 1 \|\| eap->line2 > buf->b_ml.ml_line_count)
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6717 EMSG(_(e_invrange));
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6718 else
661 e93a99ef31d0 updated for version 7.0195 vimboss parents: 659 diff changeset	6719 {
13921 3b6c29f8c1a2 patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':' Christian Brabandt <cb@256bit.org> parents: 13882 diff changeset	6720 char_u qf_title = qf_cmdtitle(eap->cmdlinep);
2411 68e394361ca3 Add "q" item for 'statusline'. Add w:quickfix_title. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2296 diff changeset	6721
68e394361ca3 Add "q" item for 'statusline'. Add w:quickfix_title. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2296 diff changeset	6722 if (buf->b_sfname)
68e394361ca3 Add "q" item for 'statusline'. Add w:quickfix_title. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2296 diff changeset	6723 {
68e394361ca3 Add "q" item for 'statusline'. Add w:quickfix_title. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2296 diff changeset	6724 vim_snprintf((char *)IObuff, IOSIZE, "%s (%s)",
68e394361ca3 Add "q" item for 'statusline'. Add w:quickfix_title. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2296 diff changeset	6725 (char )qf_title, (char )buf->b_sfname);
68e394361ca3 Add "q" item for 'statusline'. Add w:quickfix_title. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2296 diff changeset	6726 qf_title = IObuff;
68e394361ca3 Add "q" item for 'statusline'. Add w:quickfix_title. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2296 diff changeset	6727 }
68e394361ca3 Add "q" item for 'statusline'. Add w:quickfix_title. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2296 diff changeset	6728
12954 49e136457c66 patch 8.0.1353: QuickFixCmdPost is not used consistently Christian Brabandt <cb@256bit.org> parents: 12912 diff changeset	6729 res = qf_init_ext(qi, qi->qf_curlist, NULL, buf, NULL, p_efm,
798 95dac6af3b3a updated for version 7.0232 vimboss parents: 789 diff changeset	6730 (eap->cmdidx != CMD_caddbuffer
95dac6af3b3a updated for version 7.0232 vimboss parents: 789 diff changeset	6731 && eap->cmdidx != CMD_laddbuffer),
2411 68e394361ca3 Add "q" item for 'statusline'. Add w:quickfix_title. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2296 diff changeset	6732 eap->line1, eap->line2,
12954 49e136457c66 patch 8.0.1353: QuickFixCmdPost is not used consistently Christian Brabandt <cb@256bit.org> parents: 12912 diff changeset	6733 qf_title, NULL);
13062 6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	6734 if (res >= 0)
6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	6735 qf_list_changed(qi, qi->qf_curlist);
14250 ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	6736
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	6737 // Remember the current quickfix list identifier, so that we can
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	6738 // check for autocommands changing the current quickfix list.
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	6739 save_qfid = qi->qf_lists[qi->qf_curlist].qf_id;
12954 49e136457c66 patch 8.0.1353: QuickFixCmdPost is not used consistently Christian Brabandt <cb@256bit.org> parents: 12912 diff changeset	6740 if (au_name != NULL)
14085 59e76d550c10 patch 8.1.0060: crash when autocommands delete the current buffer Christian Brabandt <cb@256bit.org> parents: 13992 diff changeset	6741 {
59e76d550c10 patch 8.1.0060: crash when autocommands delete the current buffer Christian Brabandt <cb@256bit.org> parents: 13992 diff changeset	6742 buf_T *curbuf_old = curbuf;
59e76d550c10 patch 8.1.0060: crash when autocommands delete the current buffer Christian Brabandt <cb@256bit.org> parents: 13992 diff changeset	6743
12954 49e136457c66 patch 8.0.1353: QuickFixCmdPost is not used consistently Christian Brabandt <cb@256bit.org> parents: 12912 diff changeset	6744 apply_autocmds(EVENT_QUICKFIXCMDPOST, au_name,
49e136457c66 patch 8.0.1353: QuickFixCmdPost is not used consistently Christian Brabandt <cb@256bit.org> parents: 12912 diff changeset	6745 curbuf->b_fname, TRUE, curbuf);
14085 59e76d550c10 patch 8.1.0060: crash when autocommands delete the current buffer Christian Brabandt <cb@256bit.org> parents: 13992 diff changeset	6746 if (curbuf != curbuf_old)
59e76d550c10 patch 8.1.0060: crash when autocommands delete the current buffer Christian Brabandt <cb@256bit.org> parents: 13992 diff changeset	6747 // Autocommands changed buffer, don't jump now, "qi" may
59e76d550c10 patch 8.1.0060: crash when autocommands delete the current buffer Christian Brabandt <cb@256bit.org> parents: 13992 diff changeset	6748 // be invalid.
59e76d550c10 patch 8.1.0060: crash when autocommands delete the current buffer Christian Brabandt <cb@256bit.org> parents: 13992 diff changeset	6749 res = 0;
59e76d550c10 patch 8.1.0060: crash when autocommands delete the current buffer Christian Brabandt <cb@256bit.org> parents: 13992 diff changeset	6750 }
14250 ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	6751 // Jump to the first error for a new list and if autocmds didn't
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	6752 // free the list.
12954 49e136457c66 patch 8.0.1353: QuickFixCmdPost is not used consistently Christian Brabandt <cb@256bit.org> parents: 12912 diff changeset	6753 if (res > 0 && (eap->cmdidx == CMD_cbuffer \|\|
14250 ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	6754 eap->cmdidx == CMD_lbuffer)
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	6755 && qflist_valid(wp, save_qfid))
14469 0211e295835e patch 8.1.0248: duplicated quickfix code Christian Brabandt <cb@256bit.org> parents: 14433 diff changeset	6756 // display the first error
0211e295835e patch 8.1.0248: duplicated quickfix code Christian Brabandt <cb@256bit.org> parents: 14433 diff changeset	6757 qf_jump_first(qi, save_qfid, eap->forceit);
661 e93a99ef31d0 updated for version 7.0195 vimboss parents: 659 diff changeset	6758 }
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6759 }
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6760 }
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6761
532 7052f11a3dc9 updated for version 7.0150 vimboss parents: 531 diff changeset	6762 #if defined(FEAT_EVAL) \|\| defined(PROTO)
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6763 /*
798 95dac6af3b3a updated for version 7.0232 vimboss parents: 789 diff changeset	6764 * ":cexpr {expr}", ":cgetexpr {expr}", ":caddexpr {expr}" command.
95dac6af3b3a updated for version 7.0232 vimboss parents: 789 diff changeset	6765 * ":lexpr {expr}", ":lgetexpr {expr}", ":laddexpr {expr}" command.
446 7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	6766 */
7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	6767 void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	6768 ex_cexpr(exarg_T *eap)
446 7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	6769 {
7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	6770 typval_T *tv;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	6771 qf_info_T *qi = &ql_info;
10056 21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6772 char_u *au_name = NULL;
12954 49e136457c66 patch 8.0.1353: QuickFixCmdPost is not used consistently Christian Brabandt <cb@256bit.org> parents: 12912 diff changeset	6773 int res;
14250 ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	6774 int_u save_qfid;
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	6775 win_T *wp = NULL;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	6776
10056 21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6777 switch (eap->cmdidx)
21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6778 {
21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6779 case CMD_cexpr: au_name = (char_u *)"cexpr"; break;
21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6780 case CMD_cgetexpr: au_name = (char_u *)"cgetexpr"; break;
21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6781 case CMD_caddexpr: au_name = (char_u *)"caddexpr"; break;
21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6782 case CMD_lexpr: au_name = (char_u *)"lexpr"; break;
21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6783 case CMD_lgetexpr: au_name = (char_u *)"lgetexpr"; break;
21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6784 case CMD_laddexpr: au_name = (char_u *)"laddexpr"; break;
21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6785 default: break;
21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6786 }
10346 d52d97bf675e commit https://github.com/vim/vim/commit/21662be2211675824df1771c7f169948ede40c41 Christian Brabandt <cb@256bit.org> parents: 10281 diff changeset	6787 if (au_name != NULL && apply_autocmds(EVENT_QUICKFIXCMDPRE, au_name,
d52d97bf675e commit https://github.com/vim/vim/commit/21662be2211675824df1771c7f169948ede40c41 Christian Brabandt <cb@256bit.org> parents: 10281 diff changeset	6788 curbuf->b_fname, TRUE, curbuf))
10056 21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6789 {
13380 69517d67421f patch 8.0.1564: too many #ifdefs Christian Brabandt <cb@256bit.org> parents: 13252 diff changeset	6790 #ifdef FEAT_EVAL
10346 d52d97bf675e commit https://github.com/vim/vim/commit/21662be2211675824df1771c7f169948ede40c41 Christian Brabandt <cb@256bit.org> parents: 10281 diff changeset	6791 if (aborting())
10056 21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6792 return;
21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6793 #endif
13380 69517d67421f patch 8.0.1564: too many #ifdefs Christian Brabandt <cb@256bit.org> parents: 13252 diff changeset	6794 }
10056 21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6795
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	6796 if (is_loclist_cmd(eap->cmdidx))
13090 a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	6797 {
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	6798 qi = ll_get_or_alloc_list(curwin);
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	6799 if (qi == NULL)
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	6800 return;
14250 ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	6801 wp = curwin;
13090 a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	6802 }
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	6803
625 81fe2ccc1207 updated for version 7.0179 vimboss parents: 581 diff changeset	6804 /* Evaluate the expression. When the result is a string or a list we can
81fe2ccc1207 updated for version 7.0179 vimboss parents: 581 diff changeset	6805 * use it to fill the errorlist. */
446 7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	6806 tv = eval_expr(eap->arg, NULL);
625 81fe2ccc1207 updated for version 7.0179 vimboss parents: 581 diff changeset	6807 if (tv != NULL)
81fe2ccc1207 updated for version 7.0179 vimboss parents: 581 diff changeset	6808 {
81fe2ccc1207 updated for version 7.0179 vimboss parents: 581 diff changeset	6809 if ((tv->v_type == VAR_STRING && tv->vval.v_string != NULL)
81fe2ccc1207 updated for version 7.0179 vimboss parents: 581 diff changeset	6810 \|\| (tv->v_type == VAR_LIST && tv->vval.v_list != NULL))
81fe2ccc1207 updated for version 7.0179 vimboss parents: 581 diff changeset	6811 {
12954 49e136457c66 patch 8.0.1353: QuickFixCmdPost is not used consistently Christian Brabandt <cb@256bit.org> parents: 12912 diff changeset	6812 res = qf_init_ext(qi, qi->qf_curlist, NULL, NULL, tv, p_efm,
798 95dac6af3b3a updated for version 7.0232 vimboss parents: 789 diff changeset	6813 (eap->cmdidx != CMD_caddexpr
95dac6af3b3a updated for version 7.0232 vimboss parents: 789 diff changeset	6814 && eap->cmdidx != CMD_laddexpr),
13921 3b6c29f8c1a2 patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':' Christian Brabandt <cb@256bit.org> parents: 13882 diff changeset	6815 (linenr_T)0, (linenr_T)0,
3b6c29f8c1a2 patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':' Christian Brabandt <cb@256bit.org> parents: 13882 diff changeset	6816 qf_cmdtitle(*eap->cmdlinep), NULL);
13062 6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	6817 if (res >= 0)
6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	6818 qf_list_changed(qi, qi->qf_curlist);
14250 ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	6819
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	6820 // Remember the current quickfix list identifier, so that we can
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	6821 // check for autocommands changing the current quickfix list.
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	6822 save_qfid = qi->qf_lists[qi->qf_curlist].qf_id;
12954 49e136457c66 patch 8.0.1353: QuickFixCmdPost is not used consistently Christian Brabandt <cb@256bit.org> parents: 12912 diff changeset	6823 if (au_name != NULL)
49e136457c66 patch 8.0.1353: QuickFixCmdPost is not used consistently Christian Brabandt <cb@256bit.org> parents: 12912 diff changeset	6824 apply_autocmds(EVENT_QUICKFIXCMDPOST, au_name,
49e136457c66 patch 8.0.1353: QuickFixCmdPost is not used consistently Christian Brabandt <cb@256bit.org> parents: 12912 diff changeset	6825 curbuf->b_fname, TRUE, curbuf);
14250 ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	6826
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	6827 // Jump to the first error for a new list and if autocmds didn't
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	6828 // free the list.
14111 678e326bf7eb patch 8.1.0073: crash when autocommands call setloclist() Christian Brabandt <cb@256bit.org> parents: 14085 diff changeset	6829 if (res > 0 && (eap->cmdidx == CMD_cexpr
678e326bf7eb patch 8.1.0073: crash when autocommands call setloclist() Christian Brabandt <cb@256bit.org> parents: 14085 diff changeset	6830 \|\| eap->cmdidx == CMD_lexpr)
14250 ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	6831 && qflist_valid(wp, save_qfid))
14469 0211e295835e patch 8.1.0248: duplicated quickfix code Christian Brabandt <cb@256bit.org> parents: 14433 diff changeset	6832 // display the first error
0211e295835e patch 8.1.0248: duplicated quickfix code Christian Brabandt <cb@256bit.org> parents: 14433 diff changeset	6833 qf_jump_first(qi, save_qfid, eap->forceit);
625 81fe2ccc1207 updated for version 7.0179 vimboss parents: 581 diff changeset	6834 }
81fe2ccc1207 updated for version 7.0179 vimboss parents: 581 diff changeset	6835 else
626 732c7ae5743e updated for version 7.0180 vimboss parents: 625 diff changeset	6836 EMSG(_("E777: String or List expected"));
625 81fe2ccc1207 updated for version 7.0179 vimboss parents: 581 diff changeset	6837 free_tv(tv);
81fe2ccc1207 updated for version 7.0179 vimboss parents: 581 diff changeset	6838 }
446 7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	6839 }
532 7052f11a3dc9 updated for version 7.0150 vimboss parents: 531 diff changeset	6840 #endif
446 7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	6841
7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	6842 /*
13764 7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6843 * Get the location list for ":lhelpgrep"
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6844 */
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6845 static qf_info_T *
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6846 hgr_get_ll(int *new_ll)
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6847 {
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6848 win_T *wp;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6849 qf_info_T *qi;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6850
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6851 /* If the current window is a help window, then use it */
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6852 if (bt_help(curwin->w_buffer))
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6853 wp = curwin;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6854 else
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6855 /* Find an existing help window */
13882 f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	6856 wp = qf_find_help_win();
13764 7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6857
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6858 if (wp == NULL) /* Help window not found */
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6859 qi = NULL;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6860 else
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6861 qi = wp->w_llist;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6862
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6863 if (qi == NULL)
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6864 {
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6865 /* Allocate a new location list for help text matches */
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6866 if ((qi = ll_new_list()) == NULL)
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6867 return NULL;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6868 *new_ll = TRUE;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6869 }
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6870
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6871 return qi;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6872 }
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6873
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6874 /*
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6875 * Search for a pattern in a help file.
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6876 */
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6877 static void
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6878 hgr_search_file(
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6879 qf_info_T *qi,
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6880 char_u *fname,
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6881 #ifdef FEAT_MBYTE
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6882 vimconv_T *p_vc,
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6883 #endif
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6884 regmatch_T *p_regmatch)
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6885 {
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6886 FILE *fd;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6887 long lnum;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6888
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6889 fd = mch_fopen((char *)fname, "r");
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6890 if (fd == NULL)
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6891 return;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6892
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6893 lnum = 1;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6894 while (!vim_fgets(IObuff, IOSIZE, fd) && !got_int)
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6895 {
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6896 char_u *line = IObuff;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6897 #ifdef FEAT_MBYTE
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6898 /* Convert a line if 'encoding' is not utf-8 and
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6899 * the line contains a non-ASCII character. */
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6900 if (p_vc->vc_type != CONV_NONE
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6901 && has_non_ascii(IObuff))
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6902 {
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6903 line = string_convert(p_vc, IObuff, NULL);
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6904 if (line == NULL)
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6905 line = IObuff;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6906 }
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6907 #endif
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6908
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6909 if (vim_regexec(p_regmatch, line, (colnr_T)0))
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6910 {
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6911 int l = (int)STRLEN(line);
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6912
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6913 /* remove trailing CR, LF, spaces, etc. */
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6914 while (l > 0 && line[l - 1] <= ' ')
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6915 line[--l] = NUL;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6916
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6917 if (qf_add_entry(qi,
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6918 qi->qf_curlist,
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6919 NULL, /* dir */
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6920 fname,
13821 98274127d675 patch 8.0.1782: no simple way to label quickfix entries Christian Brabandt <cb@256bit.org> parents: 13819 diff changeset	6921 NULL,
13764 7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6922 0,
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6923 line,
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6924 lnum,
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6925 (int)(p_regmatch->startp[0] - line)
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6926 + 1, /* col */
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6927 FALSE, /* vis_col */
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6928 NULL, /* search pattern */
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6929 0, /* nr */
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6930 1, /* type */
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6931 TRUE /* valid */
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6932 ) == FAIL)
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6933 {
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6934 got_int = TRUE;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6935 #ifdef FEAT_MBYTE
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6936 if (line != IObuff)
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6937 vim_free(line);
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6938 #endif
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6939 break;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6940 }
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6941 }
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6942 #ifdef FEAT_MBYTE
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6943 if (line != IObuff)
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6944 vim_free(line);
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6945 #endif
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6946 ++lnum;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6947 line_breakcheck();
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6948 }
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6949 fclose(fd);
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6950 }
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6951
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6952 /*
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6953 * Search for a pattern in all the help files in the doc directory under
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6954 * the given directory.
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6955 */
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6956 static void
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6957 hgr_search_files_in_dir(
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6958 qf_info_T *qi,
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6959 char_u *dirname,
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6960 regmatch_T *p_regmatch
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6961 #ifdef FEAT_MBYTE
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6962 , vimconv_T *p_vc
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6963 #endif
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6964 #ifdef FEAT_MULTI_LANG
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6965 , char_u *lang
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6966 #endif
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6967 )
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6968 {
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6969 int fcount;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6970 char_u **fnames;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6971 int fi;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6972
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6973 /* Find all ".txt" and ".??x" files in the "doc" directory. */
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6974 add_pathsep(dirname);
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6975 STRCAT(dirname, "doc/*.\$txt\\\|??x\$");
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6976 if (gen_expand_wildcards(1, &dirname, &fcount,
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6977 &fnames, EW_FILE\|EW_SILENT) == OK
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6978 && fcount > 0)
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6979 {
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6980 for (fi = 0; fi < fcount && !got_int; ++fi)
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6981 {
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6982 #ifdef FEAT_MULTI_LANG
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6983 /* Skip files for a different language. */
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6984 if (lang != NULL
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6985 && STRNICMP(lang, fnames[fi]
13821 98274127d675 patch 8.0.1782: no simple way to label quickfix entries Christian Brabandt <cb@256bit.org> parents: 13819 diff changeset	6986 + STRLEN(fnames[fi]) - 3, 2) != 0
13764 7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6987 && !(STRNICMP(lang, "en", 2) == 0
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6988 && STRNICMP("txt", fnames[fi]
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6989 + STRLEN(fnames[fi]) - 3, 3) == 0))
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6990 continue;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6991 #endif
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6992
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6993 hgr_search_file(qi, fnames[fi],
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6994 #ifdef FEAT_MBYTE
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6995 p_vc,
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6996 #endif
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6997 p_regmatch);
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6998 }
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6999 FreeWild(fcount, fnames);
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	7000 }
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	7001 }
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	7002
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	7003 /*
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	7004 * Search for a pattern in all the help files in the 'runtimepath'
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	7005 * and add the matches to a quickfix list.
14603 d1b69129db99 patch 8.1.0315: helpgrep with language doesn't work properly Christian Brabandt <cb@256bit.org> parents: 14560 diff changeset	7006 * 'lang' is the language specifier. If supplied, then only matches in the
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	7007 * specified language are found.
13764 7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	7008 */
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	7009 static void
14603 d1b69129db99 patch 8.1.0315: helpgrep with language doesn't work properly Christian Brabandt <cb@256bit.org> parents: 14560 diff changeset	7010 hgr_search_in_rtp(qf_info_T qi, regmatch_T p_regmatch, char_u *lang)
13764 7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	7011 {
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	7012 char_u *p;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	7013
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	7014 #ifdef FEAT_MBYTE
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	7015 vimconv_T vc;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	7016
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	7017 /* Help files are in utf-8 or latin1, convert lines when 'encoding'
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	7018 * differs. */
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	7019 vc.vc_type = CONV_NONE;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	7020 if (!enc_utf8)
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	7021 convert_setup(&vc, (char_u *)"utf-8", p_enc);
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	7022 #endif
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	7023
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	7024
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	7025 /* Go through all the directories in 'runtimepath' */
13764 7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	7026 p = p_rtp;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	7027 while (*p != NUL && !got_int)
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	7028 {
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	7029 copy_option_part(&p, NameBuff, MAXPATHL, ",");
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	7030
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	7031 hgr_search_files_in_dir(qi, NameBuff, p_regmatch
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	7032 #ifdef FEAT_MBYTE
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	7033 , &vc
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	7034 #endif
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	7035 #ifdef FEAT_MULTI_LANG
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	7036 , lang
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	7037 #endif
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	7038 );
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	7039 }
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	7040
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	7041 #ifdef FEAT_MBYTE
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	7042 if (vc.vc_type != CONV_NONE)
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	7043 convert_setup(&vc, NULL, NULL);
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	7044 #endif
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	7045 }
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	7046
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	7047 /*
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	7048 * ":helpgrep {pattern}"
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	7049 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	7050 void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	7051 ex_helpgrep(exarg_T *eap)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	7052 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	7053 regmatch_T regmatch;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	7054 char_u *save_cpo;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	7055 qf_info_T *qi = &ql_info;
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	7056 int new_qi = FALSE;
3269 5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	7057 char_u *au_name = NULL;
14603 d1b69129db99 patch 8.1.0315: helpgrep with language doesn't work properly Christian Brabandt <cb@256bit.org> parents: 14560 diff changeset	7058 char_u *lang = NULL;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	7059
3269 5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	7060 switch (eap->cmdidx)
5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	7061 {
5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	7062 case CMD_helpgrep: au_name = (char_u *)"helpgrep"; break;
5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	7063 case CMD_lhelpgrep: au_name = (char_u *)"lhelpgrep"; break;
5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	7064 default: break;
5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	7065 }
10346 d52d97bf675e commit https://github.com/vim/vim/commit/21662be2211675824df1771c7f169948ede40c41 Christian Brabandt <cb@256bit.org> parents: 10281 diff changeset	7066 if (au_name != NULL && apply_autocmds(EVENT_QUICKFIXCMDPRE, au_name,
d52d97bf675e commit https://github.com/vim/vim/commit/21662be2211675824df1771c7f169948ede40c41 Christian Brabandt <cb@256bit.org> parents: 10281 diff changeset	7067 curbuf->b_fname, TRUE, curbuf))
3269 5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	7068 {
13380 69517d67421f patch 8.0.1564: too many #ifdefs Christian Brabandt <cb@256bit.org> parents: 13252 diff changeset	7069 #ifdef FEAT_EVAL
10346 d52d97bf675e commit https://github.com/vim/vim/commit/21662be2211675824df1771c7f169948ede40c41 Christian Brabandt <cb@256bit.org> parents: 10281 diff changeset	7070 if (aborting())
3269 5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	7071 return;
5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	7072 #endif
13380 69517d67421f patch 8.0.1564: too many #ifdefs Christian Brabandt <cb@256bit.org> parents: 13252 diff changeset	7073 }
3269 5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	7074
14603 d1b69129db99 patch 8.1.0315: helpgrep with language doesn't work properly Christian Brabandt <cb@256bit.org> parents: 14560 diff changeset	7075 // Make 'cpoptions' empty, the 'l' flag should not be used here.
3269 5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	7076 save_cpo = p_cpo;
5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	7077 p_cpo = empty_option;
5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	7078
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	7079 if (is_loclist_cmd(eap->cmdidx))
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	7080 {
13764 7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	7081 qi = hgr_get_ll(&new_qi);
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	7082 if (qi == NULL)
13764 7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	7083 return;
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	7084 }
d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	7085
14603 d1b69129db99 patch 8.1.0315: helpgrep with language doesn't work properly Christian Brabandt <cb@256bit.org> parents: 14560 diff changeset	7086 #ifdef FEAT_MULTI_LANG
d1b69129db99 patch 8.1.0315: helpgrep with language doesn't work properly Christian Brabandt <cb@256bit.org> parents: 14560 diff changeset	7087 // Check for a specified language
d1b69129db99 patch 8.1.0315: helpgrep with language doesn't work properly Christian Brabandt <cb@256bit.org> parents: 14560 diff changeset	7088 lang = check_help_lang(eap->arg);
d1b69129db99 patch 8.1.0315: helpgrep with language doesn't work properly Christian Brabandt <cb@256bit.org> parents: 14560 diff changeset	7089 #endif
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	7090 regmatch.regprog = vim_regcomp(eap->arg, RE_MAGIC + RE_STRING);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	7091 regmatch.rm_ic = FALSE;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	7092 if (regmatch.regprog != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	7093 {
14603 d1b69129db99 patch 8.1.0315: helpgrep with language doesn't work properly Christian Brabandt <cb@256bit.org> parents: 14560 diff changeset	7094 // create a new quickfix list
13921 3b6c29f8c1a2 patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':' Christian Brabandt <cb@256bit.org> parents: 13882 diff changeset	7095 qf_new_list(qi, qf_cmdtitle(*eap->cmdlinep));
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	7096
14603 d1b69129db99 patch 8.1.0315: helpgrep with language doesn't work properly Christian Brabandt <cb@256bit.org> parents: 14560 diff changeset	7097 hgr_search_in_rtp(qi, &regmatch, lang);
3257 75217982ea46 updated for version 7.3.397 Bram Moolenaar <bram@vim.org> parents: 3242 diff changeset	7098
4805 66803af09906 updated for version 7.3.1149 Bram Moolenaar <bram@vim.org> parents: 4371 diff changeset	7099 vim_regfree(regmatch.regprog);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	7100
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	7101 qi->qf_lists[qi->qf_curlist].qf_nonevalid = FALSE;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	7102 qi->qf_lists[qi->qf_curlist].qf_ptr =
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	7103 qi->qf_lists[qi->qf_curlist].qf_start;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	7104 qi->qf_lists[qi->qf_curlist].qf_index = 1;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	7105 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	7106
1672 fddea6c03dee updated for version 7.2b-004 vimboss parents: 1668 diff changeset	7107 if (p_cpo == empty_option)
fddea6c03dee updated for version 7.2b-004 vimboss parents: 1668 diff changeset	7108 p_cpo = save_cpo;
fddea6c03dee updated for version 7.2b-004 vimboss parents: 1668 diff changeset	7109 else
14603 d1b69129db99 patch 8.1.0315: helpgrep with language doesn't work properly Christian Brabandt <cb@256bit.org> parents: 14560 diff changeset	7110 // Darn, some plugin changed the value.
1672 fddea6c03dee updated for version 7.2b-004 vimboss parents: 1668 diff changeset	7111 free_string_option(save_cpo);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	7112
13062 6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	7113 qf_list_changed(qi, qi->qf_curlist);
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	7114 qf_update_buffer(qi, NULL);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	7115
3269 5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	7116 if (au_name != NULL)
5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	7117 {
5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	7118 apply_autocmds(EVENT_QUICKFIXCMDPOST, au_name,
5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	7119 curbuf->b_fname, TRUE, curbuf);
14560 8413e66d00a1 patch 8.1.0293: checks for type of stack is cryptic Christian Brabandt <cb@256bit.org> parents: 14552 diff changeset	7120 if (!new_qi && IS_LL_STACK(qi) && qf_find_buf(qi) == NULL)
3269 5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	7121 /* autocommands made "qi" invalid */
5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	7122 return;
5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	7123 }
5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	7124
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	7125 /* Jump to first match. */
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	7126 if (!qf_list_empty(qi, qi->qf_curlist))
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	7127 qf_jump(qi, 0, 0, FALSE);
9 4102fb4ea781 updated for version 7.0002 vimboss parents: 7 diff changeset	7128 else
4102fb4ea781 updated for version 7.0002 vimboss parents: 7 diff changeset	7129 EMSG2(_(e_nomatch2), eap->arg);
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	7130
d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	7131 if (eap->cmdidx == CMD_lhelpgrep)
d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	7132 {
14603 d1b69129db99 patch 8.1.0315: helpgrep with language doesn't work properly Christian Brabandt <cb@256bit.org> parents: 14560 diff changeset	7133 // If the help window is not opened or if it already points to the
d1b69129db99 patch 8.1.0315: helpgrep with language doesn't work properly Christian Brabandt <cb@256bit.org> parents: 14560 diff changeset	7134 // correct location list, then free the new location list.
11800 5ceaecedbad2 patch 8.0.0782: using freed memory in quickfix code Christian Brabandt <cb@256bit.org> parents: 11788 diff changeset	7135 if (!bt_help(curwin->w_buffer) \|\| curwin->w_llist == qi)
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	7136 {
d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	7137 if (new_qi)
d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	7138 ll_free_all(&qi);
d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	7139 }
d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	7140 else if (curwin->w_llist == NULL)
d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	7141 curwin->w_llist = qi;
d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	7142 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	7143 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	7144
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	7145 #endif /* FEAT_QUICKFIX */

Mercurial > vim

annotate src/quickfix.c @ 14864:40ef13331e02