vim: src/quickfix.c annotate

annotate src/quickfix.c @ 14667:289d3fac3399

Added tag v8.1.0346 for changeset 70fc1a842e2966e67826f2b4bc0121fbf33be3d5

author	Christian Brabandt <cb@256bit.org>
date	Sun, 02 Sep 2018 15:30:10 +0200
parents	8770189c3e22
children	3ca7aba1116e

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);
7805 0b6c37dd858d commit https://github.com/vim/vim/commit/baaa7e9ec7398a813e21285c272fa99792642077 Christian Brabandt <cb@256bit.org> parents: 7710 diff changeset	139 static void qf_free(qf_info_T *qi, int idx);
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 *);
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	144 static char_u qf_guess_filepath(qf_info_T qi, int qf_idx, 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);
7805 0b6c37dd858d commit https://github.com/vim/vim/commit/baaa7e9ec7398a813e21285c272fa99792642077 Christian Brabandt <cb@256bit.org> parents: 7710 diff changeset	150 static void qf_set_title_var(qf_info_T *qi);
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	151 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	152 static char_u *get_mef_name(void);
0b6c37dd858d commit https://github.com/vim/vim/commit/baaa7e9ec7398a813e21285c272fa99792642077 Christian Brabandt <cb@256bit.org> parents: 7710 diff changeset	153 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	154 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	155 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	156 static qf_info_T ll_get_or_alloc_list(win_T );
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	157
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	158 /* Quickfix window check helper macro */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	159 #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	160 /* Location list window check helper macro */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	161 #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	162
8413e66d00a1 patch 8.1.0293: checks for type of stack is cryptic Christian Brabandt <cb@256bit.org> parents: 14552 diff changeset	163 // 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	164 #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	165 #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	166
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	167 /*
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	168 * Return location list for window 'wp'
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	169 * For location list window, return the referenced location list
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	170 */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	171 #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	172
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	173 /*
11443 30b3775addb2 patch 8.0.0605: the quickfix cached buffer may become invalid Christian Brabandt <cb@256bit.org> parents: 11426 diff changeset	174 * 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	175 * 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	176 */
11447 698ee9d4fe9f patch 8.0.0607: after :bwipe + :new bufref might still be valid Christian Brabandt <cb@256bit.org> parents: 11445 diff changeset	177 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	178 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	179
13090 a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	180 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	181 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	182
11443 30b3775addb2 patch 8.0.0605: the quickfix cached buffer may become invalid Christian Brabandt <cb@256bit.org> parents: 11426 diff changeset	183 /*
9033 0536d1469b67 commit https://github.com/vim/vim/commit/6be8c8e165204b8aa4eeb8a52be87a58d8b41b9e Christian Brabandt <cb@256bit.org> parents: 8932 diff changeset	184 * 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	185 */
0536d1469b67 commit https://github.com/vim/vim/commit/6be8c8e165204b8aa4eeb8a52be87a58d8b41b9e Christian Brabandt <cb@256bit.org> parents: 8932 diff changeset	186 #define LINE_MAXLEN 4096
0536d1469b67 commit https://github.com/vim/vim/commit/6be8c8e165204b8aa4eeb8a52be87a58d8b41b9e Christian Brabandt <cb@256bit.org> parents: 8932 diff changeset	187
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	188 static struct fmtpattern
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	189 {
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	190 char_u convchar;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	191 char *pattern;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	192 } 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	193 {
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	194 {'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	195 {'n', "\\d\\+"},
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	196 {'l', "\\d\\+"},
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	197 {'c', "\\d\\+"},
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	198 {'t', "."},
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	199 {'m', ".\\+"},
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	200 {'r', ".*"},
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	201 {'p', "[- .]*"},
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	202 {'v', "\\d\\+"},
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	203 {'s', ".\\+"},
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	204 {'o', ".\\+"}
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	205 };
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	206
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	207 /*
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	208 * 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	209 * 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	210 * 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	211 * 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	212 */
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	213 static char_u *
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	214 efmpat_to_regpat(
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	215 char_u *efmpat,
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	216 char_u *regpat,
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	217 efm_T *efminfo,
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	218 int idx,
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	219 int round,
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	220 char_u *errmsg)
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	221 {
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	222 char_u *srcptr;
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	223
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	224 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	225 {
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	226 /* 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	227 sprintf((char *)errmsg,
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	228 _("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	229 EMSG(errmsg);
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	230 return NULL;
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	231 }
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	232 if ((idx && 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 *)"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	234 \|\| (idx == 6
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	235 && 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	236 {
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	237 sprintf((char *)errmsg,
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	238 _("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	239 EMSG(errmsg);
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	240 return NULL;
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	241 }
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	242 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	243 *regpat++ = '\\';
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	244 *regpat++ = '(';
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	245 #ifdef BACKSLASH_IN_FILENAME
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	246 if (*efmpat == 'f')
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	247 {
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	248 /* 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	249 * 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	250 * "\%(\a:\)\=" */
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	251 STRCPY(regpat, "\\%(\\a:\\)\\=");
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	252 regpat += 10;
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	253 }
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	254 #endif
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	255 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	256 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	257 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	258 {
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	259 /* 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	260 * 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	261 * 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	262 * 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	263 * follows should work. */
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	264 STRCPY(regpat, ".\\{-1,}");
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	265 regpat += 7;
13984 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 else
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	268 {
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	269 /* 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	270 * 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	271 STRCPY(regpat, "\\f\\+");
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	272 regpat += 4;
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	273 }
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 else
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	276 {
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	277 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	278 while ((regpat = srcptr++) != NUL)
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 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	281 *regpat++ = '\\';
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	282 *regpat++ = ')';
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	283
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	284 return regpat;
13984 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
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	287 /*
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	288 * 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	289 * 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	290 */
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	291 static char_u *
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	292 scanf_fmt_to_regpat(
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	293 char_u **pefmp,
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	294 char_u *efm,
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	295 int len,
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	296 char_u *regpat,
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	297 char_u *errmsg)
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	298 {
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	299 char_u efmp = pefmp;
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	300
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	301 if (efmp == '[' \|\| efmp == '\\')
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	302 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	303 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	304 {
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	305 if (efmp[1] == '^')
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	306 regpat++ = ++efmp;
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	307 if (efmp < efm + len)
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	308 {
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	309 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	310 while (efmp < efm + len
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	311 && (regpat++ = ++efmp) != ']')
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	312 /* skip */;
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	313 if (efmp == efm + len)
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	314 {
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	315 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	316 return NULL;
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 }
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	319 }
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	320 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	321 regpat++ = ++efmp;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	322 *regpat++ = '\\';
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	323 *regpat++ = '+';
13984 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 else
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	326 {
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	327 /* 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	328 sprintf((char *)errmsg,
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	329 _("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	330 EMSG(errmsg);
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	331 return NULL;
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	332 }
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	333
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	334 *pefmp = efmp;
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	335
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	336 return regpat;
13984 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
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	339 /*
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	340 * 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	341 */
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	342 static char_u *
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	343 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	344 {
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 )"+-", efmp) != NULL)
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	346 efminfo->flags = *efmp++;
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	347 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	348 efminfo->prefix = *efmp;
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	349 else
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	350 {
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	351 sprintf((char *)errmsg,
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	352 _("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	353 EMSG(errmsg);
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	354 return NULL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	355 }
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 return efmp;
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
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	360 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	361 * 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	362 * 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	363 * 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	364 * Returns OK or FAIL.
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	365 */
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	366 static int
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	367 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	368 char_u *efm,
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	369 int len,
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	370 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	371 char_u *regpat,
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	372 char_u *errmsg)
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	373 {
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	374 char_u *ptr;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	375 char_u *efmp;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	376 int round;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	377 int idx = 0;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	378
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	379 /*
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	380 * 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	381 */
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	382 ptr = regpat;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	383 *ptr++ = '^';
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	384 round = 0;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	385 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	386 {
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	387 if (*efmp == '%')
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	388 {
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	389 ++efmp;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	390 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	391 if (fmt_pat[idx].convchar == *efmp)
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	392 break;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	393 if (idx < FMT_PATTERNS)
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	394 {
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	395 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	396 errmsg);
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	397 if (ptr == NULL)
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	398 return FAIL;
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	399 round++;
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	400 }
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	401 else if (efmp == '')
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	402 {
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	403 ++efmp;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	404 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	405 if (ptr == NULL)
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	406 return FAIL;
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	407 }
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	408 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	409 ptr++ = efmp; /* regexp magic characters */
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 ptr++ = '';
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	412 else if (*efmp == '>')
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	413 fmt_ptr->conthere = TRUE;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	414 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	415 {
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	416 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	417 * 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	418 * option part
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	419 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	420 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	421 if (efmp == NULL)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	422 return FAIL;
9365 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 else
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	425 {
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	426 sprintf((char *)errmsg,
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	427 _("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	428 EMSG(errmsg);
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	429 return FAIL;
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	430 }
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 else /* copy normal character */
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	433 {
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	434 if (*efmp == '\\' && efmp + 1 < efm + len)
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	435 ++efmp;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	436 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	437 ptr++ = '\\'; / escape regexp atoms */
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	438 if (*efmp)
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	439 ptr++ = efmp;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	440 }
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	441 }
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	442 *ptr++ = '$';
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	443 *ptr = NUL;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	444
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	445 return OK;
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
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	448 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	449 * Free the 'errorformat' information list
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	450 */
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	451 static void
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	452 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	453 {
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	454 efm_T *efm_ptr;
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 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	457 {
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	458 *efm_first = efm_ptr->next;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	459 vim_regfree(efm_ptr->prog);
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	460 vim_free(efm_ptr);
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	461 }
10367 4e4e116e3689 commit https://github.com/vim/vim/commit/63bed3d319b5d90765dbdae93a3579b6322d79fb Christian Brabandt <cb@256bit.org> parents: 10359 diff changeset	462 fmt_start = NULL;
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	463 }
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	464
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	465 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	466 * 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	467 * a regular expression pattern.
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	468 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	469 static int
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	470 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	471 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	472 int sz;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	473 int i;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	474
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	475 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	476 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	477 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	478 #ifdef BACKSLASH_IN_FILENAME
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	479 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	480 #else
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	481 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	482 #endif
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 return sz;
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
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 * 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	489 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	490 static int
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	491 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	492 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	493 int len;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	494
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	495 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	496 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	497 ++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 return len;
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
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	502 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	503 * 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	504 * 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	505 * the parsed 'errorformat' option.
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	506 */
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	507 static efm_T *
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	508 parse_efm_option(char_u *efm)
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	509 {
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	510 char_u *errmsg = NULL;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	511 int errmsglen;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	512 efm_T *fmt_ptr = NULL;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	513 efm_T *fmt_first = NULL;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	514 efm_T *fmt_last = NULL;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	515 char_u *fmtstr = NULL;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	516 int len;
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	517 int sz;
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	518
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	519 errmsglen = CMDBUFFSIZE + 1;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	520 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	521 if (errmsg == NULL)
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	522 goto parse_efm_end;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	523
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	524 /*
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	525 * 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	526 * 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	527 */
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	528
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	529 /*
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	530 * 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	531 */
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	532 sz = efm_regpat_bufsz(efm);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	533 if ((fmtstr = alloc(sz)) == NULL)
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	534 goto parse_efm_error;
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 while (efm[0] != NUL)
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	537 {
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 * 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	540 */
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	541 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	542 if (fmt_ptr == NULL)
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	543 goto parse_efm_error;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	544 if (fmt_first == NULL) /* first one */
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	545 fmt_first = fmt_ptr;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	546 else
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	547 fmt_last->next = fmt_ptr;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	548 fmt_last = fmt_ptr;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	549
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	550 /*
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	551 * 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	552 */
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	553 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	554
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	555 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	556 goto parse_efm_error;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	557 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	558 goto parse_efm_error;
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 * Advance to next part
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 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	563 }
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	564
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	565 if (fmt_first == NULL) /* nothing found */
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	566 EMSG(_("E378: 'errorformat' contains no pattern"));
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 goto parse_efm_end;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	569
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	570 parse_efm_error:
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	571 free_efm_list(&fmt_first);
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	572
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	573 parse_efm_end:
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	574 vim_free(fmtstr);
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	575 vim_free(errmsg);
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 return fmt_first;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	578 }
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	579
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	580 enum {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	581 QF_FAIL = 0,
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	582 QF_OK = 1,
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	583 QF_END_OF_INPUT = 2,
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	584 QF_NOMEM = 3,
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	585 QF_IGNORE_LINE = 4,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	586 QF_MULTISCAN = 5,
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	587 };
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	588
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	589 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	590 * 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	591 * list.
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	592 */
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	593 typedef struct {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	594 char_u *linebuf;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	595 int linelen;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	596 char_u *growbuf;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	597 int growbufsiz;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	598 FILE *fd;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	599 typval_T *tv;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	600 char_u *p_str;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	601 listitem_T *p_li;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	602 buf_T *buf;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	603 linenr_T buflnum;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	604 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	605 vimconv_T vc;
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	606 } qfstate_T;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	607
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	608 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	609 * 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	610 */
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	611 static char_u *
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	612 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	613 {
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	614 char_u *p;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	615
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	616 /*
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	617 * 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	618 * 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	619 */
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	620 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	621 if (state->growbuf == NULL)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	622 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	623 state->growbuf = alloc(state->linelen + 1);
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	624 if (state->growbuf == NULL)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	625 return NULL;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	626 state->growbufsiz = state->linelen;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	627 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	628 else if (state->linelen > state->growbufsiz)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	629 {
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	630 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	631 return NULL;
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	632 state->growbuf = p;
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	633 state->growbufsiz = state->linelen;
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 return state->growbuf;
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
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 * 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	640 */
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	641 static int
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	642 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	643 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	644 /* 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	645 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	646 char_u *p;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	647 int len;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	648
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	649 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	650 return QF_END_OF_INPUT;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	651
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	652 p = vim_strchr(p_str, '\n');
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	653 if (p != NULL)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	654 len = (int)(p - p_str) + 1;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	655 else
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	656 len = (int)STRLEN(p_str);
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 if (len > IOSIZE - 2)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	659 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	660 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	661 if (state->linebuf == NULL)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	662 return QF_NOMEM;
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 else
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	665 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	666 state->linebuf = IObuff;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	667 state->linelen = len;
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 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	670
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	671 /*
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	672 * 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	673 * line if it exceeds LINE_MAXLEN.
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	674 */
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	675 p_str += len;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	676 state->p_str = p_str;
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 return QF_OK;
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
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 * 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	683 */
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	684 static int
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	685 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	686 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	687 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	688 int len;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	689
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	690 while (p_li != NULL
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	691 && (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	692 \|\| 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	693 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	694
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	695 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	696 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	697 state->p_li = NULL;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	698 return QF_END_OF_INPUT;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	699 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	700
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	701 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	702 if (len > IOSIZE - 2)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	703 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	704 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	705 if (state->linebuf == NULL)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	706 return QF_NOMEM;
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 else
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	709 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	710 state->linebuf = IObuff;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	711 state->linelen = len;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	712 }
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 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	715
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	716 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	717 return QF_OK;
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
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 * 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	722 */
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	723 static int
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	724 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	725 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	726 char_u *p_buf = NULL;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	727 int len;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	728
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	729 /* 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	730 if (state->buflnum > state->lnumlast)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	731 return QF_END_OF_INPUT;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	732
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	733 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	734 state->buflnum += 1;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	735
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	736 len = (int)STRLEN(p_buf);
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	737 if (len > IOSIZE - 2)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	738 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	739 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	740 if (state->linebuf == NULL)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	741 return QF_NOMEM;
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 else
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	744 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	745 state->linebuf = IObuff;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	746 state->linelen = len;
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 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	749
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	750 return QF_OK;
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
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 * 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	755 */
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	756 static int
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	757 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	758 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	759 int discard;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	760 int growbuflen;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	761
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	762 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	763 return QF_END_OF_INPUT;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	764
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	765 discard = FALSE;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	766 state->linelen = (int)STRLEN(IObuff);
9738 6818e3c96473 commit https://github.com/vim/vim/commit/796aa9c804f09276bd3cc45123f4a191a001dec2 Christian Brabandt <cb@256bit.org> parents: 9649 diff changeset	767 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	768 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	769 /*
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	770 * 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	771 * 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	772 */
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	773 if (state->growbuf == NULL)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	774 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	775 state->growbufsiz = 2 * (IOSIZE - 1);
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	776 state->growbuf = alloc(state->growbufsiz);
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	777 if (state->growbuf == NULL)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	778 return QF_NOMEM;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	779 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	780
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	781 /* 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	782 memcpy(state->growbuf, IObuff, IOSIZE - 1);
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	783 growbuflen = state->linelen;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	784
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	785 for (;;)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	786 {
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	787 char_u *p;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	788
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	789 if (fgets((char *)state->growbuf + growbuflen,
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	790 state->growbufsiz - growbuflen, state->fd) == NULL)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	791 break;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	792 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	793 growbuflen += state->linelen;
9738 6818e3c96473 commit https://github.com/vim/vim/commit/796aa9c804f09276bd3cc45123f4a191a001dec2 Christian Brabandt <cb@256bit.org> parents: 9649 diff changeset	794 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	795 break;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	796 if (state->growbufsiz == LINE_MAXLEN)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	797 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	798 discard = TRUE;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	799 break;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	800 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	801
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	802 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	803 ? 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	804 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	805 return QF_NOMEM;
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	806 state->growbuf = p;
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	807 }
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 while (discard)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	810 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	811 /*
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	812 * 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	813 * 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	814 * reached.
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	815 */
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	816 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	817 \|\| (int)STRLEN(IObuff) < IOSIZE - 1
9738 6818e3c96473 commit https://github.com/vim/vim/commit/796aa9c804f09276bd3cc45123f4a191a001dec2 Christian Brabandt <cb@256bit.org> parents: 9649 diff changeset	818 \|\| IObuff[IOSIZE - 1] == '\n')
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	819 break;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	820 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	821
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	822 state->linebuf = state->growbuf;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	823 state->linelen = growbuflen;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	824 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	825 else
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	826 state->linebuf = IObuff;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	827
11063 e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	828 #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	829 /* 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	830 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	831 {
11063 e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	832 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	833
e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	834 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	835 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	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 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	838 {
e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	839 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	840 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	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 else
e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	843 {
e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	844 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	845 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	846 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	847 ? 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	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 }
e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	850 }
e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	851 #endif
e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	852
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	853 return QF_OK;
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
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 * 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	858 */
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	859 static int
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	860 qf_get_nextline(qfstate_T *state)
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 int status = QF_FAIL;
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->fd == 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 != NULL)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	867 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	868 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	869 /* 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	870 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	871 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	872 /* 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	873 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	874 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	875 else
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	876 /* 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	877 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	878 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	879 else
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	880 /* 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	881 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	882
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	883 if (status != QF_OK)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	884 return status;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	885
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	886 /* remove newline/CR from the line */
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	887 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	888 {
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	889 state->linebuf[state->linelen - 1] = NUL;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	890 #ifdef USE_CRNL
9738 6818e3c96473 commit https://github.com/vim/vim/commit/796aa9c804f09276bd3cc45123f4a191a001dec2 Christian Brabandt <cb@256bit.org> parents: 9649 diff changeset	891 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	892 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	893 #endif
9738 6818e3c96473 commit https://github.com/vim/vim/commit/796aa9c804f09276bd3cc45123f4a191a001dec2 Christian Brabandt <cb@256bit.org> parents: 9649 diff changeset	894 }
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	895
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	896 #ifdef FEAT_MBYTE
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	897 remove_bom(state->linebuf);
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	898 #endif
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 return QF_OK;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	901 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	902
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	903 typedef struct {
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	904 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	905 char_u *module;
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	906 char_u *errmsg;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	907 int errmsglen;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	908 long lnum;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	909 int col;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	910 char_u use_viscol;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	911 char_u *pattern;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	912 int enr;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	913 int type;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	914 int valid;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	915 } qffields_T;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	916
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	917 /*
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	918 * 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	919 * 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	920 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	921 static int
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	922 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	923 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	924 int c;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	925
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	926 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	927 return QF_FAIL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	928
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	929 /* 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	930 c = *rmp->endp[midx];
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	931 *rmp->endp[midx] = NUL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	932 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	933 *rmp->endp[midx] = c;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	934
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	935 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	936 * 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	937 * should exist.
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	938 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	939 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	940 && mch_getperm(fields->namebuf) == -1)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	941 return QF_FAIL;
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 return QF_OK;
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
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	946 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	947 * 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	948 * 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	949 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	950 static int
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	951 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	952 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	953 if (rmp->startp[midx] == NULL)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	954 return QF_FAIL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	955 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	956 return QF_OK;
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
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	959 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	960 * 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	961 * 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	962 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	963 static int
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	964 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	965 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	966 if (rmp->startp[midx] == NULL)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	967 return QF_FAIL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	968 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	969 return QF_OK;
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
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	972 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	973 * 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	974 * 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	975 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	976 static int
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	977 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	978 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	979 if (rmp->startp[midx] == NULL)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	980 return QF_FAIL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	981 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	982 return QF_OK;
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
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	985 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	986 * 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	987 * 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	988 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	989 static int
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	990 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	991 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	992 if (rmp->startp[midx] == NULL)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	993 return QF_FAIL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	994 fields->type = *rmp->startp[midx];
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	995 return QF_OK;
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
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	998 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	999 * 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	1000 * 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	1001 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1002 static int
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1003 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	1004 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1005 char_u *p;
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 if (linelen >= fields->errmsglen)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1008 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1009 /* linelen + null terminator */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1010 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	1011 return QF_NOMEM;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1012 fields->errmsg = p;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1013 fields->errmsglen = linelen + 1;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1014 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1015 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	1016 return QF_OK;
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
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1019 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1020 * 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	1021 * 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	1022 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1023 static int
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1024 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	1025 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1026 char_u *p;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1027 int len;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1028
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1029 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	1030 return QF_FAIL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1031 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	1032 if (len >= fields->errmsglen)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1033 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1034 /* len + null terminator */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1035 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	1036 return QF_NOMEM;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1037 fields->errmsg = p;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1038 fields->errmsglen = len + 1;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1039 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1040 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	1041 return QF_OK;
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
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1044 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1045 * 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	1046 * 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	1047 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1048 static int
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1049 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	1050 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1051 if (rmp->startp[midx] == NULL)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1052 return QF_FAIL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1053 *tail = rmp->startp[midx];
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1054 return QF_OK;
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
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1057 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1058 * 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	1059 * 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	1060 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1061 static int
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1062 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	1063 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1064 char_u *match_ptr;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1065
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1066 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	1067 return QF_FAIL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1068 fields->col = 0;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1069 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	1070 ++match_ptr)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1071 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1072 ++fields->col;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1073 if (*match_ptr == TAB)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1074 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1075 fields->col += 7;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1076 fields->col -= fields->col % 8;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1077 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1078 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1079 ++fields->col;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1080 fields->use_viscol = TRUE;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1081 return QF_OK;
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
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1084 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1085 * 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	1086 * 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	1087 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1088 static int
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1089 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	1090 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1091 if (rmp->startp[midx] == NULL)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1092 return QF_FAIL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1093 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	1094 fields->use_viscol = TRUE;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1095 return QF_OK;
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
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1098 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1099 * 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	1100 * 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	1101 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1102 static int
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1103 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	1104 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1105 int len;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1106
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1107 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	1108 return QF_FAIL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1109 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	1110 if (len > CMDBUFFSIZE - 5)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1111 len = CMDBUFFSIZE - 5;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1112 STRCPY(fields->pattern, "^\\V");
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1113 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	1114 fields->pattern[len + 3] = '\\';
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1115 fields->pattern[len + 4] = '$';
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1116 fields->pattern[len + 5] = NUL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1117 return QF_OK;
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
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1120 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1121 * 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	1122 * 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	1123 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1124 static int
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1125 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	1126 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1127 int len;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1128
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1129 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	1130 return QF_FAIL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1131 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	1132 if (len > CMDBUFFSIZE)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1133 len = CMDBUFFSIZE;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1134 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	1135 return QF_OK;
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
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1138 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1139 * 'errorformat' format pattern parser functions.
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1140 * 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	1141 * 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	1142 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1143 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	1144 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1145 NULL,
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1146 qf_parse_fmt_n,
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1147 qf_parse_fmt_l,
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1148 qf_parse_fmt_c,
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1149 qf_parse_fmt_t,
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1150 qf_parse_fmt_m,
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1151 NULL,
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1152 qf_parse_fmt_p,
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1153 qf_parse_fmt_v,
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1154 qf_parse_fmt_s,
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1155 qf_parse_fmt_o
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
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1158 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1159 * 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	1160 * "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	1161 * 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	1162 * 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	1163 */
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1164 static int
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1165 qf_parse_match(
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1166 char_u *linebuf,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1167 int linelen,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1168 efm_T *fmt_ptr,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1169 regmatch_T *regmatch,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1170 qffields_T *fields,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1171 int qf_multiline,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1172 int qf_multiscan,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1173 char_u **tail)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1174 {
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1175 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	1176 int i;
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1177 int midx;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1178 int status;
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1179
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1180 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	1181 return QF_FAIL;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1182 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	1183 fields->type = idx;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1184 else
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1185 fields->type = 0;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1186 /*
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1187 * 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	1188 * 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	1189 * 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	1190 */
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1191 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	1192 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1193 status = QF_OK;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1194 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	1195 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	1196 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	1197 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	1198 {
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1199 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	1200 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	1201 else if (midx > 0) /* %m */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1202 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	1203 }
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1204 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	1205 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	1206 else if (midx > 0) /* others */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1207 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	1208
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1209 if (status != QF_OK)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1210 return status;
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1211 }
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 return QF_OK;
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
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1216 /*
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1217 * 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	1218 * '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	1219 * 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	1220 * 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	1221 */
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1222 static int
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1223 qf_parse_get_fields(
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1224 char_u *linebuf,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1225 int linelen,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1226 efm_T *fmt_ptr,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1227 qffields_T *fields,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1228 int qf_multiline,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1229 int qf_multiscan,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1230 char_u **tail)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1231 {
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1232 regmatch_T regmatch;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1233 int status = QF_FAIL;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1234 int r;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1235
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1236 if (qf_multiscan &&
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1237 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	1238 return QF_FAIL;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1239
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1240 fields->namebuf[0] = NUL;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1241 fields->module[0] = NUL;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1242 fields->pattern[0] = NUL;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1243 if (!qf_multiscan)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1244 fields->errmsg[0] = NUL;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1245 fields->lnum = 0;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1246 fields->col = 0;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1247 fields->use_viscol = FALSE;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1248 fields->enr = -1;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1249 fields->type = 0;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1250 *tail = NULL;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1251
13921 3b6c29f8c1a2 patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':' Christian Brabandt <cb@256bit.org> parents: 13882 diff changeset	1252 /* 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	1253 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	1254 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	1255 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	1256 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	1257 if (r)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1258 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	1259 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	1260
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1261 return status;
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
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1264 /*
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1265 * 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	1266 * 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	1267 * names.
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1268 */
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1269 static int
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1270 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	1271 {
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1272 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	1273 {
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1274 if (*fields->namebuf == NUL)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1275 {
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1276 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	1277 return QF_FAIL;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1278 }
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1279 qfl->qf_directory =
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1280 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	1281 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	1282 return QF_FAIL;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1283 }
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1284 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	1285 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	1286
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1287 return QF_OK;
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
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 * 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	1292 */
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1293 static int
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1294 qf_parse_file_pfx(
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1295 int idx,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1296 qffields_T *fields,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1297 qf_list_T *qfl,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1298 char_u *tail)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1299 {
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1300 fields->valid = FALSE;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1301 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	1302 {
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1303 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	1304 qfl->qf_currfile =
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1305 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	1306 else if (idx == 'Q')
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1307 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	1308 *fields->namebuf = NUL;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1309 if (tail && *tail)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1310 {
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1311 STRMOVE(IObuff, skipwhite(tail));
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1312 qfl->qf_multiscan = TRUE;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1313 return QF_MULTISCAN;
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 }
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 return QF_OK;
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
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1320 /*
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1321 * 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	1322 * format in 'efm').
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1323 */
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1324 static int
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1325 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	1326 {
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1327 char_u *p;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1328
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1329 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	1330 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	1331 fields->valid = FALSE;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1332 if (linelen >= fields->errmsglen)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1333 {
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1334 /* linelen + null terminator */
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1335 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	1336 return QF_NOMEM;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1337 fields->errmsg = p;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1338 fields->errmsglen = linelen + 1;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1339 }
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1340 /* 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	1341 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	1342
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1343 return QF_OK;
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
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 * 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	1348 */
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1349 static int
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1350 qf_parse_multiline_pfx(
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1351 qf_info_T *qi,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1352 int qf_idx,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1353 int idx,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1354 qf_list_T *qfl,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1355 qffields_T *fields)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1356 {
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1357 char_u *ptr;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1358 int len;
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 if (!qfl->qf_multiignore)
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 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	1363
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1364 if (qfprev == NULL)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1365 return QF_FAIL;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1366 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	1367 {
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1368 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	1369 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	1370 == NULL)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1371 return QF_FAIL;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1372 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	1373 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	1374 qfprev->qf_text = ptr;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1375 *(ptr += len) = '\n';
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1376 STRCPY(++ptr, fields->errmsg);
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1377 }
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1378 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	1379 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	1380 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	1381 /* only printable chars allowed */
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1382 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	1383
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1384 if (!qfprev->qf_lnum)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1385 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	1386 if (!qfprev->qf_col)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1387 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	1388 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	1389 if (!qfprev->qf_fnum)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1390 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	1391 qfl->qf_directory,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1392 *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	1393 ? fields->namebuf
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1394 : 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	1395 ? qfl->qf_currfile : 0);
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1396 }
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1397 if (idx == 'Z')
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1398 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	1399 line_breakcheck();
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 return QF_IGNORE_LINE;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1402 }
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1403
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1404 /*
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1405 * 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	1406 * Return the QF_ status.
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1407 */
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1408 static int
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1409 qf_parse_line(
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1410 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	1411 int qf_idx,
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1412 char_u *linebuf,
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1413 int linelen,
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1414 efm_T *fmt_first,
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1415 qffields_T *fields)
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1416 {
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1417 efm_T *fmt_ptr;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1418 int idx = 0;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1419 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	1420 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	1421 int status;
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1422
13612 89223f5d5d12 patch 8.0.1678: errorformat "%r" implies "%>" Christian Brabandt <cb@256bit.org> parents: 13594 diff changeset	1423 restofline:
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1424 /* 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	1425 if (fmt_start == NULL)
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1426 fmt_ptr = fmt_first;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1427 else
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1428 {
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1429 /* 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	1430 fmt_ptr = fmt_start;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1431 fmt_start = NULL;
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
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1434 /*
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1435 * 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	1436 * match or no match.
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1437 */
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1438 fields->valid = TRUE;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1439 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	1440 {
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1441 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	1442 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	1443 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	1444 if (status == QF_NOMEM)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1445 return status;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1446 if (status == QF_OK)
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1447 break;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1448 }
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	1449 qfl->qf_multiscan = FALSE;
9568 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 \|\| idx == 'D' \|\| idx == 'X')
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1452 {
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1453 if (fmt_ptr != NULL)
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1454 {
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1455 /* '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	1456 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	1457 if (status != QF_OK)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1458 return status;
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1459 }
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1460
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1461 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	1462 if (status != QF_OK)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1463 return status;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1464
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1465 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	1466 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	1467 }
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1468 else if (fmt_ptr != NULL)
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1469 {
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1470 /* honor %> item */
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1471 if (fmt_ptr->conthere)
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1472 fmt_start = fmt_ptr;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1473
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1474 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	1475 {
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	1476 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	1477 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	1478 }
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1479 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	1480 { /* 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	1481 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	1482 if (status != QF_OK)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1483 return status;
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1484 }
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1485 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	1486 { /* global file names */
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1487 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	1488 if (status == QF_MULTISCAN)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1489 goto restofline;
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1490 }
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1491 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	1492 {
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 if (qfl->qf_multiline)
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1494 /* 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	1495 qfl->qf_multiignore = TRUE;
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1496 return QF_IGNORE_LINE;
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 }
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 return QF_OK;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1501 }
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1502
9033 0536d1469b67 commit https://github.com/vim/vim/commit/6be8c8e165204b8aa4eeb8a52be87a58d8b41b9e Christian Brabandt <cb@256bit.org> parents: 8932 diff changeset	1503 /*
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1504 * 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	1505 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1506 static int
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1507 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	1508 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1509 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	1510 return TRUE;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1511 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	1512 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1513
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1514 /*
13992 710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1515 * 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	1516 */
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1517 static int
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1518 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	1519 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1520 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	1521 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	1522 pfields->errmsglen = CMDBUFFSIZE + 1;
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1523 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	1524 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	1525 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	1526 \|\| 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	1527 return FAIL;
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 return OK;
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
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 * 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	1534 */
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1535 static void
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1536 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	1537 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1538 vim_free(pfields->namebuf);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1539 vim_free(pfields->module);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1540 vim_free(pfields->errmsg);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1541 vim_free(pfields->pattern);
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
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1544 /*
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1545 * 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	1546 * quickfix list.
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1547 */
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1548 static int
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1549 qf_setup_state(
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1550 qfstate_T *pstate,
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1551 char_u *enc,
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1552 char_u *efile,
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1553 typval_T *tv,
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1554 buf_T *buf,
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1555 linenr_T lnumfirst,
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1556 linenr_T lnumlast)
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1557 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1558 #ifdef FEAT_MBYTE
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1559 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	1560 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	1561 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	1562 #endif
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 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	1565 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1566 EMSG2(_(e_openerrf), efile);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1567 return FAIL;
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1568 }
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 != NULL)
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1571 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1572 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	1573 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	1574 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	1575 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	1576 pstate->tv = tv;
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1577 }
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1578 pstate->buf = buf;
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1579 pstate->buflnum = lnumfirst;
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1580 pstate->lnumlast = lnumlast;
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 return OK;
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
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1585 /*
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1586 * 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	1587 * quickfix list.
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1588 */
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1589 static void
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1590 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	1591 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1592 if (pstate->fd != NULL)
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1593 fclose(pstate->fd);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1594
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1595 vim_free(pstate->growbuf);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1596 #ifdef FEAT_MBYTE
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1597 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	1598 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	1599 #endif
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1600 }
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1601
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1602 /*
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	1603 * Read the errorfile "efile" into memory, line by line, building the error
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	1604 * list.
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	1605 * 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	1606 * 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	1607 * 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	1608 * 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	1609 * Set the title of the list to "qf_title".
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	1610 * Return -1 for error, number of errors for success.
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	1611 */
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	1612 static int
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1613 qf_init_ext(
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1614 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	1615 int qf_idx,
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1616 char_u *efile,
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1617 buf_T *buf,
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1618 typval_T *tv,
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1619 char_u *errorformat,
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1620 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	1621 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	1622 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	1623 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	1624 char_u *enc)
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	1625 {
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	1626 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	1627 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	1628 qffields_T fields;
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	1629 qfline_T *old_last = NULL;
10369 4e5b307638cb commit https://github.com/vim/vim/commit/2b946c9f9b0e0fd805fb8f3e4c16e0a68ae13129 Christian Brabandt <cb@256bit.org> parents: 10367 diff changeset	1630 int adding = FALSE;
9397 e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	1631 static efm_T *fmt_first = NULL;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1632 char_u *efm;
9397 e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	1633 static char_u *last_efm = NULL;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1634 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	1635 int status;
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1636
11443 30b3775addb2 patch 8.0.0605: the quickfix cached buffer may become invalid Christian Brabandt <cb@256bit.org> parents: 11426 diff changeset	1637 /* 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	1638 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	1639
11063 e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	1640 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	1641 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	1642 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	1643 (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	1644 lnumfirst, lnumlast) == FAIL))
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1645 goto qf_init_end;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1646
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	1647 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	1648 {
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1649 /* make place for a new list */
3965 eccae034465b updated for version 7.3.738 Bram Moolenaar <bram@vim.org> parents: 3949 diff changeset	1650 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	1651 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	1652 }
11609 6f11697fb92c patch 8.0.0687: minor issues related to quickfix Christian Brabandt <cb@256bit.org> parents: 11589 diff changeset	1653 else
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	1654 {
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	1655 /* 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	1656 adding = TRUE;
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1657 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	1658 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	1659 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1660
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	1661 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	1662
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1663 /* Use the local value of 'errorformat' if it's set. */
446 7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	1664 if (errorformat == p_efm && tv == NULL && *buf->b_p_efm != NUL)
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	1665 efm = buf->b_p_efm;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1666 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1667 efm = errorformat;
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	1668
9397 e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	1669 /*
e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	1670 * 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	1671 * previously parsed values.
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 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	1674 {
e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	1675 /* 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	1676 VIM_CLEAR(last_efm);
9397 e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	1677 free_efm_list(&fmt_first);
e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	1678
e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	1679 /* parse the current 'efm' */
e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	1680 fmt_first = parse_efm_option(efm);
e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	1681 if (fmt_first != NULL)
e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	1682 last_efm = vim_strsave(efm);
e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	1683 }
e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	1684
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	1685 if (fmt_first == NULL) /* nothing found */
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1686 goto error2;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1687
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1688 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1689 * got_int is reset here, because it was probably set when killing the
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1690 * ":make" command, but we still want to read the errorfile then.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1691 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1692 got_int = FALSE;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1693
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1694 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1695 * Read the lines in the error file one by one.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1696 * Try to recognize one of the error formats in each line.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1697 */
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	1698 while (!got_int)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1699 {
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	1700 /* 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	1701 status = qf_get_nextline(&state);
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	1702 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	1703 goto qf_init_end;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	1704 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	1705 break;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1706
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	1707 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	1708 fmt_first, &fields);
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1709 if (status == QF_FAIL)
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1710 goto error2;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1711 if (status == QF_NOMEM)
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1712 goto qf_init_end;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1713 if (status == QF_IGNORE_LINE)
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1714 continue;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1715
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	1716 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	1717 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	1718 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	1719 (*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	1720 ? 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	1721 : ((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	1722 ? 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	1723 fields.module,
1065 caa550fe4457 updated for version 7.0-191 vimboss parents: 1020 diff changeset	1724 0,
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1725 fields.errmsg,
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1726 fields.lnum,
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1727 fields.col,
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1728 fields.use_viscol,
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1729 fields.pattern,
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1730 fields.enr,
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1731 fields.type,
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1732 fields.valid) == FAIL)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1733 goto error2;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1734 line_breakcheck();
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1735 }
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	1736 if (state.fd == NULL \|\| !ferror(state.fd))
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1737 {
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	1738 if (qfl->qf_index == 0)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1739 {
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1740 /* 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	1741 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	1742 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	1743 qfl->qf_nonevalid = TRUE;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1744 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1745 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1746 {
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	1747 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	1748 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	1749 qfl->qf_ptr = qfl->qf_start;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1750 }
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1751 /* 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	1752 retval = qfl->qf_count;
9369 ce5b79b005ec commit https://github.com/vim/vim/commit/bcf7772a23624edc0942120e564f6b4ac95604ad Christian Brabandt <cb@256bit.org> parents: 9365 diff changeset	1753 goto qf_init_end;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1754 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1755 EMSG(_(e_readerrf));
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1756 error2:
10369 4e5b307638cb commit https://github.com/vim/vim/commit/2b946c9f9b0e0fd805fb8f3e4c16e0a68ae13129 Christian Brabandt <cb@256bit.org> parents: 10367 diff changeset	1757 if (!adding)
4e5b307638cb commit https://github.com/vim/vim/commit/2b946c9f9b0e0fd805fb8f3e4c16e0a68ae13129 Christian Brabandt <cb@256bit.org> parents: 10367 diff changeset	1758 {
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	1759 /* Error when creating a new list. Free the new list */
10369 4e5b307638cb commit https://github.com/vim/vim/commit/2b946c9f9b0e0fd805fb8f3e4c16e0a68ae13129 Christian Brabandt <cb@256bit.org> parents: 10367 diff changeset	1760 qf_free(qi, qi->qf_curlist);
4e5b307638cb commit https://github.com/vim/vim/commit/2b946c9f9b0e0fd805fb8f3e4c16e0a68ae13129 Christian Brabandt <cb@256bit.org> parents: 10367 diff changeset	1761 qi->qf_listcount--;
4e5b307638cb commit https://github.com/vim/vim/commit/2b946c9f9b0e0fd805fb8f3e4c16e0a68ae13129 Christian Brabandt <cb@256bit.org> parents: 10367 diff changeset	1762 if (qi->qf_curlist > 0)
4e5b307638cb commit https://github.com/vim/vim/commit/2b946c9f9b0e0fd805fb8f3e4c16e0a68ae13129 Christian Brabandt <cb@256bit.org> parents: 10367 diff changeset	1763 --qi->qf_curlist;
4e5b307638cb commit https://github.com/vim/vim/commit/2b946c9f9b0e0fd805fb8f3e4c16e0a68ae13129 Christian Brabandt <cb@256bit.org> parents: 10367 diff changeset	1764 }
9369 ce5b79b005ec commit https://github.com/vim/vim/commit/bcf7772a23624edc0942120e564f6b4ac95604ad Christian Brabandt <cb@256bit.org> parents: 9365 diff changeset	1765 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	1766 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	1767 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	1768 qf_cleanup_state(&state);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1769 qf_free_fields(&fields);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1770
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1771 return retval;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1772 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1773
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1774 /*
13992 710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1775 * 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	1776 * 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	1777 * 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	1778 */
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1779 int
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1780 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	1781 char_u *efile,
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1782 char_u *errorformat,
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1783 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	1784 char_u *qf_title,
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1785 char_u *enc)
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 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	1788
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1789 if (wp != NULL)
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1790 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1791 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	1792 if (qi == NULL)
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1793 return FAIL;
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1794 }
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1795
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1796 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	1797 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	1798 }
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1799
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1800 /*
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1801 * 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	1802 * Prepends ':' to the title.
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1803 */
6079 75ae211df37d updated for version 7.4.378 Bram Moolenaar <bram@vim.org> parents: 5753 diff changeset	1804 static void
11449 d2f00eb352b9 patch 8.0.0608: cannot manipulate other than the current quickfix list Christian Brabandt <cb@256bit.org> parents: 11447 diff changeset	1805 qf_store_title(qf_info_T qi, int qf_idx, char_u title)
6079 75ae211df37d updated for version 7.4.378 Bram Moolenaar <bram@vim.org> parents: 5753 diff changeset	1806 {
13244 ac42c4b11dbc patch 8.0.1496: clearing a pointer takes two lines Christian Brabandt <cb@256bit.org> parents: 13115 diff changeset	1807 VIM_CLEAR(qi->qf_lists[qf_idx].qf_title);
11549 f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	1808
6079 75ae211df37d updated for version 7.4.378 Bram Moolenaar <bram@vim.org> parents: 5753 diff changeset	1809 if (title != NULL)
75ae211df37d updated for version 7.4.378 Bram Moolenaar <bram@vim.org> parents: 5753 diff changeset	1810 {
75ae211df37d updated for version 7.4.378 Bram Moolenaar <bram@vim.org> parents: 5753 diff changeset	1811 char_u *p = alloc((int)STRLEN(title) + 2);
75ae211df37d updated for version 7.4.378 Bram Moolenaar <bram@vim.org> parents: 5753 diff changeset	1812
11449 d2f00eb352b9 patch 8.0.0608: cannot manipulate other than the current quickfix list Christian Brabandt <cb@256bit.org> parents: 11447 diff changeset	1813 qi->qf_lists[qf_idx].qf_title = p;
6079 75ae211df37d updated for version 7.4.378 Bram Moolenaar <bram@vim.org> parents: 5753 diff changeset	1814 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	1815 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	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
3b6c29f8c1a2 patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':' Christian Brabandt <cb@256bit.org> parents: 13882 diff changeset	1819 /*
3b6c29f8c1a2 patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':' Christian Brabandt <cb@256bit.org> parents: 13882 diff changeset	1820 * 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	1821 * 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	1822 * 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	1823 * 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	1824 */
3b6c29f8c1a2 patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':' Christian Brabandt <cb@256bit.org> parents: 13882 diff changeset	1825 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	1826 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	1827 {
3b6c29f8c1a2 patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':' Christian Brabandt <cb@256bit.org> parents: 13882 diff changeset	1828 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	1829
3b6c29f8c1a2 patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':' Christian Brabandt <cb@256bit.org> parents: 13882 diff changeset	1830 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	1831 return qftitle_str;
6079 75ae211df37d updated for version 7.4.378 Bram Moolenaar <bram@vim.org> parents: 5753 diff changeset	1832 }
75ae211df37d updated for version 7.4.378 Bram Moolenaar <bram@vim.org> parents: 5753 diff changeset	1833
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1834 /*
12084 69ce6b3f0834 patch 8.0.0922: quickfix list always added after current one Christian Brabandt <cb@256bit.org> parents: 12048 diff changeset	1835 * 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	1836 * 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	1837 * the new list is added.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1838 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1839 static void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1840 qf_new_list(qf_info_T qi, char_u qf_title)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1841 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1842 int i;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1843
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1844 /*
6079 75ae211df37d updated for version 7.4.378 Bram Moolenaar <bram@vim.org> parents: 5753 diff changeset	1845 * If the current entry is not the last entry, delete entries beyond
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1846 * the current entry. This makes it possible to browse in a tree-like
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1847 * way with ":grep'.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1848 */
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1849 while (qi->qf_listcount > qi->qf_curlist + 1)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1850 qf_free(qi, --qi->qf_listcount);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1851
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1852 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1853 * When the stack is full, remove to oldest entry
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1854 * Otherwise, add a new entry.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1855 */
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1856 if (qi->qf_listcount == LISTCOUNT)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1857 {
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1858 qf_free(qi, 0);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1859 for (i = 1; i < LISTCOUNT; ++i)
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1860 qi->qf_lists[i - 1] = qi->qf_lists[i];
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1861 qi->qf_curlist = LISTCOUNT - 1;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1862 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1863 else
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1864 qi->qf_curlist = qi->qf_listcount++;
3259 9eb7fdfb5e63 updated for version 7.3.398 Bram Moolenaar <bram@vim.org> parents: 3257 diff changeset	1865 vim_memset(&qi->qf_lists[qi->qf_curlist], 0, (size_t)(sizeof(qf_list_T)));
11449 d2f00eb352b9 patch 8.0.0608: cannot manipulate other than the current quickfix list Christian Brabandt <cb@256bit.org> parents: 11447 diff changeset	1866 qf_store_title(qi, 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	1867 qi->qf_lists[qi->qf_curlist].qf_id = ++last_qf_id;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1868 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1869
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 * Free a location list
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1872 */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1873 static void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1874 ll_free_all(qf_info_T **pqi)
359 6c62b9b939bd updated for version 7.0093 vimboss parents: 297 diff changeset	1875 {
6c62b9b939bd updated for version 7.0093 vimboss parents: 297 diff changeset	1876 int i;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1877 qf_info_T *qi;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1878
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1879 qi = *pqi;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1880 if (qi == NULL)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1881 return;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1882 pqi = NULL; / Remove reference to this list */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1883
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1884 qi->qf_refcount--;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1885 if (qi->qf_refcount < 1)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1886 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1887 /* No references to this location list */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1888 for (i = 0; i < qi->qf_listcount; ++i)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1889 qf_free(qi, i);
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1890 vim_free(qi);
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1891 }
359 6c62b9b939bd updated for version 7.0093 vimboss parents: 297 diff changeset	1892 }
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1893
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1894 /*
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1895 * 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	1896 */
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1897 void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1898 qf_free_all(win_T *wp)
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1899 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1900 int i;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1901 qf_info_T *qi = &ql_info;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1902
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1903 if (wp != NULL)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1904 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1905 /* location list */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1906 ll_free_all(&wp->w_llist);
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1907 ll_free_all(&wp->w_llist_ref);
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1908 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1909 else
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1910 /* quickfix list */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1911 for (i = 0; i < qi->qf_listcount; ++i)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1912 qf_free(qi, i);
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1913 }
359 6c62b9b939bd updated for version 7.0093 vimboss parents: 297 diff changeset	1914
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1915 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1916 * Add an entry to the end of the list of errors.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1917 * Returns OK or FAIL.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1918 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1919 static int
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1920 qf_add_entry(
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1921 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	1922 int qf_idx, /* list index */
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1923 char_u dir, / optional directory name */
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1924 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	1925 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	1926 int bufnum, /* buffer number or zero */
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1927 char_u mesg, / message */
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1928 long lnum, /* line number */
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1929 int col, /* column */
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1930 int vis_col, /* using visual column */
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1931 char_u pattern, / search pattern */
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1932 int nr, /* error number */
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1933 int type, /* type character */
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1934 int valid) /* valid entry */
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1935 {
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	1936 qfline_T *qfp;
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	1937 qfline_T *lastp; / pointer to qf_last or NULL */
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1938
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	1939 if ((qfp = (qfline_T *)alloc((unsigned)sizeof(qfline_T))) == NULL)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1940 return FAIL;
1065 caa550fe4457 updated for version 7.0-191 vimboss parents: 1020 diff changeset	1941 if (bufnum != 0)
9201 692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	1942 {
692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	1943 buf_T *buf = buflist_findnr(bufnum);
692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	1944
1065 caa550fe4457 updated for version 7.0-191 vimboss parents: 1020 diff changeset	1945 qfp->qf_fnum = bufnum;
9201 692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	1946 if (buf != NULL)
9608 fa64afb99dda commit https://github.com/vim/vim/commit/c1542744e788d96fed24dd421f43009288092504 Christian Brabandt <cb@256bit.org> parents: 9579 diff changeset	1947 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	1948 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	1949 }
1065 caa550fe4457 updated for version 7.0-191 vimboss parents: 1020 diff changeset	1950 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	1951 qfp->qf_fnum = qf_get_fnum(qi, qf_idx, dir, fname);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1952 if ((qfp->qf_text = vim_strsave(mesg)) == NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1953 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1954 vim_free(qfp);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1955 return FAIL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1956 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1957 qfp->qf_lnum = lnum;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1958 qfp->qf_col = col;
170 8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	1959 qfp->qf_viscol = vis_col;
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	1960 if (pattern == NULL \|\| *pattern == NUL)
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	1961 qfp->qf_pattern = NULL;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	1962 else if ((qfp->qf_pattern = vim_strsave(pattern)) == NULL)
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	1963 {
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	1964 vim_free(qfp->qf_text);
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	1965 vim_free(qfp);
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	1966 return FAIL;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	1967 }
13821 98274127d675 patch 8.0.1782: no simple way to label quickfix entries Christian Brabandt <cb@256bit.org> parents: 13819 diff changeset	1968 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	1969 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	1970 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	1971 {
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_text);
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->qf_pattern);
98274127d675 patch 8.0.1782: no simple way to label quickfix entries Christian Brabandt <cb@256bit.org> parents: 13819 diff changeset	1974 vim_free(qfp);
98274127d675 patch 8.0.1782: no simple way to label quickfix entries Christian Brabandt <cb@256bit.org> parents: 13819 diff changeset	1975 return FAIL;
98274127d675 patch 8.0.1782: no simple way to label quickfix entries Christian Brabandt <cb@256bit.org> parents: 13819 diff changeset	1976 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1977 qfp->qf_nr = nr;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1978 if (type != 1 && !vim_isprintc(type)) /* only printable chars allowed */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1979 type = 0;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1980 qfp->qf_type = type;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1981 qfp->qf_valid = valid;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1982
11449 d2f00eb352b9 patch 8.0.0608: cannot manipulate other than the current quickfix list Christian Brabandt <cb@256bit.org> parents: 11447 diff changeset	1983 lastp = &qi->qf_lists[qf_idx].qf_last;
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1984 if (qf_list_empty(qi, qf_idx)) /* first element in the list */
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1985 {
11449 d2f00eb352b9 patch 8.0.0608: cannot manipulate other than the current quickfix list Christian Brabandt <cb@256bit.org> parents: 11447 diff changeset	1986 qi->qf_lists[qf_idx].qf_start = qfp;
d2f00eb352b9 patch 8.0.0608: cannot manipulate other than the current quickfix list Christian Brabandt <cb@256bit.org> parents: 11447 diff changeset	1987 qi->qf_lists[qf_idx].qf_ptr = qfp;
d2f00eb352b9 patch 8.0.0608: cannot manipulate other than the current quickfix list Christian Brabandt <cb@256bit.org> parents: 11447 diff changeset	1988 qi->qf_lists[qf_idx].qf_index = 0;
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	1989 qfp->qf_prev = NULL;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1990 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1991 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1992 {
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	1993 qfp->qf_prev = *lastp;
543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	1994 (*lastp)->qf_next = qfp;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1995 }
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	1996 qfp->qf_next = NULL;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1997 qfp->qf_cleared = FALSE;
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	1998 *lastp = qfp;
11449 d2f00eb352b9 patch 8.0.0608: cannot manipulate other than the current quickfix list Christian Brabandt <cb@256bit.org> parents: 11447 diff changeset	1999 ++qi->qf_lists[qf_idx].qf_count;
d2f00eb352b9 patch 8.0.0608: cannot manipulate other than the current quickfix list Christian Brabandt <cb@256bit.org> parents: 11447 diff changeset	2000 if (qi->qf_lists[qf_idx].qf_index == 0 && qfp->qf_valid)
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2001 /* first valid entry */
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2002 {
11449 d2f00eb352b9 patch 8.0.0608: cannot manipulate other than the current quickfix list Christian Brabandt <cb@256bit.org> parents: 11447 diff changeset	2003 qi->qf_lists[qf_idx].qf_index =
d2f00eb352b9 patch 8.0.0608: cannot manipulate other than the current quickfix list Christian Brabandt <cb@256bit.org> parents: 11447 diff changeset	2004 qi->qf_lists[qf_idx].qf_count;
d2f00eb352b9 patch 8.0.0608: cannot manipulate other than the current quickfix list Christian Brabandt <cb@256bit.org> parents: 11447 diff changeset	2005 qi->qf_lists[qf_idx].qf_ptr = qfp;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2006 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2007
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2008 return OK;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2009 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2010
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2011 /*
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	2012 * Allocate a new location list
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2013 */
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	2014 static qf_info_T *
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	2015 ll_new_list(void)
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2016 {
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	2017 qf_info_T *qi;
d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	2018
14495 178162aeebeb patch 8.1.0261: Coverity complains about a negative array index Christian Brabandt <cb@256bit.org> parents: 14491 diff changeset	2019 qi = (qf_info_T *)alloc_clear((unsigned)sizeof(qf_info_T));
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	2020 if (qi != NULL)
d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	2021 qi->qf_refcount++;
d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	2022 return qi;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2023 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2024
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2025 /*
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2026 * Return the location list for window 'wp'.
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2027 * If not present, allocate a location list
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2028 */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2029 static qf_info_T *
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	2030 ll_get_or_alloc_list(win_T *wp)
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2031 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2032 if (IS_LL_WINDOW(wp))
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2033 /* For a location list window, use the referenced location list */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2034 return wp->w_llist_ref;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2035
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2036 /*
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2037 * 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	2038 * location list.
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2039 */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2040 ll_free_all(&wp->w_llist_ref);
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2041
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2042 if (wp->w_llist == NULL)
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	2043 wp->w_llist = ll_new_list(); /* new location list */
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2044 return wp->w_llist;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2045 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2046
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2047 /*
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2048 * Copy the location list from window "from" to window "to".
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2049 */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2050 void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	2051 copy_loclist(win_T from, win_T to)
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2052 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2053 qf_info_T *qi;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2054 int idx;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2055 int i;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2056
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2057 /*
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2058 * When copying from a location list window, copy the referenced
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2059 * location list. For other windows, copy the location list for
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2060 * that window.
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2061 */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2062 if (IS_LL_WINDOW(from))
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2063 qi = from->w_llist_ref;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2064 else
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2065 qi = from->w_llist;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2066
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2067 if (qi == NULL) /* no location list to copy */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2068 return;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2069
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	2070 /* allocate a new location list */
d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	2071 if ((to->w_llist = ll_new_list()) == NULL)
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2072 return;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2073
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2074 to->w_llist->qf_listcount = qi->qf_listcount;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2075
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2076 /* 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	2077 for (idx = 0; idx < qi->qf_listcount; ++idx)
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2078 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2079 qf_list_T *from_qfl;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2080 qf_list_T *to_qfl;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2081
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2082 to->w_llist->qf_curlist = idx;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2083
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2084 from_qfl = &qi->qf_lists[idx];
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2085 to_qfl = &to->w_llist->qf_lists[idx];
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2086
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2087 /* Some of the fields are populated by qf_add_entry() */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2088 to_qfl->qf_nonevalid = from_qfl->qf_nonevalid;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2089 to_qfl->qf_count = 0;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2090 to_qfl->qf_index = 0;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2091 to_qfl->qf_start = NULL;
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	2092 to_qfl->qf_last = NULL;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2093 to_qfl->qf_ptr = NULL;
2411 68e394361ca3 Add "q" item for 'statusline'. Add w:quickfix_title. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2296 diff changeset	2094 if (from_qfl->qf_title != NULL)
68e394361ca3 Add "q" item for 'statusline'. Add w:quickfix_title. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2296 diff changeset	2095 to_qfl->qf_title = vim_strsave(from_qfl->qf_title);
68e394361ca3 Add "q" item for 'statusline'. Add w:quickfix_title. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2296 diff changeset	2096 else
68e394361ca3 Add "q" item for 'statusline'. Add w:quickfix_title. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2296 diff changeset	2097 to_qfl->qf_title = NULL;
11412 84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	2098 if (from_qfl->qf_ctx != NULL)
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	2099 {
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	2100 to_qfl->qf_ctx = alloc_tv();
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	2101 if (to_qfl->qf_ctx != NULL)
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	2102 copy_tv(from_qfl->qf_ctx, to_qfl->qf_ctx);
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	2103 }
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	2104 else
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	2105 to_qfl->qf_ctx = NULL;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2106
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2107 if (from_qfl->qf_count)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2108 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2109 qfline_T *from_qfp;
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	2110 qfline_T *prevp;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2111
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2112 /* copy all the location entries in this list */
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	2113 for (i = 0, from_qfp = from_qfl->qf_start;
543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	2114 i < from_qfl->qf_count && from_qfp != NULL;
543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	2115 ++i, from_qfp = from_qfp->qf_next)
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2116 {
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	2117 if (qf_add_entry(to->w_llist,
11449 d2f00eb352b9 patch 8.0.0608: cannot manipulate other than the current quickfix list Christian Brabandt <cb@256bit.org> parents: 11447 diff changeset	2118 to->w_llist->qf_curlist,
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2119 NULL,
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2120 NULL,
13821 98274127d675 patch 8.0.1782: no simple way to label quickfix entries Christian Brabandt <cb@256bit.org> parents: 13819 diff changeset	2121 from_qfp->qf_module,
1065 caa550fe4457 updated for version 7.0-191 vimboss parents: 1020 diff changeset	2122 0,
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2123 from_qfp->qf_text,
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2124 from_qfp->qf_lnum,
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2125 from_qfp->qf_col,
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2126 from_qfp->qf_viscol,
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2127 from_qfp->qf_pattern,
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2128 from_qfp->qf_nr,
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2129 0,
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2130 from_qfp->qf_valid) == FAIL)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2131 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2132 qf_free_all(to);
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2133 return;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2134 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2135 /*
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2136 * qf_add_entry() will not set the qf_num field, as the
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2137 * directory and file names are not supplied. So the qf_fnum
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2138 * field is copied here.
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2139 */
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	2140 prevp = to->w_llist->qf_lists[to->w_llist->qf_curlist].qf_last;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2141 prevp->qf_fnum = from_qfp->qf_fnum; /* file number */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2142 prevp->qf_type = from_qfp->qf_type; /* error type */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2143 if (from_qfl->qf_ptr == from_qfp)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2144 to_qfl->qf_ptr = prevp; /* current location */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2145 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2146 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2147
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2148 to_qfl->qf_index = from_qfl->qf_index; /* current index in the list */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2149
12287 20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	2150 /* Assign a new ID for the location list */
20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	2151 to_qfl->qf_id = ++last_qf_id;
13062 6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	2152 to_qfl->qf_changedtick = 0L;
12287 20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	2153
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2154 /* When no valid entries are present in the list, qf_ptr points to
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2155 * the first item in the list */
2795 133d089f247e updated for version 7.3.173 Bram Moolenaar <bram@vim.org> parents: 2782 diff changeset	2156 if (to_qfl->qf_nonevalid)
5060 30910831e5b0 updated for version 7.3.1273 Bram Moolenaar <bram@vim.org> parents: 4805 diff changeset	2157 {
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2158 to_qfl->qf_ptr = to_qfl->qf_start;
5060 30910831e5b0 updated for version 7.3.1273 Bram Moolenaar <bram@vim.org> parents: 4805 diff changeset	2159 to_qfl->qf_index = 1;
30910831e5b0 updated for version 7.3.1273 Bram Moolenaar <bram@vim.org> parents: 4805 diff changeset	2160 }
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2161 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2162
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2163 to->w_llist->qf_curlist = qi->qf_curlist; /* current list */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2164 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2165
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2166 /*
10379 73e2a7abe2a3 commit https://github.com/vim/vim/commit/7618e00d3b8bfe064cfc524640d754607361f9df Christian Brabandt <cb@256bit.org> parents: 10369 diff changeset	2167 * 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	2168 * Also sets the b_has_qf_entry flag.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2169 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2170 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	2171 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	2172 {
9473 bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2173 char_u *ptr = NULL;
9201 692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2174 buf_T *buf;
9473 bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2175 char_u *bufname;
9201 692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2176
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2177 if (fname == NULL \|\| fname == NUL) / no file name */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2178 return 0;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2179
2823 8bd38abda314 updated for version 7.3.187 Bram Moolenaar <bram@vim.org> parents: 2795 diff changeset	2180 #ifdef VMS
9201 692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2181 vms_remove_version(fname);
2823 8bd38abda314 updated for version 7.3.187 Bram Moolenaar <bram@vim.org> parents: 2795 diff changeset	2182 #endif
8bd38abda314 updated for version 7.3.187 Bram Moolenaar <bram@vim.org> parents: 2795 diff changeset	2183 #ifdef BACKSLASH_IN_FILENAME
9201 692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2184 if (directory != NULL)
692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2185 slash_adjust(directory);
692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2186 slash_adjust(fname);
2823 8bd38abda314 updated for version 7.3.187 Bram Moolenaar <bram@vim.org> parents: 2795 diff changeset	2187 #endif
9201 692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2188 if (directory != NULL && !vim_isAbsName(fname)
692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2189 && (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	2190 {
692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2191 /*
692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2192 * 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	2193 * 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	2194 * "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	2195 * directory change.
692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2196 */
692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2197 if (mch_getperm(ptr) < 0)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2198 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2199 vim_free(ptr);
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	2200 directory = qf_guess_filepath(qi, qf_idx, fname);
9201 692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2201 if (directory)
692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2202 ptr = concat_fnames(directory, fname, TRUE);
692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2203 else
692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2204 ptr = vim_strsave(fname);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2205 }
9201 692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2206 /* 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	2207 bufname = ptr;
bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2208 }
bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2209 else
bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2210 bufname = fname;
bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2211
bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2212 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	2213 && bufref_valid(&qf_last_bufref))
9473 bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2214 {
9475 4d8f7f8da90c commit https://github.com/vim/vim/commit/b25f9a97e9aad3cbb4bc3fe87cdbd5700f8aa0c6 Christian Brabandt <cb@256bit.org> parents: 9473 diff changeset	2215 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	2216 vim_free(ptr);
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 else
9473 bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2219 {
bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2220 vim_free(qf_last_bufname);
bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2221 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	2222 if (bufname == ptr)
bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2223 qf_last_bufname = bufname;
bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2224 else
bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2225 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	2226 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	2227 }
9201 692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2228 if (buf == NULL)
692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2229 return 0;
9473 bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2230
9608 fa64afb99dda commit https://github.com/vim/vim/commit/c1542744e788d96fed24dd421f43009288092504 Christian Brabandt <cb@256bit.org> parents: 9579 diff changeset	2231 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	2232 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	2233 return buf->b_fnum;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2234 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2235
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2236 /*
9334 674f9e3ccd1a commit https://github.com/vim/vim/commit/38df43bd13a2498cc96b3ddd9a20dd75126bd171 Christian Brabandt <cb@256bit.org> parents: 9201 diff changeset	2237 * 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	2238 * NULL on error.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2239 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2240 static char_u *
9397 e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	2241 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	2242 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2243 struct dir_stack_T *ds_new;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2244 struct dir_stack_T *ds_ptr;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2245
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2246 /* allocate new stack element and hook it in */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2247 ds_new = (struct dir_stack_T *)alloc((unsigned)sizeof(struct dir_stack_T));
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2248 if (ds_new == NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2249 return NULL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2250
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2251 ds_new->next = *stackptr;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2252 *stackptr = ds_new;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2253
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2254 /* store directory on the stack */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2255 if (vim_isAbsName(dirbuf)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2256 \|\| (*stackptr)->next == NULL
9397 e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	2257 \|\| (*stackptr && is_file_stack))
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2258 (*stackptr)->dirname = vim_strsave(dirbuf);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2259 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2260 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2261 /* Okay we don't have an absolute path.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2262 * dirbuf must be a subdir of one of the directories on the stack.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2263 * Let's search...
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2264 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2265 ds_new = (*stackptr)->next;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2266 (*stackptr)->dirname = NULL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2267 while (ds_new)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2268 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2269 vim_free((*stackptr)->dirname);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2270 (*stackptr)->dirname = concat_fnames(ds_new->dirname, dirbuf,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2271 TRUE);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2272 if (mch_isdir((*stackptr)->dirname) == TRUE)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2273 break;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2274
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2275 ds_new = ds_new->next;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2276 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2277
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2278 /* clean up all dirs we already left */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2279 while ((*stackptr)->next != ds_new)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2280 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2281 ds_ptr = (*stackptr)->next;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2282 (stackptr)->next = (stackptr)->next->next;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2283 vim_free(ds_ptr->dirname);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2284 vim_free(ds_ptr);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2285 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2286
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2287 /* Nothing found -> it must be on top level */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2288 if (ds_new == NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2289 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2290 vim_free((*stackptr)->dirname);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2291 (*stackptr)->dirname = vim_strsave(dirbuf);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2292 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2293 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2294
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2295 if ((*stackptr)->dirname != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2296 return (*stackptr)->dirname;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2297 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2298 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2299 ds_ptr = *stackptr;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2300 stackptr = (stackptr)->next;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2301 vim_free(ds_ptr);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2302 return NULL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2303 }
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 * pop dirbuf from the directory stack and return previous directory or NULL if
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2308 * stack is empty
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2309 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2310 static char_u *
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	2311 qf_pop_dir(struct dir_stack_T **stackptr)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2312 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2313 struct dir_stack_T *ds_ptr;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2314
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2315 /* TODO: Should we check if dirbuf is the directory on top of the stack?
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2316 * What to do if it isn't? */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2317
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2318 /* pop top element and free it */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2319 if (*stackptr != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2320 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2321 ds_ptr = *stackptr;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2322 stackptr = (stackptr)->next;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2323 vim_free(ds_ptr->dirname);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2324 vim_free(ds_ptr);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2325 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2326
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2327 /* return NEW top element as current dir or NULL if stack is empty*/
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2328 return stackptr ? (stackptr)->dirname : NULL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2329 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2330
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2331 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2332 * clean up directory stack
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2333 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2334 static void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	2335 qf_clean_dir_stack(struct dir_stack_T **stackptr)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2336 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2337 struct dir_stack_T *ds_ptr;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2338
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2339 while ((ds_ptr = *stackptr) != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2340 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2341 stackptr = (stackptr)->next;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2342 vim_free(ds_ptr->dirname);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2343 vim_free(ds_ptr);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2344 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2345 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2346
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2347 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2348 * Check in which directory of the directory stack the given file can be
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2349 * found.
7092 64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	2350 * Returns a pointer to the directory name or NULL if not found.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2351 * Cleans up intermediate directory entries.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2352 *
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2353 * 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	2354 * If we have this directory tree:
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2355 * ./
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2356 * ./aa
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2357 * ./aa/bb
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2358 * ./bb
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2359 * ./bb/x.c
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2360 * and make says:
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2361 * making all in aa
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2362 * making all in bb
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2363 * x.c:9: Error
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2364 * 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	2365 * qf_guess_filepath will return NULL.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2366 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2367 static char_u *
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	2368 qf_guess_filepath(qf_info_T qi, int qf_idx, char_u filename)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2369 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2370 struct dir_stack_T *ds_ptr;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2371 struct dir_stack_T *ds_tmp;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2372 char_u *fullname;
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	2373 qf_list_T *qfl = &qi->qf_lists[qf_idx];
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2374
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2375 /* 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	2376 if (qfl->qf_dir_stack == NULL)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2377 return NULL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2378
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	2379 ds_ptr = qfl->qf_dir_stack->next;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2380 fullname = NULL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2381 while (ds_ptr)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2382 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2383 vim_free(fullname);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2384 fullname = concat_fnames(ds_ptr->dirname, filename, TRUE);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2385
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2386 /* If concat_fnames failed, just go on. The worst thing that can happen
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2387 * is that we delete the entire stack.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2388 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2389 if ((fullname != NULL) && (mch_getperm(fullname) >= 0))
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2390 break;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2391
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2392 ds_ptr = ds_ptr->next;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2393 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2394
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2395 vim_free(fullname);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2396
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2397 /* 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	2398 while (qfl->qf_dir_stack->next != ds_ptr)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2399 {
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	2400 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	2401 qfl->qf_dir_stack->next = qfl->qf_dir_stack->next->next;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2402 vim_free(ds_tmp->dirname);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2403 vim_free(ds_tmp);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2404 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2405
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	2406 return ds_ptr == NULL ? NULL : ds_ptr->dirname;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2407 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2408
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2409 /*
13090 a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2410 * 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	2411 */
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2412 static int
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2413 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	2414 {
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2415 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	2416 int i;
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2417
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2418 if (wp != NULL)
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2419 {
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2420 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	2421 if (qi == NULL)
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2422 return FALSE;
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2423 }
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2424
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2425 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	2426 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	2427 return TRUE;
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 return FALSE;
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
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2432 /*
14250 ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	2433 * 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	2434 * 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	2435 * 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	2436 * Similar to location list.
39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2437 */
39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2438 static int
39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2439 is_qf_entry_present(qf_info_T qi, qfline_T qf_ptr)
39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2440 {
39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2441 qf_list_T *qfl;
39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2442 qfline_T *qfp;
39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2443 int i;
39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2444
39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2445 qfl = &qi->qf_lists[qi->qf_curlist];
39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2446
39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2447 /* 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	2448 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	2449 ++i, qfp = qfp->qf_next)
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	2450 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	2451 break;
39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2452
39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2453 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	2454 return FALSE;
39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2455
39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2456 return TRUE;
39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2457 }
39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2458
39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2459 /*
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2460 * 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	2461 * 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	2462 */
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2463 static qfline_T *
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2464 get_next_valid_entry(
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2465 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	2466 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	2467 int *qf_index,
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2468 int dir)
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2469 {
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2470 int idx;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2471 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	2472
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2473 idx = *qf_index;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2474 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	2475
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2476 do
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 if (idx == qi->qf_lists[qi->qf_curlist].qf_count
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2479 \|\| qf_ptr->qf_next == NULL)
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2480 return NULL;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2481 ++idx;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2482 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	2483 } while ((!qi->qf_lists[qi->qf_curlist].qf_nonevalid
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2484 && !qf_ptr->qf_valid)
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2485 \|\| (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	2486
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2487 *qf_index = idx;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2488 return qf_ptr;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2489 }
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2490
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2491 /*
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2492 * 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	2493 * 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	2494 */
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2495 static qfline_T *
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2496 get_prev_valid_entry(
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2497 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	2498 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	2499 int *qf_index,
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2500 int dir)
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2501 {
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2502 int idx;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2503 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	2504
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2505 idx = *qf_index;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2506 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	2507
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2508 do
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2509 {
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2510 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	2511 return NULL;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2512 --idx;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2513 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	2514 } while ((!qi->qf_lists[qi->qf_curlist].qf_nonevalid
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2515 && !qf_ptr->qf_valid)
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2516 \|\| (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	2517
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2518 *qf_index = idx;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2519 return qf_ptr;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2520 }
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2521
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 * 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	2524 * the quickfix list.
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2525 * 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	2526 * 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	2527 */
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2528 static qfline_T *
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2529 get_nth_valid_entry(
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2530 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	2531 int errornr,
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2532 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	2533 int *qf_index,
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2534 int dir)
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2535 {
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2536 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	2537 int prev_index;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2538 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	2539 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	2540
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2541 while (errornr--)
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2542 {
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2543 prev_qf_ptr = qf_ptr;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2544 prev_index = *qf_index;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2545
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2546 if (dir == FORWARD \|\| dir == FORWARD_FILE)
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2547 qf_ptr = get_next_valid_entry(qi, qf_ptr, qf_index, dir);
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2548 else
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2549 qf_ptr = get_prev_valid_entry(qi, qf_ptr, qf_index, dir);
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2550 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	2551 {
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2552 qf_ptr = prev_qf_ptr;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2553 *qf_index = prev_index;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2554 if (err != NULL)
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2555 {
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2556 EMSG(_(err));
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2557 return NULL;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2558 }
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2559 break;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2560 }
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 err = NULL;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2563 }
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 return qf_ptr;
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 /*
12503 4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2569 * Get n'th (errornr) quickfix entry
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2570 */
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2571 static qfline_T *
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2572 get_nth_entry(
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2573 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	2574 int errornr,
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2575 qfline_T *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	2576 int *cur_qfidx)
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2577 {
12503 4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2578 int qf_idx = *cur_qfidx;
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2579
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2580 /* 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	2581 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	2582 {
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2583 --qf_idx;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2584 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	2585 }
12503 4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2586 /* New error number is greater 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	2587 while (errornr > qf_idx &&
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2588 qf_idx < qi->qf_lists[qi->qf_curlist].qf_count &&
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_next != NULL)
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2590 {
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2591 ++qf_idx;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2592 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	2593 }
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2594
12503 4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2595 *cur_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	2596 return qf_ptr;
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
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2599 /*
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	2600 * 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	2601 */
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2602 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	2603 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	2604 {
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2605 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	2606
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2607 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	2608 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	2609 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	2610
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2611 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	2612 }
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2613
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2614 /*
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2615 * 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	2616 */
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2617 static int
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2618 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	2619 {
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2620 win_T *wp;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2621 int flags;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2622
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2623 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	2624 wp = NULL;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2625 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	2626 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	2627 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	2628 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	2629 else
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2630 {
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2631 /*
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2632 * 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	2633 * 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	2634 */
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2635 flags = WSP_HELP;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2636 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	2637 && 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	2638 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	2639 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	2640 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	2641
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2642 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	2643 return FAIL;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2644
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2645 *opened_window = TRUE;
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 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	2648 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	2649
14560 8413e66d00a1 patch 8.1.0293: checks for type of stack is cryptic Christian Brabandt <cb@256bit.org> parents: 14552 diff changeset	2650 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	2651 {
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2652 /* 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	2653 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	2654 qi->qf_refcount++;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2655 }
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2656 }
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2657
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2658 if (!p_im)
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2659 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	2660
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2661 return OK;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2662 }
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2663
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2664 /*
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	2665 * 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	2666 * 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	2667 */
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2668 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	2669 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	2670 {
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2671 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	2672
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2673 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	2674 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	2675 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	2676
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2677 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	2678 }
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2679
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2680 /*
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2681 * 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	2682 */
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2683 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	2684 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	2685 {
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2686 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	2687
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2688 FOR_ALL_WINDOWS(wp)
14433 4a94173743d9 patch 8.1.0230: directly checking 'buftype' value Christian Brabandt <cb@256bit.org> parents: 14397 diff changeset	2689 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	2690 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	2691
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2692 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	2693 }
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2694
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 /*
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 * 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	2697 * 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	2698 */
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 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	2700 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	2701 {
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 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	2703 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	2704
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 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	2706 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	2707 {
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 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	2709 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	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
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 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	2713 }
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
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 * 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	2717 * 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	2718 */
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2719 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	2720 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	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 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	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 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	2725 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	2726 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	2727 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	2728 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	2729 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	2730 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	2731 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	2732 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	2733 {
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 /* 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	2735 * 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	2736 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	2737 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	2738 }
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 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	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 /*
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 * 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	2744 * 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	2745 * 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	2746 * 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	2747 */
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 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	2749 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	2750 {
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 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	2752
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 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	2754 {
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 /* 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	2756 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	2757 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	2758 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	2759 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	2760 {
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 /* 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	2762 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	2763 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	2764 {
14433 4a94173743d9 patch 8.1.0230: directly checking 'buftype' value Christian Brabandt <cb@256bit.org> parents: 14397 diff changeset	2765 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	2766 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	2767 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	2768 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	2769 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	2770 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	2771 } 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	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 }
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 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	2775
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 /* 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	2777 * 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	2778 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	2779 {
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 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	2781 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	2782 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	2783 }
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
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 /*
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 * Go to a window that shows the specified file. If a 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	2788 * to the window just above the quickfix window. This is used for opening 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	2789 * file from a quickfix window and not from 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	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 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	2792 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	2793 {
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 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	2795 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	2796
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 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	2798 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	2799 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	2800 {
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 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	2802 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	2803 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	2804 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	2805 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	2806 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	2807
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 (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	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 /* 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	2811 * 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	2812 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	2813 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	2814 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	2815 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	2816 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	2817 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	2818 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	2819 }
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2820
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 /* Remember a usable window. */
14433 4a94173743d9 patch 8.1.0230: directly checking 'buftype' value Christian Brabandt <cb@256bit.org> parents: 14397 diff changeset	2822 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	2823 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	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
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_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	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
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 /*
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 * 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	2831 * 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	2832 * 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	2833 * 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	2834 */
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2835 static int
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2836 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	2837 {
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2838 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	2839 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	2840 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	2841 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	2842
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2843 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	2844
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2845 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	2846 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	2847 {
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	2848 /* 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	2849 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	2850 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	2851 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	2852 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2853
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2854 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	2855 {
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2856 /* 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	2857 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	2858 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	2859 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	2860 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2861
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2862 /*
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2863 * 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	2864 * 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	2865 */
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2866 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	2867 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	2868
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2869 /*
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2870 * 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	2871 * 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	2872 */
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2873 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	2874 {
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	2875 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	2876 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	2877 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	2878 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2879 else
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2880 {
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	2881 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	2882 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	2883 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	2884 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	2885 }
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 return OK;
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2888 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2889
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2890 /*
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2891 * Edit the selected file or help file.
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 static int
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2894 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	2895 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	2896 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	2897 int forceit,
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2898 win_T *oldwin,
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2899 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	2900 int *abort)
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2901 {
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2902 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	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 (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	2905 {
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2906 /* 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	2907 * 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	2908 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	2909 {
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2910 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	2911 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	2912 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2913 else
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2914 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	2915 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	2916 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	2917 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2918 else
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 int old_qf_curlist = qi->qf_curlist;
13090 a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2921 int save_qfid = qi->qf_lists[qi->qf_curlist].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	2922
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2923 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	2924 (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	2925
14560 8413e66d00a1 patch 8.1.0293: checks for type of stack is cryptic Christian Brabandt <cb@256bit.org> parents: 14552 diff changeset	2926 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	2927 {
13090 a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2928 /*
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2929 * 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	2930 * 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	2931 */
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2932 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	2933 {
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2934 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	2935 *abort = TRUE;
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2936 *opened_window = FALSE;
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2937 }
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2938 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	2939 {
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2940 EMSG(_(e_loc_list_changed));
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2941 *abort = TRUE;
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2942 }
12503 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 else if (old_qf_curlist != qi->qf_curlist
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2945 \|\| !is_qf_entry_present(qi, qf_ptr))
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2946 {
14560 8413e66d00a1 patch 8.1.0293: checks for type of stack is cryptic Christian Brabandt <cb@256bit.org> parents: 14552 diff changeset	2947 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	2948 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	2949 else
13090 a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2950 EMSG(_(e_loc_list_changed));
12503 4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2951 *abort = TRUE;
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2952 }
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 if (*abort)
13800 e4dc4ede9ef8 patch 8.0.1772: quickfix: mixup of FALSE and FAIL, returning -1 Christian Brabandt <cb@256bit.org> parents: 13764 diff changeset	2955 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	2956 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2957
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2958 return retval;
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2959 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2960
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2961 /*
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	2962 * 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	2963 * 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	2964 */
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2965 static void
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2966 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	2967 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	2968 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	2969 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	2970 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	2971 {
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2972 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	2973 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	2974 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	2975 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	2976
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2977 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	2978 {
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2979 /*
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2980 * 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	2981 */
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2982 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	2983 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	2984 {
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2985 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	2986 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	2987 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	2988 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2989 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	2990 {
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2991 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	2992 #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	2993 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	2994 #endif
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2995 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	2996 {
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2997 /*
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2998 * 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	2999 * 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	3000 * 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	3001 * 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	3002 */
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3003 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	3004 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	3005 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	3006 {
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3007 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	3008 break;
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3009 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	3010 {
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3011 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	3012 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	3013 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3014 else
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3015 ++screen_col;
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3016 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3017 }
14552 b298737a7188 patch 8.1.0289: cursor moves to wrong column after quickfix jump Christian Brabandt <cb@256bit.org> parents: 14550 diff changeset	3018 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	3019 check_cursor();
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3020 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3021 else
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3022 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	3023 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3024 else
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3025 {
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3026 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	3027
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3028 /* 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	3029 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	3030 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	3031 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	3032 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	3033 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	3034 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3035 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3036
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 * 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	3039 */
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3040 static void
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3041 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	3042 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	3043 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	3044 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	3045 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	3046 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	3047 {
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3048 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	3049 int len;
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3050
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3051 /* 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	3052 * scrolled up. */
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3053 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	3054 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	3055 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	3056 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	3057 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	3058 (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	3059 /* 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	3060 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	3061 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	3062
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3063 /* 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	3064 * 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	3065 * whole message. */
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3066 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	3067 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	3068 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	3069 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	3070 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	3071 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	3072 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	3073 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3074
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3075 /*
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3076 * jump to a quickfix line
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3077 * if dir == FORWARD go "errornr" valid entries forward
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3078 * if dir == BACKWARD go "errornr" valid entries backward
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3079 * if dir == FORWARD_FILE go "errornr" valid entries files backward
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3080 * if dir == BACKWARD_FILE go "errornr" valid entries files backward
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3081 * else if "errornr" is zero, redisplay the same line
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3082 * else go to entry "errornr"
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3083 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3084 void
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	3085 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	3086 int dir,
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	3087 int errornr,
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	3088 int forceit)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3089 {
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	3090 qfline_T *qf_ptr;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	3091 qfline_T *old_qf_ptr;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3092 int qf_index;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3093 int old_qf_index;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3094 buf_T *old_curbuf;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3095 linenr_T old_lnum;
639 c79d4df4686e updated for version 7.0185 vimboss parents: 634 diff changeset	3096 char_u *old_swb = p_swb;
1621 82b5078be2dd updated for version 7.2a vimboss parents: 1571 diff changeset	3097 unsigned old_swb_flags = swb_flags;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3098 int opened_window = FALSE;
1743 734d5bdae499 updated for version 7.2-041 vimboss parents: 1683 diff changeset	3099 win_T *oldwin = curwin;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3100 int print_message = TRUE;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3101 #ifdef FEAT_FOLDING
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3102 int old_KeyTyped = KeyTyped; /* getting file may reset it */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3103 #endif
12503 4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3104 int retval = OK;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3105
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	3106 if (qi == NULL)
d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	3107 qi = &ql_info;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3108
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3109 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	3110 \|\| qf_list_empty(qi, qi->qf_curlist))
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3111 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3112 EMSG(_(e_quickfix));
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3113 return;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3114 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3115
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3116 qf_ptr = qi->qf_lists[qi->qf_curlist].qf_ptr;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3117 old_qf_ptr = qf_ptr;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3118 qf_index = qi->qf_lists[qi->qf_curlist].qf_index;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3119 old_qf_index = qf_index;
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	3120 if (dir != 0) /* next/prev valid entry */
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3121 {
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	3122 qf_ptr = get_nth_valid_entry(qi, errornr, qf_ptr, &qf_index, dir);
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	3123 if (qf_ptr == NULL)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3124 {
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	3125 qf_ptr = old_qf_ptr;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	3126 qf_index = old_qf_index;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	3127 goto theend;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3128 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3129 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3130 else if (errornr != 0) /* go to specified number */
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	3131 qf_ptr = get_nth_entry(qi, errornr, qf_ptr, &qf_index);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3132
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3133 qi->qf_lists[qi->qf_curlist].qf_index = qf_index;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3134 if (qf_win_pos_update(qi, old_qf_index))
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3135 /* No need to print the error message if it's visible in the error
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3136 * window */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3137 print_message = FALSE;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3138
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3139 /*
9 4102fb4ea781 updated for version 7.0002 vimboss parents: 7 diff changeset	3140 * For ":helpgrep" find a help window or open one.
4102fb4ea781 updated for version 7.0002 vimboss parents: 7 diff changeset	3141 */
11800 5ceaecedbad2 patch 8.0.0782: using freed memory in quickfix code Christian Brabandt <cb@256bit.org> parents: 11788 diff changeset	3142 if (qf_ptr->qf_type == 1 && (!bt_help(curwin->w_buffer) \|\| cmdmod.tab != 0))
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	3143 if (jump_to_help_window(qi, &opened_window) == FAIL)
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	3144 goto theend;
9 4102fb4ea781 updated for version 7.0002 vimboss parents: 7 diff changeset	3145
4102fb4ea781 updated for version 7.0002 vimboss parents: 7 diff changeset	3146 /*
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3147 * If currently in the quickfix window, find another window to show the
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3148 * file in.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3149 */
26 404aac550f35 updated for version 7.0017 vimboss parents: 17 diff changeset	3150 if (bt_quickfix(curbuf) && !opened_window)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3151 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3152 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3153 * If there is no file specified, we don't know where to go.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3154 * But do advance, otherwise ":cn" gets stuck.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3155 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3156 if (qf_ptr->qf_fnum == 0)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3157 goto theend;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3158
12503 4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3159 if (qf_jump_to_usable_window(qf_ptr->qf_fnum, &opened_window) == FAIL)
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3160 goto failed;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3161 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3162
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3163 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3164 * If there is a file name,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3165 * read the wanted file if needed, and check autowrite etc.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3166 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3167 old_curbuf = curbuf;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3168 old_lnum = curwin->w_cursor.lnum;
9 4102fb4ea781 updated for version 7.0002 vimboss parents: 7 diff changeset	3169
4102fb4ea781 updated for version 7.0002 vimboss parents: 7 diff changeset	3170 if (qf_ptr->qf_fnum != 0)
4102fb4ea781 updated for version 7.0002 vimboss parents: 7 diff changeset	3171 {
12503 4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3172 int abort = FALSE;
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3173
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3174 retval = qf_jump_edit_buffer(qi, qf_ptr, forceit, oldwin,
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3175 &opened_window, &abort);
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3176 if (abort)
8605 536b9b88d1ca commit https://github.com/vim/vim/commit/0899d698030ec076eb26352cda1ea334ab0819d9 Christian Brabandt <cb@256bit.org> parents: 8603 diff changeset	3177 {
12503 4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3178 qi = NULL;
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3179 qf_ptr = NULL;
8605 536b9b88d1ca commit https://github.com/vim/vim/commit/0899d698030ec076eb26352cda1ea334ab0819d9 Christian Brabandt <cb@256bit.org> parents: 8603 diff changeset	3180 }
9 4102fb4ea781 updated for version 7.0002 vimboss parents: 7 diff changeset	3181 }
4102fb4ea781 updated for version 7.0002 vimboss parents: 7 diff changeset	3182
12503 4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3183 if (retval == OK)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3184 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3185 /* When not switched to another buffer, still need to set pc mark */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3186 if (curbuf == old_curbuf)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3187 setpcmark();
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3188
14250 ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	3189 if (qf_ptr != NULL)
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	3190 qf_jump_goto_line(qf_ptr->qf_lnum, qf_ptr->qf_col,
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	3191 qf_ptr->qf_viscol, qf_ptr->qf_pattern);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3192
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3193 #ifdef FEAT_FOLDING
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3194 if ((fdo_flags & FDO_QUICKFIX) && old_KeyTyped)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3195 foldOpenCursor();
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3196 #endif
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3197 if (print_message)
12503 4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3198 qf_jump_print_msg(qi, qf_index, qf_ptr, old_curbuf, old_lnum);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3199 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3200 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3201 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3202 if (opened_window)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3203 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	3204 if (qf_ptr != NULL && qf_ptr->qf_fnum != 0)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3205 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3206 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3207 * Couldn't open file, so put index back where it was. This could
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3208 * happen if the file was readonly and we changed something.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3209 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3210 failed:
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3211 qf_ptr = old_qf_ptr;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3212 qf_index = old_qf_index;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3213 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3214 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3215 theend:
8605 536b9b88d1ca commit https://github.com/vim/vim/commit/0899d698030ec076eb26352cda1ea334ab0819d9 Christian Brabandt <cb@256bit.org> parents: 8603 diff changeset	3216 if (qi != NULL)
536b9b88d1ca commit https://github.com/vim/vim/commit/0899d698030ec076eb26352cda1ea334ab0819d9 Christian Brabandt <cb@256bit.org> parents: 8603 diff changeset	3217 {
536b9b88d1ca commit https://github.com/vim/vim/commit/0899d698030ec076eb26352cda1ea334ab0819d9 Christian Brabandt <cb@256bit.org> parents: 8603 diff changeset	3218 qi->qf_lists[qi->qf_curlist].qf_ptr = qf_ptr;
536b9b88d1ca commit https://github.com/vim/vim/commit/0899d698030ec076eb26352cda1ea334ab0819d9 Christian Brabandt <cb@256bit.org> parents: 8603 diff changeset	3219 qi->qf_lists[qi->qf_curlist].qf_index = qf_index;
536b9b88d1ca commit https://github.com/vim/vim/commit/0899d698030ec076eb26352cda1ea334ab0819d9 Christian Brabandt <cb@256bit.org> parents: 8603 diff changeset	3220 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3221 if (p_swb != old_swb && opened_window)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3222 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3223 /* Restore old 'switchbuf' value, but not when an autocommand or
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3224 * modeline has changed the value. */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3225 if (p_swb == empty_option)
1621 82b5078be2dd updated for version 7.2a vimboss parents: 1571 diff changeset	3226 {
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3227 p_swb = old_swb;
1621 82b5078be2dd updated for version 7.2a vimboss parents: 1571 diff changeset	3228 swb_flags = old_swb_flags;
82b5078be2dd updated for version 7.2a vimboss parents: 1571 diff changeset	3229 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3230 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3231 free_string_option(old_swb);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3232 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3233 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3234
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3235 /*
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3236 * 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	3237 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3238 static int qfFileAttr;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3239 static int qfSepAttr;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3240 static int qfLineAttr;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3241
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3242 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3243 * 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	3244 * Used by ":clist/:llist" commands.
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3245 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3246 static void
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3247 qf_list_entry(qf_info_T qi, qfline_T qfp, int qf_idx)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3248 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3249 char_u *fname;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3250 buf_T *buf;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3251 int filter_entry;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3252
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3253 fname = NULL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3254 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	3255 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	3256 (char *)qfp->qf_module);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3257 else {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3258 if (qfp->qf_fnum != 0
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3259 && (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	3260 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3261 fname = buf->b_fname;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3262 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	3263 fname = gettail(fname);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3264 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3265 if (fname == NULL)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3266 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	3267 else
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3268 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	3269 qf_idx, (char *)fname);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3270 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3271
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3272 // 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	3273 // 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	3274 // text of the entry.
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3275 filter_entry = TRUE;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3276 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	3277 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	3278 if (filter_entry && fname != NULL)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3279 filter_entry &= message_filtered(fname);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3280 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	3281 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	3282 if (filter_entry)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3283 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	3284 if (filter_entry)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3285 return;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3286
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3287 msg_putchar('\n');
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3288 msg_outtrans_attr(IObuff, qf_idx == qi->qf_lists[qi->qf_curlist].qf_index
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3289 ? HL_ATTR(HLF_QFL) : qfFileAttr);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3290
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3291 if (qfp->qf_lnum != 0)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3292 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	3293 if (qfp->qf_lnum == 0)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3294 IObuff[0] = NUL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3295 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	3296 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	3297 else
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3298 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	3299 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	3300 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	3301 (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	3302 msg_puts_attr(IObuff, qfLineAttr);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3303 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	3304 if (qfp->qf_pattern != NULL)
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 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	3307 msg_puts(IObuff);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3308 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	3309 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3310 msg_puts((char_u *)" ");
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 /* 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	3313 * 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	3314 * with ^^^^. */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3315 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	3316 ? 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	3317 IObuff, IOSIZE);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3318 msg_prt_line(IObuff, FALSE);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3319 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	3320 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3321
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3322 /*
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3323 * ":clist": list all errors
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3324 * ":llist": list all locations
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3325 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3326 void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	3327 qf_list(exarg_T *eap)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3328 {
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	3329 qfline_T *qfp;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	3330 int i;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	3331 int idx1 = 1;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	3332 int idx2 = -1;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	3333 char_u *arg = eap->arg;
9379 b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3334 int plus = FALSE;
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	3335 int all = eap->forceit; /* if not :cl!, only show
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3336 recognised errors */
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3337 qf_info_T *qi = &ql_info;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3338
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	3339 if (is_loclist_cmd(eap->cmdidx))
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3340 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3341 qi = GET_LOC_LIST(curwin);
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3342 if (qi == NULL)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3343 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3344 EMSG(_(e_loclist));
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3345 return;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3346 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3347 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3348
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3349 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	3350 \|\| qf_list_empty(qi, qi->qf_curlist))
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3351 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3352 EMSG(_(e_quickfix));
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3353 return;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3354 }
9379 b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3355 if (*arg == '+')
b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3356 {
b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3357 ++arg;
b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3358 plus = TRUE;
b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3359 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3360 if (!get_list_range(&arg, &idx1, &idx2) \|\| *arg != NUL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3361 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3362 EMSG(_(e_trailing));
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3363 return;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3364 }
9379 b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3365 if (plus)
b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3366 {
b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3367 i = qi->qf_lists[qi->qf_curlist].qf_index;
b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3368 idx2 = i + idx1;
b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3369 idx1 = i;
b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3370 }
b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3371 else
b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3372 {
b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3373 i = qi->qf_lists[qi->qf_curlist].qf_count;
b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3374 if (idx1 < 0)
b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3375 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	3376 if (idx2 < 0)
b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3377 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	3378 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3379
13819 31bb8e1f7625 patch 8.0.1781: file names in quickfix window are not shortened Christian Brabandt <cb@256bit.org> parents: 13802 diff changeset	3380 /* 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	3381 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	3382
12912 888441e8fbb0 patch 8.0.1332: highlighting in quickfix window could be better Christian Brabandt <cb@256bit.org> parents: 12531 diff changeset	3383 /*
888441e8fbb0 patch 8.0.1332: highlighting in quickfix window could be better Christian Brabandt <cb@256bit.org> parents: 12531 diff changeset	3384 * 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	3385 * 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	3386 */
888441e8fbb0 patch 8.0.1332: highlighting in quickfix window could be better Christian Brabandt <cb@256bit.org> parents: 12531 diff changeset	3387 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	3388 if (qfFileAttr == 0)
888441e8fbb0 patch 8.0.1332: highlighting in quickfix window could be better Christian Brabandt <cb@256bit.org> parents: 12531 diff changeset	3389 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	3390 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	3391 if (qfSepAttr == 0)
888441e8fbb0 patch 8.0.1332: highlighting in quickfix window could be better Christian Brabandt <cb@256bit.org> parents: 12531 diff changeset	3392 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	3393 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	3394 if (qfLineAttr == 0)
888441e8fbb0 patch 8.0.1332: highlighting in quickfix window could be better Christian Brabandt <cb@256bit.org> parents: 12531 diff changeset	3395 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	3396
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3397 if (qi->qf_lists[qi->qf_curlist].qf_nonevalid)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3398 all = TRUE;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3399 qfp = qi->qf_lists[qi->qf_curlist].qf_start;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3400 for (i = 1; !got_int && i <= qi->qf_lists[qi->qf_curlist].qf_count; )
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3401 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3402 if ((qfp->qf_valid \|\| all) && idx1 <= i && i <= idx2)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3403 {
2047 85da03763130 updated for version 7.2.333 Bram Moolenaar <bram@zimbu.org> parents: 1918 diff changeset	3404 if (got_int)
85da03763130 updated for version 7.2.333 Bram Moolenaar <bram@zimbu.org> parents: 1918 diff changeset	3405 break;
446 7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	3406
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3407 qf_list_entry(qi, qfp, i);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3408 }
446 7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	3409
7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	3410 qfp = qfp->qf_next;
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	3411 if (qfp == NULL)
543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	3412 break;
446 7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	3413 ++i;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3414 ui_breakcheck();
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3415 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3416 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3417
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3418 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3419 * Remove newlines and leading whitespace from an error message.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3420 * Put the result in "buf[bufsize]".
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3421 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3422 static void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	3423 qf_fmt_text(char_u text, char_u buf, int bufsize)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3424 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3425 int i;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3426 char_u *p = text;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3427
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3428 for (i = 0; *p != NUL && i < bufsize - 1; ++i)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3429 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3430 if (*p == '\n')
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3431 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3432 buf[i] = ' ';
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3433 while (*++p != NUL)
11129 f4ea50924c6d patch 8.0.0452: some macros are in lower case Christian Brabandt <cb@256bit.org> parents: 11063 diff changeset	3434 if (!VIM_ISWHITE(p) && p != '\n')
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3435 break;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3436 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3437 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3438 buf[i] = *p++;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3439 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3440 buf[i] = NUL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3441 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3442
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	3443 /*
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	3444 * 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	3445 * quickfix/location list.
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	3446 */
9538 26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3447 static void
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3448 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	3449 {
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3450 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	3451 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	3452 char_u buf[IOSIZE];
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3453
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3454 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	3455 lead,
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3456 which + 1,
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3457 qi->qf_listcount,
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3458 count);
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3459
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3460 if (title != NULL)
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3461 {
9579 2fb7e008ac9b commit https://github.com/vim/vim/commit/16ec3c9be3fcdc38530bddb12978bc5a7b98c0f6 Christian Brabandt <cb@256bit.org> parents: 9573 diff changeset	3462 size_t len = STRLEN(buf);
2fb7e008ac9b commit https://github.com/vim/vim/commit/16ec3c9be3fcdc38530bddb12978bc5a7b98c0f6 Christian Brabandt <cb@256bit.org> parents: 9573 diff changeset	3463
2fb7e008ac9b commit https://github.com/vim/vim/commit/16ec3c9be3fcdc38530bddb12978bc5a7b98c0f6 Christian Brabandt <cb@256bit.org> parents: 9573 diff changeset	3464 if (len < 34)
2fb7e008ac9b commit https://github.com/vim/vim/commit/16ec3c9be3fcdc38530bddb12978bc5a7b98c0f6 Christian Brabandt <cb@256bit.org> parents: 9573 diff changeset	3465 {
2fb7e008ac9b commit https://github.com/vim/vim/commit/16ec3c9be3fcdc38530bddb12978bc5a7b98c0f6 Christian Brabandt <cb@256bit.org> parents: 9573 diff changeset	3466 vim_memset(buf + len, ' ', 34 - len);
2fb7e008ac9b commit https://github.com/vim/vim/commit/16ec3c9be3fcdc38530bddb12978bc5a7b98c0f6 Christian Brabandt <cb@256bit.org> parents: 9573 diff changeset	3467 buf[34] = NUL;
2fb7e008ac9b commit https://github.com/vim/vim/commit/16ec3c9be3fcdc38530bddb12978bc5a7b98c0f6 Christian Brabandt <cb@256bit.org> parents: 9573 diff changeset	3468 }
2fb7e008ac9b commit https://github.com/vim/vim/commit/16ec3c9be3fcdc38530bddb12978bc5a7b98c0f6 Christian Brabandt <cb@256bit.org> parents: 9573 diff changeset	3469 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	3470 }
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3471 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	3472 msg(buf);
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3473 }
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3474
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3475 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3476 * ":colder [count]": Up in the quickfix stack.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3477 * ":cnewer [count]": Down in the quickfix stack.
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3478 * ":lolder [count]": Up in the location list stack.
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3479 * ":lnewer [count]": Down in the location list stack.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3480 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3481 void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	3482 qf_age(exarg_T *eap)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3483 {
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3484 qf_info_T *qi = &ql_info;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3485 int count;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3486
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	3487 if (is_loclist_cmd(eap->cmdidx))
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3488 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3489 qi = GET_LOC_LIST(curwin);
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3490 if (qi == NULL)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3491 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3492 EMSG(_(e_loclist));
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3493 return;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3494 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3495 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3496
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3497 if (eap->addr_count != 0)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3498 count = eap->line2;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3499 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3500 count = 1;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3501 while (count--)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3502 {
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3503 if (eap->cmdidx == CMD_colder \|\| eap->cmdidx == CMD_lolder)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3504 {
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3505 if (qi->qf_curlist == 0)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3506 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3507 EMSG(_("E380: At bottom of quickfix stack"));
4371 000bb500208d updated for version 7.3.934 Bram Moolenaar <bram@vim.org> parents: 4352 diff changeset	3508 break;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3509 }
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3510 --qi->qf_curlist;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3511 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3512 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3513 {
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3514 if (qi->qf_curlist >= qi->qf_listcount - 1)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3515 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3516 EMSG(_("E381: At top of quickfix stack"));
4371 000bb500208d updated for version 7.3.934 Bram Moolenaar <bram@vim.org> parents: 4352 diff changeset	3517 break;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3518 }
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3519 ++qi->qf_curlist;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3520 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3521 }
9538 26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3522 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	3523 qf_update_buffer(qi, NULL);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3524 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3525
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	3526 /*
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	3527 * 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	3528 */
9538 26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3529 void
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3530 qf_history(exarg_T *eap)
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3531 {
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3532 qf_info_T *qi = &ql_info;
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3533 int i;
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3534
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	3535 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	3536 qi = GET_LOC_LIST(curwin);
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3537 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	3538 && 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	3539 MSG(_("No entries"));
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3540 else
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3541 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	3542 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	3543 }
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3544
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3545 /*
11549 f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	3546 * 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	3547 * associated with the list like context and title are not freed.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3548 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3549 static void
11549 f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	3550 qf_free_items(qf_info_T *qi, int idx)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3551 {
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	3552 qfline_T *qfp;
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	3553 qfline_T *qfpnext;
3982 4934eb2e22dc updated for version 7.3.746 Bram Moolenaar <bram@vim.org> parents: 3974 diff changeset	3554 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	3555 qf_list_T *qfl = &qi->qf_lists[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	3556
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	3557 while (qfl->qf_count && qfl->qf_start != NULL)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3558 {
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	3559 qfp = qfl->qf_start;
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	3560 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	3561 if (!stop)
3949 37a4cacd2051 updated for version 7.3.730 Bram Moolenaar <bram@vim.org> parents: 3939 diff changeset	3562 {
13821 98274127d675 patch 8.0.1782: no simple way to label quickfix entries Christian Brabandt <cb@256bit.org> parents: 13819 diff changeset	3563 vim_free(qfp->qf_module);
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	3564 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	3565 vim_free(qfp->qf_pattern);
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	3566 stop = (qfp == qfpnext);
543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	3567 vim_free(qfp);
3982 4934eb2e22dc updated for version 7.3.746 Bram Moolenaar <bram@vim.org> parents: 3974 diff changeset	3568 if (stop)
4934eb2e22dc updated for version 7.3.746 Bram Moolenaar <bram@vim.org> parents: 3974 diff changeset	3569 /* 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	3570 * to avoid crashing when it's wrong.
4934eb2e22dc updated for version 7.3.746 Bram Moolenaar <bram@vim.org> parents: 3974 diff changeset	3571 * 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	3572 qfl->qf_count = 1;
3949 37a4cacd2051 updated for version 7.3.730 Bram Moolenaar <bram@vim.org> parents: 3939 diff changeset	3573 }
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	3574 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	3575 --qfl->qf_count;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3576 }
11549 f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	3577
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	3578 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	3579 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	3580 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	3581 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	3582 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	3583
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	3584 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	3585 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	3586 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	3587 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	3588 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	3589 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	3590 qfl->qf_multiscan = FALSE;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3591 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3592
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3593 /*
11549 f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	3594 * 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	3595 * 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	3596 */
f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	3597 static void
f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	3598 qf_free(qf_info_T *qi, int idx)
f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	3599 {
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	3600 qf_list_T *qfl = &qi->qf_lists[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	3601
11549 f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	3602 qf_free_items(qi, idx);
f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	3603
13244 ac42c4b11dbc patch 8.0.1496: clearing a pointer takes two lines Christian Brabandt <cb@256bit.org> parents: 13115 diff changeset	3604 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	3605 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	3606 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	3607 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	3608 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	3609 }
f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	3610
f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	3611 /*
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3612 * qf_mark_adjust: adjust marks
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3613 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3614 void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	3615 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	3616 win_T *wp,
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	3617 linenr_T line1,
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	3618 linenr_T line2,
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	3619 long amount,
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	3620 long amount_after)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3621 {
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	3622 int i;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	3623 qfline_T *qfp;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	3624 int idx;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3625 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	3626 int found_one = FALSE;
9608 fa64afb99dda commit https://github.com/vim/vim/commit/c1542744e788d96fed24dd421f43009288092504 Christian Brabandt <cb@256bit.org> parents: 9579 diff changeset	3627 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	3628
fa64afb99dda commit https://github.com/vim/vim/commit/c1542744e788d96fed24dd421f43009288092504 Christian Brabandt <cb@256bit.org> parents: 9579 diff changeset	3629 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	3630 return;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3631 if (wp != NULL)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3632 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3633 if (wp->w_llist == NULL)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3634 return;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3635 qi = wp->w_llist;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3636 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3637
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3638 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	3639 if (!qf_list_empty(qi, idx))
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3640 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	3641 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	3642 ++i, qfp = qfp->qf_next)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3643 if (qfp->qf_fnum == curbuf->b_fnum)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3644 {
9201 692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	3645 found_one = TRUE;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3646 if (qfp->qf_lnum >= line1 && qfp->qf_lnum <= line2)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3647 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3648 if (amount == MAXLNUM)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3649 qfp->qf_cleared = TRUE;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3650 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3651 qfp->qf_lnum += amount;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3652 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3653 else if (amount_after && qfp->qf_lnum > line2)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3654 qfp->qf_lnum += amount_after;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3655 }
9201 692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	3656
692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	3657 if (!found_one)
9608 fa64afb99dda commit https://github.com/vim/vim/commit/c1542744e788d96fed24dd421f43009288092504 Christian Brabandt <cb@256bit.org> parents: 9579 diff changeset	3658 curbuf->b_has_qf_entry &= ~buf_has_flag;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3659 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3660
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3661 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3662 * Make a nice message out of the error character and the error number:
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3663 * char number message
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3664 * e or E 0 " error"
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3665 * w or W 0 " warning"
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3666 * i or I 0 " info"
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3667 * 0 0 ""
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3668 * other 0 " c"
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3669 * e or E n " error n"
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3670 * w or W n " warning n"
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3671 * i or I n " info n"
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3672 * 0 n " error n"
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3673 * other n " c n"
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3674 * 1 x "" :helpgrep
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3675 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3676 static char_u *
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	3677 qf_types(int c, int nr)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3678 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3679 static char_u buf[20];
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3680 static char_u cc[3];
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3681 char_u *p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3682
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3683 if (c == 'W' \|\| c == 'w')
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3684 p = (char_u *)" warning";
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3685 else if (c == 'I' \|\| c == 'i')
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3686 p = (char_u *)" info";
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3687 else if (c == 'E' \|\| c == 'e' \|\| (c == 0 && nr > 0))
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3688 p = (char_u *)" error";
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3689 else if (c == 0 \|\| c == 1)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3690 p = (char_u *)"";
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3691 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3692 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3693 cc[0] = ' ';
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3694 cc[1] = c;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3695 cc[2] = NUL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3696 p = cc;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3697 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3698
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3699 if (nr <= 0)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3700 return p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3701
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3702 sprintf((char )buf, "%s %3d", (char )p, nr);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3703 return buf;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3704 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3705
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3706 /*
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	3707 * 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	3708 * 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	3709 */
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	3710 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	3711 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	3712 {
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	3713 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	3714
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	3715 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	3716 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	3717
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	3718 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	3719 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	3720
14491 9df0fcbfebb2 patch 8.1.0259: no test for fixed quickfix issue Christian Brabandt <cb@256bit.org> parents: 14477 diff changeset	3721 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	3722 {
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	3723 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	3724 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	3725 }
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	3726
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	3727 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	3728 {
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	3729 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	3730
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	3731 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	3732 (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	3733 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	3734 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	3735 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	3736 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	3737 }
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	3738
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	3739 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	3740 }
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	3741
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	3742 /*
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3743 * ":cwindow": open the quickfix window if we have errors to display,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3744 * close it if not.
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3745 * ":lwindow": open the location list window if we have locations to display,
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3746 * close it if not.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3747 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3748 void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	3749 ex_cwindow(exarg_T *eap)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3750 {
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3751 qf_info_T *qi = &ql_info;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3752 win_T *win;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3753
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	3754 if (is_loclist_cmd(eap->cmdidx))
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3755 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3756 qi = GET_LOC_LIST(curwin);
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3757 if (qi == NULL)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3758 return;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3759 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3760
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3761 /* Look for an existing quickfix window. */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3762 win = qf_find_win(qi);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3763
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3764 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3765 * If a quickfix window is open but we have no errors to display,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3766 * close the window. If a quickfix window is not open, then open
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3767 * it if we have errors; otherwise, leave it closed.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3768 */
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3769 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	3770 \|\| qf_list_empty(qi, qi->qf_curlist)
857 b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	3771 \|\| qi->qf_curlist >= qi->qf_listcount)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3772 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3773 if (win != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3774 ex_cclose(eap);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3775 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3776 else if (win == NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3777 ex_copen(eap);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3778 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3779
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3780 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3781 * ":cclose": close the window showing the list of errors.
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3782 * ":lclose": close the window showing the location list
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3783 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3784 void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	3785 ex_cclose(exarg_T *eap)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3786 {
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3787 win_T *win = NULL;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3788 qf_info_T *qi = &ql_info;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3789
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	3790 if (is_loclist_cmd(eap->cmdidx))
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3791 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3792 qi = GET_LOC_LIST(curwin);
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3793 if (qi == NULL)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3794 return;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3795 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3796
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3797 /* Find existing quickfix window and close it. */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3798 win = qf_find_win(qi);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3799 if (win != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3800 win_close(win, FALSE);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3801 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3802
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3803 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3804 * ":copen": open a window that shows the list of errors.
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3805 * ":lopen": open a window that shows the location list.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3806 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3807 void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	3808 ex_copen(exarg_T *eap)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3809 {
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3810 qf_info_T *qi = &ql_info;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3811 int height;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3812 win_T *win;
682 f1b013312711 updated for version 7.0205 vimboss parents: 681 diff changeset	3813 tabpage_T *prevtab = curtab;
859 99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	3814 buf_T *qf_buf;
1743 734d5bdae499 updated for version 7.2-041 vimboss parents: 1683 diff changeset	3815 win_T *oldwin = curwin;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3816
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	3817 if (is_loclist_cmd(eap->cmdidx))
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3818 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3819 qi = GET_LOC_LIST(curwin);
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3820 if (qi == NULL)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3821 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3822 EMSG(_(e_loclist));
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3823 return;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3824 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3825 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3826
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3827 if (eap->addr_count != 0)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3828 height = eap->line2;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3829 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3830 height = QF_WINHEIGHT;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3831
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3832 reset_VIsual_and_resel(); /* stop Visual mode */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3833 #ifdef FEAT_GUI
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3834 need_mouse_correct = TRUE;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3835 #endif
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3836
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3837 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3838 * Find existing quickfix window, or open a new one.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3839 */
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3840 win = qf_find_win(qi);
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3841
682 f1b013312711 updated for version 7.0205 vimboss parents: 681 diff changeset	3842 if (win != NULL && cmdmod.tab == 0)
5753 a548aae15b3a updated for version 7.4.221 Bram Moolenaar <bram@vim.org> parents: 5735 diff changeset	3843 {
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3844 win_goto(win);
5753 a548aae15b3a updated for version 7.4.221 Bram Moolenaar <bram@vim.org> parents: 5735 diff changeset	3845 if (eap->addr_count != 0)
a548aae15b3a updated for version 7.4.221 Bram Moolenaar <bram@vim.org> parents: 5735 diff changeset	3846 {
a548aae15b3a updated for version 7.4.221 Bram Moolenaar <bram@vim.org> parents: 5735 diff changeset	3847 if (cmdmod.split & WSP_VERT)
a548aae15b3a updated for version 7.4.221 Bram Moolenaar <bram@vim.org> parents: 5735 diff changeset	3848 {
12515 972ea22c946f patch 8.0.1136: W_WIDTH() is always the same Christian Brabandt <cb@256bit.org> parents: 12503 diff changeset	3849 if (height != win->w_width)
5753 a548aae15b3a updated for version 7.4.221 Bram Moolenaar <bram@vim.org> parents: 5735 diff changeset	3850 win_setwidth(height);
a548aae15b3a updated for version 7.4.221 Bram Moolenaar <bram@vim.org> parents: 5735 diff changeset	3851 }
8643 24b43dd167eb commit https://github.com/vim/vim/commit/44a2f923c00f1384c9ecde12fb5b4711bc20702e Christian Brabandt <cb@256bit.org> parents: 8605 diff changeset	3852 else if (height != win->w_height)
5753 a548aae15b3a updated for version 7.4.221 Bram Moolenaar <bram@vim.org> parents: 5735 diff changeset	3853 win_setheight(height);
a548aae15b3a updated for version 7.4.221 Bram Moolenaar <bram@vim.org> parents: 5735 diff changeset	3854 }
a548aae15b3a updated for version 7.4.221 Bram Moolenaar <bram@vim.org> parents: 5735 diff changeset	3855 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3856 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3857 {
13105 bfa7f5b23c53 patch 8.0.1427: the :leftabove modifier doesn't work for :copen Christian Brabandt <cb@256bit.org> parents: 13090 diff changeset	3858 int flags = 0;
bfa7f5b23c53 patch 8.0.1427: the :leftabove modifier doesn't work for :copen Christian Brabandt <cb@256bit.org> parents: 13090 diff changeset	3859
859 99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	3860 qf_buf = qf_find_buf(qi);
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	3861
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3862 /* The current window becomes the previous window afterwards. */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3863 win = curwin;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3864
3939 f4aa43d952f5 updated for version 7.3.725 Bram Moolenaar <bram@vim.org> parents: 3918 diff changeset	3865 if ((eap->cmdidx == CMD_copen \|\| eap->cmdidx == CMD_cwindow)
f4aa43d952f5 updated for version 7.3.725 Bram Moolenaar <bram@vim.org> parents: 3918 diff changeset	3866 && cmdmod.split == 0)
13105 bfa7f5b23c53 patch 8.0.1427: the :leftabove modifier doesn't work for :copen Christian Brabandt <cb@256bit.org> parents: 13090 diff changeset	3867 /* Create the new quickfix window at the very bottom, except when
3939 f4aa43d952f5 updated for version 7.3.725 Bram Moolenaar <bram@vim.org> parents: 3918 diff changeset	3868 * :belowright or :aboveleft is used. */
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3869 win_goto(lastwin);
13105 bfa7f5b23c53 patch 8.0.1427: the :leftabove modifier doesn't work for :copen Christian Brabandt <cb@256bit.org> parents: 13090 diff changeset	3870 /* Default is to open the window below the current window */
bfa7f5b23c53 patch 8.0.1427: the :leftabove modifier doesn't work for :copen Christian Brabandt <cb@256bit.org> parents: 13090 diff changeset	3871 if (cmdmod.split == 0)
bfa7f5b23c53 patch 8.0.1427: the :leftabove modifier doesn't work for :copen Christian Brabandt <cb@256bit.org> parents: 13090 diff changeset	3872 flags = WSP_BELOW;
bfa7f5b23c53 patch 8.0.1427: the :leftabove modifier doesn't work for :copen Christian Brabandt <cb@256bit.org> parents: 13090 diff changeset	3873 flags \|= WSP_NEWLOC;
bfa7f5b23c53 patch 8.0.1427: the :leftabove modifier doesn't work for :copen Christian Brabandt <cb@256bit.org> parents: 13090 diff changeset	3874 if (win_split(height, flags) == FAIL)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3875 return; /* not enough room for window */
2583 7c2e6ba1d702 updated for version 7.3.008 Bram Moolenaar <bram@vim.org> parents: 2576 diff changeset	3876 RESET_BINDING(curwin);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3877
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3878 if (eap->cmdidx == CMD_lopen \|\| eap->cmdidx == CMD_lwindow)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3879 {
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3880 /*
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3881 * For the location list window, create a reference to the
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3882 * location list from the window 'win'.
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3883 */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3884 curwin->w_llist_ref = win->w_llist;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3885 win->w_llist->qf_refcount++;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3886 }
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3887
1743 734d5bdae499 updated for version 7.2-041 vimboss parents: 1683 diff changeset	3888 if (oldwin != curwin)
734d5bdae499 updated for version 7.2-041 vimboss parents: 1683 diff changeset	3889 oldwin = NULL; /* don't store info when in another window */
859 99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	3890 if (qf_buf != NULL)
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	3891 /* Use the existing quickfix buffer */
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	3892 (void)do_ecmd(qf_buf->b_fnum, NULL, NULL, NULL, ECMD_ONE,
1743 734d5bdae499 updated for version 7.2-041 vimboss parents: 1683 diff changeset	3893 ECMD_HIDE + ECMD_OLDBUF, oldwin);
859 99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	3894 else
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	3895 {
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	3896 /* Create a new quickfix buffer */
1743 734d5bdae499 updated for version 7.2-041 vimboss parents: 1683 diff changeset	3897 (void)do_ecmd(0, NULL, NULL, NULL, ECMD_ONE, ECMD_HIDE, oldwin);
859 99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	3898 /* switch off 'swapfile' */
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	3899 set_option_value((char_u *)"swf", 0L, NULL, OPT_LOCAL);
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	3900 set_option_value((char_u )"bt", 0L, (char_u )"quickfix",
729 3d0ca316efab updated for version 7.0221 vimboss parents: 717 diff changeset	3901 OPT_LOCAL);
859 99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	3902 set_option_value((char_u )"bh", 0L, (char_u )"wipe", OPT_LOCAL);
2651 b254cfdd7405 updated for version 7.3.071 Bram Moolenaar <bram@vim.org> parents: 2646 diff changeset	3903 RESET_BINDING(curwin);
1864 05c8ff7f1284 updated for version 7.2-162 vimboss parents: 1822 diff changeset	3904 #ifdef FEAT_DIFF
05c8ff7f1284 updated for version 7.2-162 vimboss parents: 1822 diff changeset	3905 curwin->w_p_diff = FALSE;
05c8ff7f1284 updated for version 7.2-162 vimboss parents: 1822 diff changeset	3906 #endif
05c8ff7f1284 updated for version 7.2-162 vimboss parents: 1822 diff changeset	3907 #ifdef FEAT_FOLDING
05c8ff7f1284 updated for version 7.2-162 vimboss parents: 1822 diff changeset	3908 set_option_value((char_u )"fdm", 0L, (char_u )"manual",
05c8ff7f1284 updated for version 7.2-162 vimboss parents: 1822 diff changeset	3909 OPT_LOCAL);
05c8ff7f1284 updated for version 7.2-162 vimboss parents: 1822 diff changeset	3910 #endif
859 99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	3911 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3912
682 f1b013312711 updated for version 7.0205 vimboss parents: 681 diff changeset	3913 /* Only set the height when still in the same tab page and there is no
f1b013312711 updated for version 7.0205 vimboss parents: 681 diff changeset	3914 * window to the side. */
8643 24b43dd167eb commit https://github.com/vim/vim/commit/44a2f923c00f1384c9ecde12fb5b4711bc20702e Christian Brabandt <cb@256bit.org> parents: 8605 diff changeset	3915 if (curtab == prevtab && curwin->w_width == Columns)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3916 win_setheight(height);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3917 curwin->w_p_wfh = TRUE; /* set 'winfixheight' */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3918 if (win_valid(win))
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3919 prevwin = win;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3920 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3921
6793 e1d59836eecc patch 7.4.718 Bram Moolenaar <bram@vim.org> parents: 6721 diff changeset	3922 qf_set_title_var(qi);
e1d59836eecc patch 7.4.718 Bram Moolenaar <bram@vim.org> parents: 6721 diff changeset	3923
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3924 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3925 * Fill the buffer with the quickfix list.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3926 */
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	3927 qf_fill_buffer(qi, curbuf, NULL);
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3928
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3929 curwin->w_cursor.lnum = qi->qf_lists[qi->qf_curlist].qf_index;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3930 curwin->w_cursor.col = 0;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3931 check_cursor();
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3932 update_topline(); /* scroll to show the line */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3933 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3934
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3935 /*
9432 abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3936 * 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	3937 */
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3938 static void
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3939 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	3940 {
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3941 win_T *old_curwin = curwin;
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3942
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3943 curwin = win;
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3944 curbuf = win->w_buffer;
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3945 curwin->w_cursor.lnum = lnum;
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3946 curwin->w_cursor.col = 0;
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3947 #ifdef FEAT_VIRTUALEDIT
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3948 curwin->w_cursor.coladd = 0;
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3949 #endif
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3950 curwin->w_curswant = 0;
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3951 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	3952 redraw_later(VALID);
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3953 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	3954 curwin = old_curwin;
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3955 curbuf = curwin->w_buffer;
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3956 }
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3957
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3958 /*
9458 374afcf9d11d commit https://github.com/vim/vim/commit/537ef08408c50e0c4104d57f74993b3b0ed9560d Christian Brabandt <cb@256bit.org> parents: 9432 diff changeset	3959 * :cbottom/:lbottom commands.
9432 abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3960 */
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3961 void
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	3962 ex_cbottom(exarg_T *eap)
9432 abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3963 {
9458 374afcf9d11d commit https://github.com/vim/vim/commit/537ef08408c50e0c4104d57f74993b3b0ed9560d Christian Brabandt <cb@256bit.org> parents: 9432 diff changeset	3964 qf_info_T *qi = &ql_info;
374afcf9d11d commit https://github.com/vim/vim/commit/537ef08408c50e0c4104d57f74993b3b0ed9560d Christian Brabandt <cb@256bit.org> parents: 9432 diff changeset	3965 win_T *win;
374afcf9d11d commit https://github.com/vim/vim/commit/537ef08408c50e0c4104d57f74993b3b0ed9560d Christian Brabandt <cb@256bit.org> parents: 9432 diff changeset	3966
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	3967 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	3968 {
374afcf9d11d commit https://github.com/vim/vim/commit/537ef08408c50e0c4104d57f74993b3b0ed9560d Christian Brabandt <cb@256bit.org> parents: 9432 diff changeset	3969 qi = GET_LOC_LIST(curwin);
374afcf9d11d commit https://github.com/vim/vim/commit/537ef08408c50e0c4104d57f74993b3b0ed9560d Christian Brabandt <cb@256bit.org> parents: 9432 diff changeset	3970 if (qi == NULL)
374afcf9d11d commit https://github.com/vim/vim/commit/537ef08408c50e0c4104d57f74993b3b0ed9560d Christian Brabandt <cb@256bit.org> parents: 9432 diff changeset	3971 {
374afcf9d11d commit https://github.com/vim/vim/commit/537ef08408c50e0c4104d57f74993b3b0ed9560d Christian Brabandt <cb@256bit.org> parents: 9432 diff changeset	3972 EMSG(_(e_loclist));
374afcf9d11d commit https://github.com/vim/vim/commit/537ef08408c50e0c4104d57f74993b3b0ed9560d Christian Brabandt <cb@256bit.org> parents: 9432 diff changeset	3973 return;
374afcf9d11d commit https://github.com/vim/vim/commit/537ef08408c50e0c4104d57f74993b3b0ed9560d Christian Brabandt <cb@256bit.org> parents: 9432 diff changeset	3974 }
374afcf9d11d commit https://github.com/vim/vim/commit/537ef08408c50e0c4104d57f74993b3b0ed9560d Christian Brabandt <cb@256bit.org> parents: 9432 diff changeset	3975 }
374afcf9d11d commit https://github.com/vim/vim/commit/537ef08408c50e0c4104d57f74993b3b0ed9560d Christian Brabandt <cb@256bit.org> parents: 9432 diff changeset	3976
374afcf9d11d commit https://github.com/vim/vim/commit/537ef08408c50e0c4104d57f74993b3b0ed9560d Christian Brabandt <cb@256bit.org> parents: 9432 diff changeset	3977 win = qf_find_win(qi);
9432 abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3978 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	3979 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	3980 }
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3981
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3982 /*
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3983 * Return the number of the current entry (line number in the quickfix
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3984 * window).
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3985 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3986 linenr_T
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	3987 qf_current_entry(win_T *wp)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3988 {
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3989 qf_info_T *qi = &ql_info;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3990
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3991 if (IS_LL_WINDOW(wp))
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3992 /* In the location list window, use the referenced location list */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3993 qi = wp->w_llist_ref;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3994
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3995 return qi->qf_lists[qi->qf_curlist].qf_index;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3996 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3997
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3998 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3999 * Update the cursor position in the quickfix window to the current error.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4000 * Return TRUE if there is a quickfix window.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4001 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4002 static int
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4003 qf_win_pos_update(
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4004 qf_info_T *qi,
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4005 int old_qf_index) /* previous qf_index or zero */
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4006 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4007 win_T *win;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4008 int qf_index = qi->qf_lists[qi->qf_curlist].qf_index;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4009
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4010 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4011 * Put the cursor on the current error in the quickfix window, so that
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4012 * it's viewable.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4013 */
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4014 win = qf_find_win(qi);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4015 if (win != NULL
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4016 && qf_index <= win->w_buffer->b_ml.ml_line_count
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4017 && old_qf_index != qf_index)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4018 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4019 if (qf_index > old_qf_index)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4020 {
9432 abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4021 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	4022 win->w_redraw_bot = qf_index;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4023 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4024 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4025 {
9432 abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4026 win->w_redraw_top = qf_index;
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4027 win->w_redraw_bot = old_qf_index;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4028 }
9432 abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4029 qf_win_goto(win, qf_index);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4030 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4031 return win != NULL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4032 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4033
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4034 /*
859 99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4035 * Check whether the given window is displaying the specified quickfix/location
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4036 * list buffer
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4037 */
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4038 static int
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4039 is_qf_win(win_T win, qf_info_T qi)
859 99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4040 {
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4041 /*
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4042 * A window displaying the quickfix buffer will have the w_llist_ref field
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4043 * set to NULL.
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4044 * A window displaying a location list buffer will have the w_llist_ref
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4045 * pointing to the location list.
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4046 */
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4047 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	4048 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	4049 \|\| (IS_LL_STACK(qi) && win->w_llist_ref == qi))
859 99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4050 return TRUE;
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4051
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4052 return FALSE;
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4053 }
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4054
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4055 /*
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4056 * Find a window displaying the quickfix/location list '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	4057 * Only searches in the current tabpage.
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4058 */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4059 static win_T *
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4060 qf_find_win(qf_info_T *qi)
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4061 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4062 win_T *win;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4063
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4064 FOR_ALL_WINDOWS(win)
859 99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4065 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	4066 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	4067 return NULL;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4068 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4069
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4070 /*
859 99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4071 * Find a quickfix buffer.
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4072 * Searches in windows opened in all the tabs.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4073 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4074 static buf_T *
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4075 qf_find_buf(qf_info_T *qi)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4076 {
859 99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4077 tabpage_T *tp;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4078 win_T *win;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4079
859 99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4080 FOR_ALL_TAB_WINDOWS(tp, win)
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4081 if (is_qf_win(win, qi))
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4082 return win->w_buffer;
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4083
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4084 return NULL;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4085 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4086
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4087 /*
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4088 * 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	4089 */
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4090 static void
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4091 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	4092 {
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4093 win_T *win;
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4094 win_T *curwin_save;
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4095
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4096 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	4097 {
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4098 curwin_save = curwin;
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4099 curwin = win;
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4100 qf_set_title_var(qi);
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4101 curwin = curwin_save;
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4102 }
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4103 }
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4104
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4105 /*
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4106 * Find the quickfix buffer. If it exists, update the contents.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4107 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4108 static void
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4109 qf_update_buffer(qf_info_T qi, qfline_T old_last)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4110 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4111 buf_T *buf;
3016 58bba69b3371 updated for version 7.3.280 Bram Moolenaar <bram@vim.org> parents: 3002 diff changeset	4112 win_T *win;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4113 aco_save_T aco;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4114
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4115 /* Check if a buffer for the quickfix list exists. Update it. */
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4116 buf = qf_find_buf(qi);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4117 if (buf != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4118 {
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4119 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	4120
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4121 if (old_last == NULL)
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4122 /* 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	4123 aucmd_prepbuf(&aco, buf);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4124
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4125 qf_update_win_titlevar(qi);
3016 58bba69b3371 updated for version 7.3.280 Bram Moolenaar <bram@vim.org> parents: 3002 diff changeset	4126
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4127 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	4128 ++CHANGEDTICK(buf);
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4129
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4130 if (old_last == NULL)
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4131 {
8932 25c2031e9f9f commit https://github.com/vim/vim/commit/c1808d5822ed9534ef7f0fe509b15bee92a5cc28 Christian Brabandt <cb@256bit.org> parents: 8751 diff changeset	4132 (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	4133
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4134 /* 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	4135 aucmd_restbuf(&aco);
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4136 }
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4137
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4138 /* 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	4139 * 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	4140 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	4141 redraw_buf_later(buf, NOT_VALID);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4142 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4143 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4144
6793 e1d59836eecc patch 7.4.718 Bram Moolenaar <bram@vim.org> parents: 6721 diff changeset	4145 /*
e1d59836eecc patch 7.4.718 Bram Moolenaar <bram@vim.org> parents: 6721 diff changeset	4146 * Set "w:quickfix_title" if "qi" has a title.
e1d59836eecc patch 7.4.718 Bram Moolenaar <bram@vim.org> parents: 6721 diff changeset	4147 */
3016 58bba69b3371 updated for version 7.3.280 Bram Moolenaar <bram@vim.org> parents: 3002 diff changeset	4148 static void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4149 qf_set_title_var(qf_info_T *qi)
3016 58bba69b3371 updated for version 7.3.280 Bram Moolenaar <bram@vim.org> parents: 3002 diff changeset	4150 {
6793 e1d59836eecc patch 7.4.718 Bram Moolenaar <bram@vim.org> parents: 6721 diff changeset	4151 if (qi->qf_lists[qi->qf_curlist].qf_title != NULL)
e1d59836eecc patch 7.4.718 Bram Moolenaar <bram@vim.org> parents: 6721 diff changeset	4152 set_internal_string_var((char_u *)"w:quickfix_title",
3016 58bba69b3371 updated for version 7.3.280 Bram Moolenaar <bram@vim.org> parents: 3002 diff changeset	4153 qi->qf_lists[qi->qf_curlist].qf_title);
58bba69b3371 updated for version 7.3.280 Bram Moolenaar <bram@vim.org> parents: 3002 diff changeset	4154 }
58bba69b3371 updated for version 7.3.280 Bram Moolenaar <bram@vim.org> parents: 3002 diff changeset	4155
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4156 /*
13992 710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4157 * 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	4158 */
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4159 static int
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4160 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	4161 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4162 int len;
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4163 buf_T *errbuf;
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4164
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4165 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	4166 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4167 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	4168 len = (int)STRLEN(IObuff);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4169 }
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4170 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	4171 && (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	4172 && errbuf->b_fname != NULL)
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4173 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4174 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	4175 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	4176 else
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4177 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4178 /* 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	4179 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	4180 \|\| 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	4181 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4182 if (*dirname == NUL)
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4183 mch_dirname(dirname, MAXPATHL);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4184 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	4185 }
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4186 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	4187 }
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4188 len = (int)STRLEN(IObuff);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4189 }
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4190 else
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4191 len = 0;
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4192 IObuff[len++] = '\|';
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4193
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4194 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	4195 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4196 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	4197 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	4198
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4199 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	4200 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4201 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	4202 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	4203 }
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4204
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4205 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	4206 (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	4207 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	4208 }
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4209 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	4210 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4211 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	4212 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	4213 }
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4214 IObuff[len++] = '\|';
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4215 IObuff[len++] = ' ';
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4216
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4217 /* 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	4218 * 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	4219 * mark a word with ^^^^. */
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4220 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	4221 IObuff + len, IOSIZE - len);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4222
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4223 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	4224 (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	4225 return FAIL;
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4226
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4227 return OK;
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4228 }
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4229
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4230 /*
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4231 * Fill current buffer with quickfix errors, replacing any previous contents.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4232 * 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	4233 * 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	4234 * 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	4235 * ml_delete() is used and autocommands will be triggered.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4236 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4237 static void
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4238 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	4239 {
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	4240 linenr_T lnum;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	4241 qfline_T *qfp;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	4242 int old_KeyTyped = KeyTyped;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4243
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4244 if (old_last == NULL)
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4245 {
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4246 if (buf != curbuf)
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4247 {
10359 66f1b5bf3fa6 commit https://github.com/vim/vim/commit/95f096030ed1a8afea028f2ea295d6f6a70f466f Christian Brabandt <cb@256bit.org> parents: 10349 diff changeset	4248 internal_error("qf_fill_buffer()");
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4249 return;
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4250 }
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4251
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4252 /* delete all existing lines */
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4253 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	4254 (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	4255 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4256
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4257 /* Check if there is anything to display */
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4258 if (qi->qf_curlist < qi->qf_listcount)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4259 {
13819 31bb8e1f7625 patch 8.0.1781: file names in quickfix window are not shortened Christian Brabandt <cb@256bit.org> parents: 13802 diff changeset	4260 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	4261
31bb8e1f7625 patch 8.0.1781: file names in quickfix window are not shortened Christian Brabandt <cb@256bit.org> parents: 13802 diff changeset	4262 *dirname = NUL;
31bb8e1f7625 patch 8.0.1781: file names in quickfix window are not shortened Christian Brabandt <cb@256bit.org> parents: 13802 diff changeset	4263
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4264 /* 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	4265 if (old_last == NULL)
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4266 {
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4267 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	4268 lnum = 0;
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4269 }
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4270 else
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4271 {
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4272 qfp = old_last->qf_next;
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4273 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	4274 }
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4275 while (lnum < qi->qf_lists[qi->qf_curlist].qf_count)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4276 {
13992 710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4277 if (qf_buf_add_line(buf, lnum, qfp, dirname) == FAIL)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4278 break;
13992 710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4279
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4280 ++lnum;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4281 qfp = qfp->qf_next;
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	4282 if (qfp == NULL)
543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	4283 break;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4284 }
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4285
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4286 if (old_last == NULL)
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4287 /* 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	4288 (void)ml_delete(lnum + 1, FALSE);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4289 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4290
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4291 /* correct cursor position */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4292 check_lnums(TRUE);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4293
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4294 if (old_last == NULL)
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4295 {
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4296 /* 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	4297 * 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	4298 * using autocommands. */
11589 39787def24bb patch 8.0.0677: setting 'filetype' may switch buffers Christian Brabandt <cb@256bit.org> parents: 11549 diff changeset	4299 ++curbuf_lock;
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4300 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	4301 curbuf->b_p_ma = FALSE;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4302
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4303 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	4304 apply_autocmds(EVENT_BUFREADPOST, (char_u *)"quickfix", NULL,
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4305 FALSE, curbuf);
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4306 apply_autocmds(EVENT_BUFWINENTER, (char_u *)"quickfix", NULL,
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4307 FALSE, curbuf);
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4308 keep_filetype = FALSE;
11589 39787def24bb patch 8.0.0677: setting 'filetype' may switch buffers Christian Brabandt <cb@256bit.org> parents: 11549 diff changeset	4309 --curbuf_lock;
13380 69517d67421f patch 8.0.1564: too many #ifdefs Christian Brabandt <cb@256bit.org> parents: 13252 diff changeset	4310
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4311 /* make sure it will be redrawn */
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4312 redraw_curbuf_later(NOT_VALID);
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4313 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4314
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4315 /* Restore KeyTyped, setting 'filetype' may reset it. */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4316 KeyTyped = old_KeyTyped;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4317 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4318
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	4319 /*
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	4320 * 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	4321 */
13062 6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	4322 static void
6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	4323 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	4324 {
6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	4325 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	4326 }
6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	4327
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4328 /*
14250 ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4329 * 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	4330 * 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	4331 */
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4332 static int
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4333 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	4334 {
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4335 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	4336
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4337 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	4338 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	4339 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	4340 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	4341 }
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4342
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4343 /*
14495 178162aeebeb patch 8.1.0261: Coverity complains about a negative array index Christian Brabandt <cb@256bit.org> parents: 14491 diff changeset	4344 * 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	4345 * 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	4346 * 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	4347 * 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	4348 * 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	4349 */
5a10a0020c3e patch 8.1.0267: no good check if restoring quickfix list worked Christian Brabandt <cb@256bit.org> parents: 14495 diff changeset	4350 static int
14495 178162aeebeb patch 8.1.0261: Coverity complains about a negative array index Christian Brabandt <cb@256bit.org> parents: 14491 diff changeset	4351 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	4352 {
178162aeebeb patch 8.1.0261: Coverity complains about a negative array index Christian Brabandt <cb@256bit.org> parents: 14491 diff changeset	4353 int curlist;
178162aeebeb patch 8.1.0261: Coverity complains about a negative array index Christian Brabandt <cb@256bit.org> parents: 14491 diff changeset	4354
178162aeebeb patch 8.1.0261: Coverity complains about a negative array index Christian Brabandt <cb@256bit.org> parents: 14491 diff changeset	4355 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	4356 {
178162aeebeb patch 8.1.0261: Coverity complains about a negative array index Christian Brabandt <cb@256bit.org> parents: 14491 diff changeset	4357 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	4358 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	4359 // 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	4360 return FAIL;
5a10a0020c3e patch 8.1.0267: no good check if restoring quickfix list worked Christian Brabandt <cb@256bit.org> parents: 14495 diff changeset	4361 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	4362 }
5a10a0020c3e patch 8.1.0267: no good check if restoring quickfix list worked Christian Brabandt <cb@256bit.org> parents: 14495 diff changeset	4363 return OK;
14495 178162aeebeb patch 8.1.0261: Coverity complains about a negative array index Christian Brabandt <cb@256bit.org> parents: 14491 diff changeset	4364 }
178162aeebeb patch 8.1.0261: Coverity complains about a negative array index Christian Brabandt <cb@256bit.org> parents: 14491 diff changeset	4365
178162aeebeb patch 8.1.0261: Coverity complains about a negative array index Christian Brabandt <cb@256bit.org> parents: 14491 diff changeset	4366 /*
14469 0211e295835e patch 8.1.0248: duplicated quickfix code Christian Brabandt <cb@256bit.org> parents: 14433 diff changeset	4367 * 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	4368 */
0211e295835e patch 8.1.0248: duplicated quickfix code Christian Brabandt <cb@256bit.org> parents: 14433 diff changeset	4369 static void
0211e295835e patch 8.1.0248: duplicated quickfix code Christian Brabandt <cb@256bit.org> parents: 14433 diff changeset	4370 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	4371 {
14507 5a10a0020c3e patch 8.1.0267: no good check if restoring quickfix list worked Christian Brabandt <cb@256bit.org> parents: 14495 diff changeset	4372 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	4373 return;
5a10a0020c3e patch 8.1.0267: no good check if restoring quickfix list worked Christian Brabandt <cb@256bit.org> parents: 14495 diff changeset	4374
5a10a0020c3e patch 8.1.0267: no good check if restoring quickfix list worked Christian Brabandt <cb@256bit.org> parents: 14495 diff changeset	4375 // 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	4376 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	4377 qf_jump(qi, 0, 0, forceit);
0211e295835e patch 8.1.0248: duplicated quickfix code Christian Brabandt <cb@256bit.org> parents: 14433 diff changeset	4378 }
0211e295835e patch 8.1.0248: duplicated quickfix code Christian Brabandt <cb@256bit.org> parents: 14433 diff changeset	4379
0211e295835e patch 8.1.0248: duplicated quickfix code Christian Brabandt <cb@256bit.org> parents: 14433 diff changeset	4380 /*
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	4381 * Return TRUE when using ":vimgrep" for ":grep".
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	4382 */
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	4383 int
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4384 grep_internal(cmdidx_T cmdidx)
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	4385 {
661 e93a99ef31d0 updated for version 7.0195 vimboss parents: 659 diff changeset	4386 return ((cmdidx == CMD_grep
e93a99ef31d0 updated for version 7.0195 vimboss parents: 659 diff changeset	4387 \|\| cmdidx == CMD_lgrep
e93a99ef31d0 updated for version 7.0195 vimboss parents: 659 diff changeset	4388 \|\| cmdidx == CMD_grepadd
e93a99ef31d0 updated for version 7.0195 vimboss parents: 659 diff changeset	4389 \|\| cmdidx == CMD_lgrepadd)
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	4390 && STRCMP("internal",
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	4391 *curbuf->b_p_gp == NUL ? p_gp : curbuf->b_p_gp) == 0);
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	4392 }
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	4393
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	4394 /*
657 b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	4395 * Used for ":make", ":lmake", ":grep", ":lgrep", ":grepadd", and ":lgrepadd"
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4396 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4397 void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4398 ex_make(exarg_T *eap)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4399 {
161 6df0106fc595 updated for version 7.0049 vimboss parents: 153 diff changeset	4400 char_u *fname;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4401 char_u *cmd;
11063 e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	4402 char_u *enc = NULL;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4403 unsigned len;
657 b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	4404 win_T *wp = NULL;
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	4405 qf_info_T *qi = &ql_info;
842 a209672376fd updated for version 7.0f vimboss parents: 835 diff changeset	4406 int res;
161 6df0106fc595 updated for version 7.0049 vimboss parents: 153 diff changeset	4407 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	4408 int_u save_qfid;
161 6df0106fc595 updated for version 7.0049 vimboss parents: 153 diff changeset	4409
2782 0a0d7961b4fe updated for version 7.3.167 Bram Moolenaar <bram@vim.org> parents: 2770 diff changeset	4410 /* Redirect ":grep" to ":vimgrep" if 'grepprg' is "internal". */
0a0d7961b4fe updated for version 7.3.167 Bram Moolenaar <bram@vim.org> parents: 2770 diff changeset	4411 if (grep_internal(eap->cmdidx))
0a0d7961b4fe updated for version 7.3.167 Bram Moolenaar <bram@vim.org> parents: 2770 diff changeset	4412 {
0a0d7961b4fe updated for version 7.3.167 Bram Moolenaar <bram@vim.org> parents: 2770 diff changeset	4413 ex_vimgrep(eap);
0a0d7961b4fe updated for version 7.3.167 Bram Moolenaar <bram@vim.org> parents: 2770 diff changeset	4414 return;
0a0d7961b4fe updated for version 7.3.167 Bram Moolenaar <bram@vim.org> parents: 2770 diff changeset	4415 }
0a0d7961b4fe updated for version 7.3.167 Bram Moolenaar <bram@vim.org> parents: 2770 diff changeset	4416
161 6df0106fc595 updated for version 7.0049 vimboss parents: 153 diff changeset	4417 switch (eap->cmdidx)
6df0106fc595 updated for version 7.0049 vimboss parents: 153 diff changeset	4418 {
661 e93a99ef31d0 updated for version 7.0195 vimboss parents: 659 diff changeset	4419 case CMD_make: au_name = (char_u *)"make"; break;
e93a99ef31d0 updated for version 7.0195 vimboss parents: 659 diff changeset	4420 case CMD_lmake: au_name = (char_u *)"lmake"; break;
e93a99ef31d0 updated for version 7.0195 vimboss parents: 659 diff changeset	4421 case CMD_grep: au_name = (char_u *)"grep"; break;
e93a99ef31d0 updated for version 7.0195 vimboss parents: 659 diff changeset	4422 case CMD_lgrep: au_name = (char_u *)"lgrep"; break;
e93a99ef31d0 updated for version 7.0195 vimboss parents: 659 diff changeset	4423 case CMD_grepadd: au_name = (char_u *)"grepadd"; break;
e93a99ef31d0 updated for version 7.0195 vimboss parents: 659 diff changeset	4424 case CMD_lgrepadd: au_name = (char_u *)"lgrepadd"; break;
161 6df0106fc595 updated for version 7.0049 vimboss parents: 153 diff changeset	4425 default: break;
6df0106fc595 updated for version 7.0049 vimboss parents: 153 diff changeset	4426 }
10346 d52d97bf675e commit https://github.com/vim/vim/commit/21662be2211675824df1771c7f169948ede40c41 Christian Brabandt <cb@256bit.org> parents: 10281 diff changeset	4427 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	4428 curbuf->b_fname, TRUE, curbuf))
161 6df0106fc595 updated for version 7.0049 vimboss parents: 153 diff changeset	4429 {
13380 69517d67421f patch 8.0.1564: too many #ifdefs Christian Brabandt <cb@256bit.org> parents: 13252 diff changeset	4430 #ifdef FEAT_EVAL
10346 d52d97bf675e commit https://github.com/vim/vim/commit/21662be2211675824df1771c7f169948ede40c41 Christian Brabandt <cb@256bit.org> parents: 10281 diff changeset	4431 if (aborting())
161 6df0106fc595 updated for version 7.0049 vimboss parents: 153 diff changeset	4432 return;
6df0106fc595 updated for version 7.0049 vimboss parents: 153 diff changeset	4433 #endif
13380 69517d67421f patch 8.0.1564: too many #ifdefs Christian Brabandt <cb@256bit.org> parents: 13252 diff changeset	4434 }
11063 e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	4435 #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	4436 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	4437 #endif
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4438
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4439 if (is_loclist_cmd(eap->cmdidx))
657 b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	4440 wp = curwin;
b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	4441
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4442 autowrite_all();
161 6df0106fc595 updated for version 7.0049 vimboss parents: 153 diff changeset	4443 fname = get_mef_name();
6df0106fc595 updated for version 7.0049 vimboss parents: 153 diff changeset	4444 if (fname == NULL)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4445 return;
161 6df0106fc595 updated for version 7.0049 vimboss parents: 153 diff changeset	4446 mch_remove(fname); /* in case it's not unique */
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4447
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4448 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4449 * If 'shellpipe' empty: don't redirect to 'errorfile'.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4450 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4451 len = (unsigned)STRLEN(p_shq) * 2 + (unsigned)STRLEN(eap->arg) + 1;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4452 if (*p_sp != NUL)
161 6df0106fc595 updated for version 7.0049 vimboss parents: 153 diff changeset	4453 len += (unsigned)STRLEN(p_sp) + (unsigned)STRLEN(fname) + 3;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4454 cmd = alloc(len);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4455 if (cmd == NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4456 return;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4457 sprintf((char )cmd, "%s%s%s", (char )p_shq, (char *)eap->arg,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4458 (char *)p_shq);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4459 if (*p_sp != NUL)
1872 f13849167330 updated for version 7.2-169 vimboss parents: 1864 diff changeset	4460 append_redir(cmd, len, p_sp, fname);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4461 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4462 * Output a newline if there's something else than the :make command that
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4463 * was typed (in which case the cursor is in column 0).
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4464 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4465 if (msg_col == 0)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4466 msg_didout = FALSE;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4467 msg_start();
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4468 MSG_PUTS(":!");
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4469 msg_outtrans(cmd); /* show what we are doing */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4470
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4471 /* let the shell know if we are redirecting output or not */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4472 do_shell(cmd, *p_sp != NUL ? SHELL_DOOUT : 0);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4473
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4474 #ifdef AMIGA
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4475 out_flush();
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4476 /* read window status report and redraw before message */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4477 (void)char_avail();
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4478 #endif
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4479
842 a209672376fd updated for version 7.0f vimboss parents: 835 diff changeset	4480 res = qf_init(wp, fname, (eap->cmdidx != CMD_make
657 b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	4481 && eap->cmdidx != CMD_lmake) ? p_gefm : p_efm,
b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	4482 (eap->cmdidx != CMD_grepadd
2411 68e394361ca3 Add "q" item for 'statusline'. Add w:quickfix_title. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2296 diff changeset	4483 && eap->cmdidx != CMD_lgrepadd),
13921 3b6c29f8c1a2 patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':' Christian Brabandt <cb@256bit.org> parents: 13882 diff changeset	4484 qf_cmdtitle(*eap->cmdlinep), enc);
2847 45c536fe48db updated for version 7.3.197 Bram Moolenaar <bram@vim.org> parents: 2823 diff changeset	4485 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	4486 {
2847 45c536fe48db updated for version 7.3.197 Bram Moolenaar <bram@vim.org> parents: 2823 diff changeset	4487 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	4488 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	4489 goto cleanup;
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4490 }
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4491 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	4492 qf_list_changed(qi, qi->qf_curlist);
14299 932dde1d8a71 patch 8.1.0165: :clist output can be very long Christian Brabandt <cb@256bit.org> parents: 14250 diff changeset	4493
14250 ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4494 // 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	4495 // 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	4496 save_qfid = qi->qf_lists[qi->qf_curlist].qf_id;
842 a209672376fd updated for version 7.0f vimboss parents: 835 diff changeset	4497 if (au_name != NULL)
a209672376fd updated for version 7.0f vimboss parents: 835 diff changeset	4498 apply_autocmds(EVENT_QUICKFIXCMDPOST, au_name,
a209672376fd updated for version 7.0f vimboss parents: 835 diff changeset	4499 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	4500 if (res > 0 && !eap->forceit && qflist_valid(wp, save_qfid))
14469 0211e295835e patch 8.1.0248: duplicated quickfix code Christian Brabandt <cb@256bit.org> parents: 14433 diff changeset	4501 // display the first error
0211e295835e patch 8.1.0248: duplicated quickfix code Christian Brabandt <cb@256bit.org> parents: 14433 diff changeset	4502 qf_jump_first(qi, save_qfid, FALSE);
14250 ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4503
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4504 cleanup:
161 6df0106fc595 updated for version 7.0049 vimboss parents: 153 diff changeset	4505 mch_remove(fname);
6df0106fc595 updated for version 7.0049 vimboss parents: 153 diff changeset	4506 vim_free(fname);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4507 vim_free(cmd);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4508 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4509
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4510 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4511 * Return the name for the errorfile, in allocated memory.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4512 * Find a new unique name when 'makeef' contains "##".
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4513 * Returns NULL for error.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4514 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4515 static char_u *
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4516 get_mef_name(void)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4517 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4518 char_u *p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4519 char_u *name;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4520 static int start = -1;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4521 static int off = 0;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4522 #ifdef HAVE_LSTAT
9387 f094d4085014 commit https://github.com/vim/vim/commit/8767f52fbfd4f053ce00a978227c95f1d7d323fe Christian Brabandt <cb@256bit.org> parents: 9379 diff changeset	4523 stat_T sb;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4524 #endif
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4525
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4526 if (*p_mef == NUL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4527 {
6721 7347229a646a updated for version 7.4.684 Bram Moolenaar <bram@vim.org> parents: 6450 diff changeset	4528 name = vim_tempname('e', FALSE);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4529 if (name == NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4530 EMSG(_(e_notmp));
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4531 return name;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4532 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4533
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4534 for (p = p_mef; *p; ++p)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4535 if (p[0] == '#' && p[1] == '#')
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4536 break;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4537
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4538 if (*p == NUL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4539 return vim_strsave(p_mef);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4540
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4541 /* Keep trying until the name doesn't exist yet. */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4542 for (;;)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4543 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4544 if (start == -1)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4545 start = mch_get_pid();
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4546 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4547 off += 19;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4548
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4549 name = alloc((unsigned)STRLEN(p_mef) + 30);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4550 if (name == NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4551 break;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4552 STRCPY(name, p_mef);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4553 sprintf((char *)name + (p - p_mef), "%d%d", start, off);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4554 STRCAT(name, p + 2);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4555 if (mch_getperm(name) < 0
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4556 #ifdef HAVE_LSTAT
10226 7a4fb555c83a commit https://github.com/vim/vim/commit/9af418427652562384744648d7d173a4bfebba95 Christian Brabandt <cb@256bit.org> parents: 10056 diff changeset	4557 /* Don't accept a symbolic link, it's a security risk. */
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4558 && mch_lstat((char *)name, &sb) < 0
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4559 #endif
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4560 )
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4561 break;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4562 vim_free(name);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4563 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4564 return name;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4565 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4566
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4567 /*
7092 64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4568 * 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	4569 */
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4570 int
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4571 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	4572 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4573 qf_info_T *qi = &ql_info;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4574 qfline_T *qfp;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4575 int i, sz = 0;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4576 int prev_fnum = 0;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4577
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4578 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	4579 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4580 /* Location list */
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4581 qi = GET_LOC_LIST(curwin);
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4582 if (qi == NULL)
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4583 return 0;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4584 }
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4585
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4586 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	4587 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	4588 ++i, qfp = qfp->qf_next)
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4589 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4590 if (qfp->qf_valid)
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4591 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4592 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	4593 sz++; /* Count all valid entries */
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4594 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	4595 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4596 /* Count the number of files */
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4597 sz++;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4598 prev_fnum = qfp->qf_fnum;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4599 }
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4600 }
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4601 }
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4602
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4603 return sz;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4604 }
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4605
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4606 /*
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4607 * 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	4608 * 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	4609 */
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4610 int
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4611 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	4612 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4613 qf_info_T *qi = &ql_info;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4614
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4615 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	4616 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4617 /* Location list */
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4618 qi = GET_LOC_LIST(curwin);
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4619 if (qi == NULL)
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4620 return 0;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4621 }
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4622
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4623 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	4624 }
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4625
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4626 /*
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4627 * 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	4628 * 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	4629 */
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4630 int
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4631 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	4632 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4633 qf_info_T *qi = &ql_info;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4634 qf_list_T *qfl;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4635 qfline_T *qfp;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4636 int i, eidx = 0;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4637 int prev_fnum = 0;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4638
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4639 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	4640 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4641 /* Location list */
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4642 qi = GET_LOC_LIST(curwin);
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4643 if (qi == NULL)
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4644 return 1;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4645 }
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4646
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4647 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	4648 qfp = qfl->qf_start;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4649
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4650 /* 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	4651 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	4652 return 1;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4653
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4654 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	4655 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4656 if (qfp->qf_valid)
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4657 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4658 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	4659 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4660 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	4661 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4662 /* Count the number of files */
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4663 eidx++;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4664 prev_fnum = qfp->qf_fnum;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4665 }
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4666 }
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4667 else
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4668 eidx++;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4669 }
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4670 }
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4671
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4672 return eidx ? eidx : 1;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4673 }
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4674
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4675 /*
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4676 * 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	4677 * 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	4678 * 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	4679 * 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	4680 */
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4681 static int
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4682 qf_get_nth_valid_entry(qf_info_T *qi, int n, int fdo)
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_list_T *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	4685 qfline_T *qfp = qfl->qf_start;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4686 int i, eidx;
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
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4689 /* 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	4690 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	4691 return 1;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4692
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	4693 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	4694 i++, qfp = qfp->qf_next)
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 if (qfp->qf_valid)
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4697 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4698 if (fdo)
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4699 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4700 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	4701 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4702 /* Count the number of files */
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4703 eidx++;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4704 prev_fnum = qfp->qf_fnum;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4705 }
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 else
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4708 eidx++;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4709 }
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 if (eidx == n)
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4712 break;
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
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4715 if (i <= qfl->qf_count)
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4716 return i;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4717 else
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4718 return 1;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4719 }
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 /*
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4722 * ":cc", ":crewind", ":cfirst" and ":clast".
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4723 * ":ll", ":lrewind", ":lfirst" and ":llast".
7092 64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4724 * ":cdo", ":ldo", ":cfdo" and ":lfdo"
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4725 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4726 void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4727 ex_cc(exarg_T *eap)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4728 {
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	4729 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	4730 int errornr;
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	4731
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4732 if (is_loclist_cmd(eap->cmdidx))
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4733 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4734 qi = GET_LOC_LIST(curwin);
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4735 if (qi == NULL)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4736 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4737 EMSG(_(e_loclist));
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4738 return;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4739 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4740 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4741
7092 64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4742 if (eap->addr_count > 0)
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4743 errornr = (int)eap->line2;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4744 else
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4745 {
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4746 switch (eap->cmdidx)
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4747 {
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4748 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	4749 errornr = 0;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4750 break;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4751 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	4752 case CMD_lfirst:
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4753 errornr = 1;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4754 break;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4755 default:
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4756 errornr = 32767;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4757 }
7092 64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4758 }
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4759
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4760 /* 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	4761 * 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	4762 */
12084 69ce6b3f0834 patch 8.0.0922: quickfix list always added after current one Christian Brabandt <cb@256bit.org> parents: 12048 diff changeset	4763 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	4764 \|\| 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	4765 errornr = qf_get_nth_valid_entry(qi,
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4766 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	4767 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	4768
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4769 qf_jump(qi, 0, errornr, eap->forceit);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4770 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4771
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4772 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4773 * ":cnext", ":cnfile", ":cNext" and ":cprevious".
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4774 * ":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	4775 * Also, used by ":cdo", ":ldo", ":cfdo" and ":lfdo" commands.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4776 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4777 void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4778 ex_cnext(exarg_T *eap)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4779 {
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	4780 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	4781 int errornr;
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4782 int dir;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4783
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4784 if (is_loclist_cmd(eap->cmdidx))
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4785 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4786 qi = GET_LOC_LIST(curwin);
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4787 if (qi == NULL)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4788 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4789 EMSG(_(e_loclist));
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4790 return;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4791 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4792 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4793
12084 69ce6b3f0834 patch 8.0.0922: quickfix list always added after current one Christian Brabandt <cb@256bit.org> parents: 12048 diff changeset	4794 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	4795 && (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	4796 && 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	4797 errornr = (int)eap->line2;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4798 else
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4799 errornr = 1;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4800
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4801 // 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	4802 switch (eap->cmdidx)
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4803 {
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4804 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	4805 dir = FORWARD;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4806 break;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4807 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	4808 case CMD_lNext:
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4809 dir = BACKWARD;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4810 break;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4811 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	4812 dir = FORWARD_FILE;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4813 break;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4814 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	4815 dir = BACKWARD_FILE;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4816 break;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4817 default:
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4818 dir = FORWARD;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4819 break;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4820 }
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4821
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4822 qf_jump(qi, dir, errornr, eap->forceit);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4823 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4824
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4825 /*
446 7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	4826 * ":cfile"/":cgetfile"/":caddfile" commands.
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4827 * ":lfile"/":lgetfile"/":laddfile" commands.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4828 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4829 void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4830 ex_cfile(exarg_T *eap)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4831 {
11063 e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	4832 char_u *enc = NULL;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4833 win_T *wp = NULL;
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	4834 qf_info_T *qi = &ql_info;
3404 38a135730423 updated for version 7.3.468 Bram Moolenaar <bram@vim.org> parents: 3365 diff changeset	4835 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	4836 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	4837 int res;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4838
3404 38a135730423 updated for version 7.3.468 Bram Moolenaar <bram@vim.org> parents: 3365 diff changeset	4839 switch (eap->cmdidx)
38a135730423 updated for version 7.3.468 Bram Moolenaar <bram@vim.org> parents: 3365 diff changeset	4840 {
38a135730423 updated for version 7.3.468 Bram Moolenaar <bram@vim.org> parents: 3365 diff changeset	4841 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	4842 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	4843 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	4844 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	4845 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	4846 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	4847 default: break;
38a135730423 updated for version 7.3.468 Bram Moolenaar <bram@vim.org> parents: 3365 diff changeset	4848 }
38a135730423 updated for version 7.3.468 Bram Moolenaar <bram@vim.org> parents: 3365 diff changeset	4849 if (au_name != NULL)
38a135730423 updated for version 7.3.468 Bram Moolenaar <bram@vim.org> parents: 3365 diff changeset	4850 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	4851 #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	4852 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	4853 #endif
2296 eb7be7b075a6 Support :browse for commands that use an error file argument. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2146 diff changeset	4854 #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	4855 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	4856 {
eb7be7b075a6 Support :browse for commands that use an error file argument. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2146 diff changeset	4857 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	4858 NULL, NULL,
378f9f8e6d8f patch 8.0.1773: dialog messages are not translated Christian Brabandt <cb@256bit.org> parents: 13800 diff changeset	4859 (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	4860 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	4861 return;
eb7be7b075a6 Support :browse for commands that use an error file argument. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2146 diff changeset	4862 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	4863 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	4864 }
eb7be7b075a6 Support :browse for commands that use an error file argument. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2146 diff changeset	4865 else
eb7be7b075a6 Support :browse for commands that use an error file argument. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2146 diff changeset	4866 #endif
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4867 if (*eap->arg != NUL)
694 07d199fe02ed updated for version 7.0209 vimboss parents: 682 diff changeset	4868 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	4869
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4870 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	4871 wp = curwin;
a1f8939a4644 patch 8.0.1414: accessing freed memory in :lfile. Christian Brabandt <cb@256bit.org> parents: 13076 diff changeset	4872
446 7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	4873 /*
7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	4874 * This function is used by the :cfile, :cgetfile and :caddfile
7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	4875 * commands.
7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	4876 * :cfile always creates a new quickfix list and jumps to the
7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	4877 * first error.
7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	4878 * :cgetfile creates a new quickfix list but doesn't jump to the
7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	4879 * first error.
7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	4880 * :caddfile adds to an existing quickfix list. If there is no
7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	4881 * quickfix list then a new list is created.
7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	4882 */
12954 49e136457c66 patch 8.0.1353: QuickFixCmdPost is not used consistently Christian Brabandt <cb@256bit.org> parents: 12912 diff changeset	4883 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	4884 && 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	4885 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	4886 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	4887 {
13062 6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	4888 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	4889 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	4890 return;
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4891 }
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4892 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	4893 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	4894 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	4895 if (au_name != NULL)
49e136457c66 patch 8.0.1353: QuickFixCmdPost is not used consistently Christian Brabandt <cb@256bit.org> parents: 12912 diff changeset	4896 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	4897
14250 ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4898 // 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	4899 // 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	4900 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	4901 && qflist_valid(wp, save_qfid))
14469 0211e295835e patch 8.1.0248: duplicated quickfix code Christian Brabandt <cb@256bit.org> parents: 14433 diff changeset	4902 // display the first error
0211e295835e patch 8.1.0248: duplicated quickfix code Christian Brabandt <cb@256bit.org> parents: 14433 diff changeset	4903 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	4904 }
4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	4905
4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	4906 /*
13521 15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4907 * 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	4908 */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4909 static char_u *
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4910 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	4911 {
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4912 switch (cmdidx)
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4913 {
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4914 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	4915 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	4916 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	4917 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	4918 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	4919 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	4920 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	4921 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	4922 default: return NULL;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4923 }
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4924 }
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4925
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4926 /*
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4927 * 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	4928 */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4929 static void
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4930 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	4931 {
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4932 /* 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	4933 regmatch->regprog = NULL;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4934
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4935 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	4936 {
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4937 /* 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	4938 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	4939 {
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4940 EMSG(_(e_noprevre));
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4941 return;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4942 }
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4943 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	4944 }
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4945 else
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4946 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	4947
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4948 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	4949 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	4950 }
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4951
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4952 /*
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4953 * 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	4954 */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4955 static void
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4956 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	4957 {
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4958 char_u *p;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4959
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4960 msg_start();
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4961 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	4962 if (p == NULL)
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4963 msg_outtrans(fname);
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4964 else
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4965 {
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4966 msg_outtrans(p);
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4967 vim_free(p);
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4968 }
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4969 msg_clr_eos();
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4970 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	4971 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	4972 msg_col = 0;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4973 out_flush();
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4974 }
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4975
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4976 /*
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4977 * 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	4978 */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4979 static buf_T *
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4980 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	4981 char_u *fname,
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4982 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	4983 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	4984 {
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4985 int save_mls;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4986 #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	4987 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	4988 #endif
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4989 buf_T *buf;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4990
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4991 #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	4992 /* 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	4993 * 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	4994 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	4995 #endif
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4996 /* 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	4997 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	4998 p_mls = 0;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4999
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5000 /* 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	5001 * autocommands applied, etc. */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5002 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	5003
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5004 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	5005 #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	5006 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	5007 #endif
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5008
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5009 return buf;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5010 }
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5011
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5012 /*
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5013 * 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	5014 * 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	5015 * new list.
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5016 */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5017 static int
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5018 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	5019 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	5020 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	5021 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	5022 char_u *title)
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5023 {
13594 4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5024 /* 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	5025 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	5026 {
4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5027 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	5028 {
13594 4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5029 /* 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	5030 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	5031 return FALSE;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5032 }
13594 4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5033 else
4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5034 {
4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5035 /* 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	5036 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	5037 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	5038 }
4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5039 }
4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5040
14507 5a10a0020c3e patch 8.1.0267: no good check if restoring quickfix list worked Christian Brabandt <cb@256bit.org> parents: 14495 diff changeset	5041 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	5042 return FALSE;
13521 15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5043
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5044 return TRUE;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5045 }
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 /*
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5048 * 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	5049 * 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	5050 */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5051 static int
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5052 vgr_match_buflines(
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5053 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	5054 char_u *fname,
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5055 buf_T *buf,
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5056 regmmatch_T *regmatch,
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5057 long tomatch,
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5058 int duplicate_name,
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5059 int flags)
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 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	5062 long lnum;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5063 colnr_T col;
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 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	5066 {
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5067 col = 0;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5068 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	5069 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	5070 {
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5071 /* 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	5072 * 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	5073 * 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	5074 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	5075 qi->qf_curlist,
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5076 NULL, /* dir */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5077 fname,
13821 98274127d675 patch 8.0.1782: no simple way to label quickfix entries Christian Brabandt <cb@256bit.org> parents: 13819 diff changeset	5078 NULL,
13521 15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5079 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	5080 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	5081 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	5082 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	5083 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	5084 FALSE, /* vis_col */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5085 NULL, /* search pattern */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5086 0, /* nr */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5087 0, /* type */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5088 TRUE /* valid */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5089 ) == FAIL)
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5090 {
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5091 got_int = TRUE;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5092 break;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5093 }
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5094 found_match = TRUE;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5095 if (--tomatch == 0)
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5096 break;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5097 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	5098 \|\| 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	5099 break;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5100 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	5101 + (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	5102 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	5103 break;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5104 }
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5105 line_breakcheck();
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5106 if (got_int)
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5107 break;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5108 }
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 return found_match;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5111 }
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5112
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 * 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	5115 */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5116 static void
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5117 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	5118 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	5119 int forceit,
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5120 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	5121 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	5122 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	5123 {
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5124 buf_T *buf;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5125
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5126 buf = curbuf;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5127 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	5128 if (buf != curbuf)
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5129 /* 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	5130 * taken care of. */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5131 *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	5132
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5133 /* 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	5134 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	5135 {
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5136 exarg_T ea;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5137
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5138 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	5139 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	5140 ex_cd(&ea);
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5141 }
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5142 }
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5143
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5144 /*
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5145 * ":vimgrep {pattern} file(s)"
657 b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	5146 * ":vimgrepadd {pattern} file(s)"
b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	5147 * ":lvimgrep {pattern} file(s)"
b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	5148 * ":lvimgrepadd {pattern} file(s)"
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5149 */
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5150 void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	5151 ex_vimgrep(exarg_T *eap)
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5152 {
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5153 regmmatch_T regmatch;
153 19670b05ee32 updated for version 7.0047 vimboss parents: 129 diff changeset	5154 int fcount;
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5155 char_u **fnames;
1411 0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5156 char_u *fname;
8603 bfa74b84c41c commit https://github.com/vim/vim/commit/5584df65a0ca2315d1eebc13c54a448bee4d0758 Christian Brabandt <cb@256bit.org> parents: 7833 diff changeset	5157 char_u *title;
153 19670b05ee32 updated for version 7.0047 vimboss parents: 129 diff changeset	5158 char_u *s;
19670b05ee32 updated for version 7.0047 vimboss parents: 129 diff changeset	5159 char_u *p;
19670b05ee32 updated for version 7.0047 vimboss parents: 129 diff changeset	5160 int fi;
657 b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	5161 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	5162 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	5163 win_T *wp = NULL;
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5164 buf_T *buf;
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5165 int duplicate_name = FALSE;
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5166 int using_dummy;
1396 3e0f9984e98e updated for version 7.1-111 vimboss parents: 1302 diff changeset	5167 int redraw_for_dummy = FALSE;
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5168 int found_match;
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5169 buf_T *first_match_buf = NULL;
f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5170 time_t seconds = 0;
f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5171 aco_save_T aco;
170 8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5172 int flags = 0;
716 8ae24f338cab updated for version 7.0217 vimboss parents: 712 diff changeset	5173 long tomatch;
2770 25672ad7f377 updated for version 7.3.161 Bram Moolenaar <bram@vim.org> parents: 2651 diff changeset	5174 char_u *dirname_start = NULL;
25672ad7f377 updated for version 7.3.161 Bram Moolenaar <bram@vim.org> parents: 2651 diff changeset	5175 char_u *dirname_now = NULL;
1411 0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5176 char_u *target_dir = NULL;
1683 75dbeedddaa9 updated for version 7.2b-016 vimboss parents: 1672 diff changeset	5177 char_u *au_name = NULL;
161 6df0106fc595 updated for version 7.0049 vimboss parents: 153 diff changeset	5178
13521 15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5179 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	5180 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	5181 curbuf->b_fname, TRUE, curbuf))
161 6df0106fc595 updated for version 7.0049 vimboss parents: 153 diff changeset	5182 {
13380 69517d67421f patch 8.0.1564: too many #ifdefs Christian Brabandt <cb@256bit.org> parents: 13252 diff changeset	5183 #ifdef FEAT_EVAL
10346 d52d97bf675e commit https://github.com/vim/vim/commit/21662be2211675824df1771c7f169948ede40c41 Christian Brabandt <cb@256bit.org> parents: 10281 diff changeset	5184 if (aborting())
161 6df0106fc595 updated for version 7.0049 vimboss parents: 153 diff changeset	5185 return;
6df0106fc595 updated for version 7.0049 vimboss parents: 153 diff changeset	5186 #endif
13380 69517d67421f patch 8.0.1564: too many #ifdefs Christian Brabandt <cb@256bit.org> parents: 13252 diff changeset	5187 }
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5188
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	5189 if (is_loclist_cmd(eap->cmdidx))
657 b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	5190 {
b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	5191 qi = ll_get_or_alloc_list(curwin);
b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	5192 if (qi == NULL)
b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	5193 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	5194 wp = curwin;
657 b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	5195 }
b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	5196
716 8ae24f338cab updated for version 7.0217 vimboss parents: 712 diff changeset	5197 if (eap->addr_count > 0)
8ae24f338cab updated for version 7.0217 vimboss parents: 712 diff changeset	5198 tomatch = eap->line2;
8ae24f338cab updated for version 7.0217 vimboss parents: 712 diff changeset	5199 else
8ae24f338cab updated for version 7.0217 vimboss parents: 712 diff changeset	5200 tomatch = MAXLNUM;
8ae24f338cab updated for version 7.0217 vimboss parents: 712 diff changeset	5201
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5202 /* Get the search pattern: either white-separated or enclosed in // */
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5203 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	5204 title = vim_strsave(qf_cmdtitle(*eap->cmdlinep));
170 8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5205 p = skip_vimgrep_pat(eap->arg, &s, &flags);
153 19670b05ee32 updated for version 7.0047 vimboss parents: 129 diff changeset	5206 if (p == NULL)
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5207 {
282 33d9c918b8ab updated for version 7.0075 vimboss parents: 277 diff changeset	5208 EMSG(_(e_invalpat));
153 19670b05ee32 updated for version 7.0047 vimboss parents: 129 diff changeset	5209 goto theend;
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5210 }
4197 07fef68eb018 updated for version 7.3.850 Bram Moolenaar <bram@vim.org> parents: 4003 diff changeset	5211
13521 15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5212 vgr_init_regmatch(&regmatch, s);
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5213 if (regmatch.regprog == NULL)
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5214 goto theend;
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5215
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5216 p = skipwhite(p);
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5217 if (*p == NUL)
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5218 {
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5219 EMSG(_("E683: File name missing or invalid pattern"));
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5220 goto theend;
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5221 }
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5222
12084 69ce6b3f0834 patch 8.0.0922: quickfix list always added after current one Christian Brabandt <cb@256bit.org> parents: 12048 diff changeset	5223 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	5224 && 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	5225 && eap->cmdidx != CMD_lvimgrepadd)
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	5226 \|\| qi->qf_curlist == qi->qf_listcount)
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5227 /* 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	5228 qf_new_list(qi, title != NULL ? title : qf_cmdtitle(*eap->cmdlinep));
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5229
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5230 /* parse the list of arguments */
3620 4f1c511e71f8 updated for version 7.3.570 Bram Moolenaar <bram@vim.org> parents: 3555 diff changeset	5231 if (get_arglist_exp(p, &fcount, &fnames, TRUE) == FAIL)
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5232 goto theend;
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5233 if (fcount == 0)
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5234 {
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5235 EMSG(_(e_nomatch));
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5236 goto theend;
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5237 }
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5238
7558 9a4c9dccd603 commit https://github.com/vim/vim/commit/b86a343280b08d6701da68ee0651e960a0a7a61c Christian Brabandt <cb@256bit.org> parents: 7515 diff changeset	5239 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	5240 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	5241 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	5242 {
4d34891e98f4 commit https://github.com/vim/vim/commit/61ff4dd6a4d47bd32383fe28087be2b37dec53f4 Christian Brabandt <cb@256bit.org> parents: 7558 diff changeset	5243 FreeWild(fcount, fnames);
2770 25672ad7f377 updated for version 7.3.161 Bram Moolenaar <bram@vim.org> parents: 2651 diff changeset	5244 goto theend;
7662 4d34891e98f4 commit https://github.com/vim/vim/commit/61ff4dd6a4d47bd32383fe28087be2b37dec53f4 Christian Brabandt <cb@256bit.org> parents: 7558 diff changeset	5245 }
2770 25672ad7f377 updated for version 7.3.161 Bram Moolenaar <bram@vim.org> parents: 2651 diff changeset	5246
1411 0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5247 /* Remember the current directory, because a BufRead autocommand that does
0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5248 * ":lcd %:p:h" changes the meaning of short path names. */
0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5249 mch_dirname(dirname_start, MAXPATHL);
0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5250
13594 4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5251 /* 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	5252 * 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	5253 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	5254
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5255 seconds = (time_t)0;
716 8ae24f338cab updated for version 7.0217 vimboss parents: 712 diff changeset	5256 for (fi = 0; fi < fcount && !got_int && tomatch > 0; ++fi)
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5257 {
1411 0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5258 fname = shorten_fname1(fnames[fi]);
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5259 if (time(NULL) > seconds)
f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5260 {
1411 0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5261 /* 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	5262 * working on it. */
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5263 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	5264 vgr_display_fname(fname);
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5265 }
f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5266
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5267 buf = buflist_findname_exp(fnames[fi]);
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5268 if (buf == NULL \|\| buf->b_ml.ml_mfp == NULL)
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5269 {
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5270 /* Remember that a buffer with this name already exists. */
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5271 duplicate_name = (buf != NULL);
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5272 using_dummy = TRUE;
1396 3e0f9984e98e updated for version 7.1-111 vimboss parents: 1302 diff changeset	5273 redraw_for_dummy = TRUE;
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5274
13521 15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5275 buf = vgr_load_dummy_buf(fname, dirname_start, dirname_now);
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5276 }
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5277 else
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5278 /* Use existing, loaded buffer. */
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5279 using_dummy = FALSE;
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5280
13594 4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5281 /* 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	5282 * 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	5283 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	5284 {
2d94fcb0277d patch 8.0.1702: leaking memory when autocommands make quickfix list invalid Christian Brabandt <cb@256bit.org> parents: 13612 diff changeset	5285 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	5286 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	5287 }
13594 4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5288 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	5289
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5290 if (buf == NULL)
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5291 {
f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5292 if (!got_int)
1411 0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5293 smsg((char_u *)_("Cannot open file \"%s\""), fname);
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5294 }
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5295 else
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5296 {
717 2fa8cb05b861 updated for version 7.0218 vimboss parents: 716 diff changeset	5297 /* Try for a match in all lines of the buffer.
2fa8cb05b861 updated for version 7.0218 vimboss parents: 716 diff changeset	5298 * 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	5299 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	5300 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	5301
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5302 if (using_dummy)
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5303 {
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5304 if (found_match && first_match_buf == NULL)
f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5305 first_match_buf = buf;
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5306 if (duplicate_name)
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5307 {
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5308 /* Never keep a dummy buffer if there is another buffer
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5309 * with the same name. */
3490 8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5310 wipe_dummy_buffer(buf, dirname_start);
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5311 buf = NULL;
f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5312 }
717 2fa8cb05b861 updated for version 7.0218 vimboss parents: 716 diff changeset	5313 else if (!cmdmod.hide
2fa8cb05b861 updated for version 7.0218 vimboss parents: 716 diff changeset	5314 \|\| buf->b_p_bh[0] == 'u' /* "unload" */
2fa8cb05b861 updated for version 7.0218 vimboss parents: 716 diff changeset	5315 \|\| buf->b_p_bh[0] == 'w' /* "wipe" */
2fa8cb05b861 updated for version 7.0218 vimboss parents: 716 diff changeset	5316 \|\| buf->b_p_bh[0] == 'd') /* "delete" */
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5317 {
717 2fa8cb05b861 updated for version 7.0218 vimboss parents: 716 diff changeset	5318 /* When no match was found we don't need to remember the
2fa8cb05b861 updated for version 7.0218 vimboss parents: 716 diff changeset	5319 * buffer, wipe it out. If there was a match and it
2fa8cb05b861 updated for version 7.0218 vimboss parents: 716 diff changeset	5320 * wasn't the first one or we won't jump there: only
2fa8cb05b861 updated for version 7.0218 vimboss parents: 716 diff changeset	5321 * unload the buffer.
2fa8cb05b861 updated for version 7.0218 vimboss parents: 716 diff changeset	5322 * Ignore 'hidden' here, because it may lead to having too
2fa8cb05b861 updated for version 7.0218 vimboss parents: 716 diff changeset	5323 * many swap files. */
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5324 if (!found_match)
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5325 {
3490 8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5326 wipe_dummy_buffer(buf, dirname_start);
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5327 buf = NULL;
f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5328 }
170 8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5329 else if (buf != first_match_buf \|\| (flags & VGR_NOJUMP))
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5330 {
3490 8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5331 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	5332 /* 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	5333 buf->b_flags &= ~BF_DUMMY;
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5334 buf = NULL;
f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5335 }
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5336 }
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5337
f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5338 if (buf != NULL)
f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5339 {
9540 64a791c53418 commit https://github.com/vim/vim/commit/015102e91e978a0bb42a14461c132a85e8f7e1ea Christian Brabandt <cb@256bit.org> parents: 9538 diff changeset	5340 /* 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	5341 buf->b_flags &= ~BF_DUMMY;
64a791c53418 commit https://github.com/vim/vim/commit/015102e91e978a0bb42a14461c132a85e8f7e1ea Christian Brabandt <cb@256bit.org> parents: 9538 diff changeset	5342
1411 0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5343 /* If the buffer is still loaded we need to use the
0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5344 * directory we jumped to below. */
0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5345 if (buf == first_match_buf
0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5346 && target_dir == NULL
0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5347 && STRCMP(dirname_start, dirname_now) != 0)
0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5348 target_dir = vim_strsave(dirname_now);
0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5349
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5350 /* The buffer is still loaded, the Filetype autocommands
677 e649c78407e6 updated for version 7.0202 vimboss parents: 665 diff changeset	5351 * need to be done now, in that buffer. And the modelines
717 2fa8cb05b861 updated for version 7.0218 vimboss parents: 716 diff changeset	5352 * need to be done (again). But not the window-local
2fa8cb05b861 updated for version 7.0218 vimboss parents: 716 diff changeset	5353 * options! */
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5354 aucmd_prepbuf(&aco, buf);
13380 69517d67421f patch 8.0.1564: too many #ifdefs Christian Brabandt <cb@256bit.org> parents: 13252 diff changeset	5355 #if defined(FEAT_SYN_HL)
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5356 apply_autocmds(EVENT_FILETYPE, buf->b_p_ft,
f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5357 buf->b_fname, TRUE, buf);
677 e649c78407e6 updated for version 7.0202 vimboss parents: 665 diff changeset	5358 #endif
717 2fa8cb05b861 updated for version 7.0218 vimboss parents: 716 diff changeset	5359 do_modelines(OPT_NOWIN);
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5360 aucmd_restbuf(&aco);
f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5361 }
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5362 }
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5363 }
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5364 }
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5365
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5366 FreeWild(fcount, fnames);
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5367
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	5368 qi->qf_lists[qi->qf_curlist].qf_nonevalid = FALSE;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	5369 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	5370 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	5371 qf_list_changed(qi, qi->qf_curlist);
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5372
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	5373 qf_update_buffer(qi, NULL);
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5374
842 a209672376fd updated for version 7.0f vimboss parents: 835 diff changeset	5375 if (au_name != NULL)
a209672376fd updated for version 7.0f vimboss parents: 835 diff changeset	5376 apply_autocmds(EVENT_QUICKFIXCMDPOST, au_name,
a209672376fd updated for version 7.0f vimboss parents: 835 diff changeset	5377 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	5378 /*
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	5379 * 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	5380 * is still valid.
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	5381 */
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	5382 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	5383 goto theend;
842 a209672376fd updated for version 7.0f vimboss parents: 835 diff changeset	5384
14507 5a10a0020c3e patch 8.1.0267: no good check if restoring quickfix list worked Christian Brabandt <cb@256bit.org> parents: 14495 diff changeset	5385 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	5386 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	5387
14603 d1b69129db99 patch 8.1.0315: helpgrep with language doesn't work properly Christian Brabandt <cb@256bit.org> parents: 14560 diff changeset	5388 // Jump to first match.
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	5389 if (!qf_list_empty(qi, qi->qf_curlist))
170 8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5390 {
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5391 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	5392 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	5393 first_match_buf, target_dir);
170 8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5394 }
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5395 else
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5396 EMSG2(_(e_nomatch2), s);
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5397
1396 3e0f9984e98e updated for version 7.1-111 vimboss parents: 1302 diff changeset	5398 /* If we loaded a dummy buffer into the current window, the autocommands
3e0f9984e98e updated for version 7.1-111 vimboss parents: 1302 diff changeset	5399 * may have messed up things, need to redraw and recompute folds. */
3e0f9984e98e updated for version 7.1-111 vimboss parents: 1302 diff changeset	5400 if (redraw_for_dummy)
3e0f9984e98e updated for version 7.1-111 vimboss parents: 1302 diff changeset	5401 {
3e0f9984e98e updated for version 7.1-111 vimboss parents: 1302 diff changeset	5402 #ifdef FEAT_FOLDING
3e0f9984e98e updated for version 7.1-111 vimboss parents: 1302 diff changeset	5403 foldUpdateAll(curwin);
3e0f9984e98e updated for version 7.1-111 vimboss parents: 1302 diff changeset	5404 #else
3e0f9984e98e updated for version 7.1-111 vimboss parents: 1302 diff changeset	5405 redraw_later(NOT_VALID);
3e0f9984e98e updated for version 7.1-111 vimboss parents: 1302 diff changeset	5406 #endif
3e0f9984e98e updated for version 7.1-111 vimboss parents: 1302 diff changeset	5407 }
3e0f9984e98e updated for version 7.1-111 vimboss parents: 1302 diff changeset	5408
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5409 theend:
8603 bfa74b84c41c commit https://github.com/vim/vim/commit/5584df65a0ca2315d1eebc13c54a448bee4d0758 Christian Brabandt <cb@256bit.org> parents: 7833 diff changeset	5410 vim_free(title);
2770 25672ad7f377 updated for version 7.3.161 Bram Moolenaar <bram@vim.org> parents: 2651 diff changeset	5411 vim_free(dirname_now);
25672ad7f377 updated for version 7.3.161 Bram Moolenaar <bram@vim.org> parents: 2651 diff changeset	5412 vim_free(dirname_start);
1411 0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5413 vim_free(target_dir);
4805 66803af09906 updated for version 7.3.1149 Bram Moolenaar <bram@vim.org> parents: 4371 diff changeset	5414 vim_regfree(regmatch.regprog);
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5415 }
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5416
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5417 /*
3490 8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5418 * 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	5419 * 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	5420 */
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5421 static void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	5422 restore_start_dir(char_u *dirname_start)
3490 8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5423 {
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5424 char_u *dirname_now = alloc(MAXPATHL);
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5425
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5426 if (NULL != dirname_now)
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5427 {
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5428 mch_dirname(dirname_now, MAXPATHL);
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5429 if (STRCMP(dirname_start, dirname_now) != 0)
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5430 {
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5431 /* 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	5432 * appropriate ex command and executing it. */
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5433 exarg_T ea;
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5434
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5435 ea.arg = dirname_start;
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5436 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	5437 ex_cd(&ea);
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5438 }
3974 4d1753f3e85c updated for version 7.3.742 Bram Moolenaar <bram@vim.org> parents: 3965 diff changeset	5439 vim_free(dirname_now);
3490 8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5440 }
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5441 }
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5442
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5443 /*
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5444 * 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	5445 * 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	5446 * "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	5447 * 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	5448 * 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	5449 *
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5450 * 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	5451 * or wipe_dummy_buffer() later!
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5452 *
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5453 * Returns NULL if it fails.
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5454 */
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5455 static buf_T *
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	5456 load_dummy_buffer(
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	5457 char_u *fname,
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	5458 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	5459 char_u resulting_dir) / out: new directory */
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5460 {
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5461 buf_T *newbuf;
9487 69ed2c9d34a6 commit https://github.com/vim/vim/commit/7c0a2f367f2507669560b1a66423155c70d2e75b Christian Brabandt <cb@256bit.org> parents: 9485 diff changeset	5462 bufref_T newbufref;
69ed2c9d34a6 commit https://github.com/vim/vim/commit/7c0a2f367f2507669560b1a66423155c70d2e75b Christian Brabandt <cb@256bit.org> parents: 9485 diff changeset	5463 bufref_T newbuf_to_wipe;
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5464 int failed = TRUE;
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5465 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	5466 int readfile_result;
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5467
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5468 /* Allocate a buffer without putting it in the buffer list. */
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5469 newbuf = buflist_new(NULL, NULL, (linenr_T)1, BLN_DUMMY);
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5470 if (newbuf == NULL)
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5471 return NULL;
9487 69ed2c9d34a6 commit https://github.com/vim/vim/commit/7c0a2f367f2507669560b1a66423155c70d2e75b Christian Brabandt <cb@256bit.org> parents: 9485 diff changeset	5472 set_bufref(&newbufref, newbuf);
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5473
177 84c21eb4fc40 updated for version 7.0054 vimboss parents: 170 diff changeset	5474 /* Init the options. */
84c21eb4fc40 updated for version 7.0054 vimboss parents: 170 diff changeset	5475 buf_copy_options(newbuf, BCO_ENTER \| BCO_NOHELP);
84c21eb4fc40 updated for version 7.0054 vimboss parents: 170 diff changeset	5476
1918 eac2556d4620 updated for version 7.2-215 vimboss parents: 1883 diff changeset	5477 /* need to open the memfile before putting the buffer in a window */
eac2556d4620 updated for version 7.2-215 vimboss parents: 1883 diff changeset	5478 if (ml_open(newbuf) == OK)
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5479 {
14250 ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	5480 /* 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	5481 ++newbuf->b_locked;
b931b2751650 patch 8.0.1403: using freed buffer in grep command Christian Brabandt <cb@256bit.org> parents: 13026 diff changeset	5482
1918 eac2556d4620 updated for version 7.2-215 vimboss parents: 1883 diff changeset	5483 /* set curwin/curbuf to buf and save a few things */
eac2556d4620 updated for version 7.2-215 vimboss parents: 1883 diff changeset	5484 aucmd_prepbuf(&aco, newbuf);
eac2556d4620 updated for version 7.2-215 vimboss parents: 1883 diff changeset	5485
eac2556d4620 updated for version 7.2-215 vimboss parents: 1883 diff changeset	5486 /* Need to set the filename for autocommands. */
eac2556d4620 updated for version 7.2-215 vimboss parents: 1883 diff changeset	5487 (void)setfname(curbuf, fname, NULL, FALSE);
eac2556d4620 updated for version 7.2-215 vimboss parents: 1883 diff changeset	5488
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5489 /* Create swap file now to avoid the ATTENTION message. */
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5490 check_need_swap(TRUE);
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5491
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5492 /* Remove the "dummy" flag, otherwise autocommands may not
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5493 * work. */
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5494 curbuf->b_flags &= ~BF_DUMMY;
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5495
9487 69ed2c9d34a6 commit https://github.com/vim/vim/commit/7c0a2f367f2507669560b1a66423155c70d2e75b Christian Brabandt <cb@256bit.org> parents: 9485 diff changeset	5496 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	5497 readfile_result = readfile(fname, NULL,
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5498 (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	5499 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	5500 --newbuf->b_locked;
b931b2751650 patch 8.0.1403: using freed buffer in grep command Christian Brabandt <cb@256bit.org> parents: 13026 diff changeset	5501 if (readfile_result == OK
857 b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5502 && !got_int
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5503 && !(curbuf->b_flags & BF_NEW))
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5504 {
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5505 failed = FALSE;
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5506 if (curbuf != newbuf)
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5507 {
2646 ff3a304b4ac2 updated for version 7.3.066 Bram Moolenaar <bram@vim.org> parents: 2583 diff changeset	5508 /* Bloody autocommands changed the buffer! Can happen when
ff3a304b4ac2 updated for version 7.3.066 Bram Moolenaar <bram@vim.org> parents: 2583 diff changeset	5509 * 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	5510 * 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	5511 * window stuff. */
9487 69ed2c9d34a6 commit https://github.com/vim/vim/commit/7c0a2f367f2507669560b1a66423155c70d2e75b Christian Brabandt <cb@256bit.org> parents: 9485 diff changeset	5512 set_bufref(&newbuf_to_wipe, newbuf);
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5513 newbuf = curbuf;
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5514 }
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5515 }
1918 eac2556d4620 updated for version 7.2-215 vimboss parents: 1883 diff changeset	5516
eac2556d4620 updated for version 7.2-215 vimboss parents: 1883 diff changeset	5517 /* restore curwin/curbuf and a few other things */
eac2556d4620 updated for version 7.2-215 vimboss parents: 1883 diff changeset	5518 aucmd_restbuf(&aco);
9487 69ed2c9d34a6 commit https://github.com/vim/vim/commit/7c0a2f367f2507669560b1a66423155c70d2e75b Christian Brabandt <cb@256bit.org> parents: 9485 diff changeset	5519 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	5520 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	5521
c16e207dc465 commit https://github.com/vim/vim/commit/ea3f2e7be447a8f0c4436869620f908de5e8ef1e Christian Brabandt <cb@256bit.org> parents: 9475 diff changeset	5522 /* 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	5523 * skip it. */
c16e207dc465 commit https://github.com/vim/vim/commit/ea3f2e7be447a8f0c4436869620f908de5e8ef1e Christian Brabandt <cb@256bit.org> parents: 9475 diff changeset	5524 newbuf->b_flags \|= BF_DUMMY;
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5525 }
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5526
3490 8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5527 /*
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5528 * When autocommands/'autochdir' option changed directory: go back.
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5529 * 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	5530 * important.
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5531 */
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5532 mch_dirname(resulting_dir, MAXPATHL);
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5533 restore_start_dir(dirname_start);
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5534
9487 69ed2c9d34a6 commit https://github.com/vim/vim/commit/7c0a2f367f2507669560b1a66423155c70d2e75b Christian Brabandt <cb@256bit.org> parents: 9485 diff changeset	5535 if (!bufref_valid(&newbufref))
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5536 return NULL;
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5537 if (failed)
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5538 {
3490 8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5539 wipe_dummy_buffer(newbuf, dirname_start);
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5540 return NULL;
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5541 }
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5542 return newbuf;
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5543 }
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5544
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5545 /*
3490 8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5546 * 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	5547 * 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	5548 * 'autochdir' option have changed it.
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5549 */
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5550 static void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	5551 wipe_dummy_buffer(buf_T buf, char_u dirname_start)
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5552 {
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5553 if (curbuf != buf) /* safety check */
857 b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5554 {
13380 69517d67421f patch 8.0.1564: too many #ifdefs Christian Brabandt <cb@256bit.org> parents: 13252 diff changeset	5555 #if defined(FEAT_EVAL)
857 b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5556 cleanup_T cs;
b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5557
b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5558 /* Reset the error/interrupt/exception state here so that aborting()
b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5559 * returns FALSE when wiping out the buffer. Otherwise it doesn't
b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5560 * work when got_int is set. */
b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5561 enter_cleanup(&cs);
b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5562 #endif
b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5563
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5564 wipe_buffer(buf, FALSE);
857 b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5565
13380 69517d67421f patch 8.0.1564: too many #ifdefs Christian Brabandt <cb@256bit.org> parents: 13252 diff changeset	5566 #if defined(FEAT_EVAL)
857 b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5567 /* Restore the error/interrupt/exception state if not discarded by a
b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5568 * new aborting error, interrupt, or uncaught exception. */
b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5569 leave_cleanup(&cs);
b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5570 #endif
3490 8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5571 /* When autocommands/'autochdir' option changed directory: go back. */
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5572 restore_start_dir(dirname_start);
857 b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5573 }
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5574 }
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5575
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5576 /*
3490 8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5577 * 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	5578 * 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	5579 * 'autochdir' option have changed it.
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5580 */
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5581 static void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	5582 unload_dummy_buffer(buf_T buf, char_u dirname_start)
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5583 {
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5584 if (curbuf != buf) /* safety check */
3490 8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5585 {
3365 9ccdc4a69d8f updated for version 7.3.449 Bram Moolenaar <bram@vim.org> parents: 3269 diff changeset	5586 close_buffer(NULL, buf, DOBUF_UNLOAD, FALSE);
3490 8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5587
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5588 /* When autocommands/'autochdir' option changed directory: go back. */
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5589 restore_start_dir(dirname_start);
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5590 }
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5591 }
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5592
170 8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5593 #if defined(FEAT_EVAL) \|\| defined(PROTO)
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5594 /*
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5595 * 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	5596 * 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	5597 */
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5598 int
12252 3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5599 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	5600 {
12252 3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5601 qf_info_T *qi = qi_arg;
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	5602 dict_T *dict;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	5603 char_u buf[2];
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	5604 qfline_T *qfp;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	5605 int i;
1065 caa550fe4457 updated for version 7.0-191 vimboss parents: 1020 diff changeset	5606 int bufnum;
170 8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5607
12252 3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5608 if (qi == NULL)
647 19106f131c87 updated for version 7.0188 vimboss parents: 644 diff changeset	5609 {
12252 3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5610 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	5611 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	5612 {
3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5613 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	5614 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	5615 return FAIL;
3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5616 }
647 19106f131c87 updated for version 7.0188 vimboss parents: 644 diff changeset	5617 }
19106f131c87 updated for version 7.0188 vimboss parents: 644 diff changeset	5618
13800 e4dc4ede9ef8 patch 8.0.1772: quickfix: mixup of FALSE and FAIL, returning -1 Christian Brabandt <cb@256bit.org> parents: 13764 diff changeset	5619 if (qf_idx == INVALID_QFIDX)
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5620 qf_idx = qi->qf_curlist;
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5621
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	5622 if (qf_idx >= qi->qf_listcount \|\| qf_list_empty(qi, qf_idx))
170 8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5623 return FAIL;
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5624
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5625 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	5626 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	5627 {
1065 caa550fe4457 updated for version 7.0-191 vimboss parents: 1020 diff changeset	5628 /* Handle entries with a non-existing buffer number. */
caa550fe4457 updated for version 7.0-191 vimboss parents: 1020 diff changeset	5629 bufnum = qfp->qf_fnum;
caa550fe4457 updated for version 7.0-191 vimboss parents: 1020 diff changeset	5630 if (bufnum != 0 && (buflist_findnr(bufnum) == NULL))
caa550fe4457 updated for version 7.0-191 vimboss parents: 1020 diff changeset	5631 bufnum = 0;
caa550fe4457 updated for version 7.0-191 vimboss parents: 1020 diff changeset	5632
170 8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5633 if ((dict = dict_alloc()) == NULL)
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5634 return FAIL;
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5635 if (list_append_dict(list, dict) == FAIL)
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5636 return FAIL;
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5637
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5638 buf[0] = qfp->qf_type;
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5639 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	5640 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	5641 \|\| 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	5642 \|\| 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	5643 \|\| 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	5644 \|\| 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	5645 \|\| 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	5646 \|\| 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	5647 \|\| 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	5648 \|\| 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	5649 \|\| dict_add_number(dict, "valid", (long)qfp->qf_valid) == FAIL)
170 8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5650 return FAIL;
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5651
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5652 qfp = qfp->qf_next;
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	5653 if (qfp == NULL)
543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	5654 break;
170 8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5655 }
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5656 return OK;
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5657 }
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	5658
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	5659 /*
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5660 * 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	5661 */
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5662 enum {
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5663 QF_GETLIST_NONE = 0x0,
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5664 QF_GETLIST_TITLE = 0x1,
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5665 QF_GETLIST_ITEMS = 0x2,
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5666 QF_GETLIST_NR = 0x4,
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5667 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	5668 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	5669 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	5670 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	5671 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	5672 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	5673 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	5674 QF_GETLIST_ALL = 0x3FF,
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5675 };
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5676
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5677 /*
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5678 * 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	5679 * 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	5680 */
3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5681 static int
12321 2779d593a706 patch 8.0.1040: cannot use another error format in getqflist() Christian Brabandt <cb@256bit.org> parents: 12303 diff changeset	5682 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	5683 {
3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5684 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	5685 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	5686 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	5687 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	5688 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	5689
12303 ec7a4fd21dd5 patch 8.0.1031: "text" argument for getqflist() is confusing Christian Brabandt <cb@256bit.org> parents: 12299 diff changeset	5690 /* 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	5691 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	5692 {
12321 2779d593a706 patch 8.0.1040: cannot use another error format in getqflist() Christian Brabandt <cb@256bit.org> parents: 12303 diff changeset	5693 /* 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	5694 * option setting
2779d593a706 patch 8.0.1040: cannot use another error format in getqflist() Christian Brabandt <cb@256bit.org> parents: 12303 diff changeset	5695 */
2779d593a706 patch 8.0.1040: cannot use another error format in getqflist() Christian Brabandt <cb@256bit.org> parents: 12303 diff changeset	5696 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	5697 {
2779d593a706 patch 8.0.1040: cannot use another error format in getqflist() Christian Brabandt <cb@256bit.org> parents: 12303 diff changeset	5698 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	5699 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	5700 return FAIL;
2779d593a706 patch 8.0.1040: cannot use another error format in getqflist() Christian Brabandt <cb@256bit.org> parents: 12303 diff changeset	5701 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	5702 }
2779d593a706 patch 8.0.1040: cannot use another error format in getqflist() Christian Brabandt <cb@256bit.org> parents: 12303 diff changeset	5703
2779d593a706 patch 8.0.1040: cannot use another error format in getqflist() Christian Brabandt <cb@256bit.org> parents: 12303 diff changeset	5704 l = list_alloc();
12299 f4d00472e617 patch 8.0.1029: return value of getqflist() is inconsistent Christian Brabandt <cb@256bit.org> parents: 12287 diff changeset	5705 if (l == NULL)
f4d00472e617 patch 8.0.1029: return value of getqflist() is inconsistent Christian Brabandt <cb@256bit.org> parents: 12287 diff changeset	5706 return FAIL;
f4d00472e617 patch 8.0.1029: return value of getqflist() is inconsistent Christian Brabandt <cb@256bit.org> parents: 12287 diff changeset	5707
14495 178162aeebeb patch 8.1.0261: Coverity complains about a negative array index Christian Brabandt <cb@256bit.org> parents: 14491 diff changeset	5708 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	5709 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	5710 {
12321 2779d593a706 patch 8.0.1040: cannot use another error format in getqflist() Christian Brabandt <cb@256bit.org> parents: 12303 diff changeset	5711 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	5712 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	5713 {
12299 f4d00472e617 patch 8.0.1029: return value of getqflist() is inconsistent Christian Brabandt <cb@256bit.org> parents: 12287 diff changeset	5714 (void)get_errorlist(qi, NULL, 0, l);
12252 3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5715 qf_free(qi, 0);
3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5716 }
3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5717 free(qi);
3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5718 }
12299 f4d00472e617 patch 8.0.1029: return value of getqflist() is inconsistent Christian Brabandt <cb@256bit.org> parents: 12287 diff changeset	5719 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	5720 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	5721 }
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 return status;
3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5724 }
3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5725
3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5726 /*
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	5727 * 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	5728 */
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	5729 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	5730 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	5731 {
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	5732 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	5733
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	5734 /* 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	5735 * 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	5736 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	5737 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	5738 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	5739 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	5740 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	5741 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	5742 }
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	5743
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	5744 /*
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5745 * Convert the keys in 'what' to quickfix list property flags.
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	5746 */
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5747 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	5748 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	5749 {
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5750 int flags = QF_GETLIST_NONE;
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5751
12287 20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	5752 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	5753 {
12287 20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	5754 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	5755 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	5756 // 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	5757 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	5758 }
12287 20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	5759
20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	5760 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	5761 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	5762
13026 7c0e0e923537 patch 8.0.1389: getqflist() items are missing if not set Christian Brabandt <cb@256bit.org> parents: 13016 diff changeset	5763 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	5764 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	5765
12287 20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	5766 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	5767 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	5768
20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	5769 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	5770 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	5771
13026 7c0e0e923537 patch 8.0.1389: getqflist() items are missing if not set Christian Brabandt <cb@256bit.org> parents: 13016 diff changeset	5772 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	5773 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	5774
12287 20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	5775 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	5776 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	5777
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	5778 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	5779 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	5780
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 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	5782 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	5783
13062 6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	5784 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	5785 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	5786
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	5787 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	5788 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	5789
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5790 return flags;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5791 }
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5792
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5793 /*
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5794 * 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	5795 * 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	5796 * quickfix list index.
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5797 * 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	5798 * 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	5799 * 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	5800 * 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	5801 * 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	5802 */
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5803 static int
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5804 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	5805 {
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5806 int qf_idx;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5807 dictitem_T *di;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5808
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5809 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	5810 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	5811 {
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5812 /* 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	5813 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	5814 {
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5815 /* 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	5816 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	5817 {
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5818 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	5819 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	5820 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	5821 }
7c0e0e923537 patch 8.0.1389: getqflist() items are missing if not set Christian Brabandt <cb@256bit.org> parents: 13016 diff changeset	5822 }
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5823 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	5824 && 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	5825 && 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	5826 /* 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	5827 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	5828 else
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	5829 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	5830 }
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5831
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5832 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	5833 {
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5834 /* 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	5835 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	5836 {
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5837 /*
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5838 * 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	5839 */
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5840 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	5841 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	5842 }
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5843 else
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	5844 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	5845 }
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5846
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5847 return qf_idx;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5848 }
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5849
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5850 /*
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5851 * 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	5852 */
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5853 static int
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5854 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	5855 {
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5856 int status = OK;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5857
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5858 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	5859 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	5860 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	5861 {
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5862 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	5863 if (l != NULL)
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5864 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	5865 else
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5866 status = FAIL;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5867 }
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5868 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	5869 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	5870 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	5871 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	5872 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	5873 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	5874 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	5875 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	5876 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	5877 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	5878 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	5879 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	5880 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	5881 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	5882 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	5883 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	5884
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5885 return status;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5886 }
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5887
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5888 /*
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5889 * 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	5890 */
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5891 static int
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5892 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	5893 {
14301 3c80092eb211 patch 8.1.0166: using dict_add_nr_str() is clumsy Christian Brabandt <cb@256bit.org> parents: 14299 diff changeset	5894 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	5895 }
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5896
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5897 /*
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	5898 * 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	5899 * 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	5900 * 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	5901 */
8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	5902 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	5903 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	5904 {
8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	5905 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	5906
8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	5907 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	5908 {
8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	5909 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	5910 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	5911 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	5912 }
8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	5913
8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	5914 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	5915 }
8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	5916
8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	5917 /*
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5918 * 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	5919 */
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5920 static int
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5921 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	5922 {
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5923 int status = OK;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5924 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	5925 if (l != NULL)
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5926 {
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5927 (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	5928 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	5929 }
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5930 else
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5931 status = FAIL;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5932
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5933 return status;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5934 }
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5935
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5936 /*
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5937 * 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	5938 */
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5939 static int
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5940 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	5941 {
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5942 int status;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5943 dictitem_T *di;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5944
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5945 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	5946 {
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5947 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	5948 if (di != NULL)
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 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	5951 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	5952 if (status == FAIL)
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5953 dictitem_free(di);
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5954 }
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5955 else
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5956 status = FAIL;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5957 }
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5958 else
14301 3c80092eb211 patch 8.1.0166: using dict_add_nr_str() is clumsy Christian Brabandt <cb@256bit.org> parents: 14299 diff changeset	5959 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	5960
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5961 return status;
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
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5964 /*
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5965 * 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	5966 */
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5967 static int
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5968 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	5969 {
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5970 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	5971 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	5972 /* 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	5973 idx = 0;
14301 3c80092eb211 patch 8.1.0166: using dict_add_nr_str() is clumsy Christian Brabandt <cb@256bit.org> parents: 14299 diff changeset	5974 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	5975 }
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5976
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 * 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	5979 * 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	5980 * 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	5981 */
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5982 int
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5983 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	5984 {
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5985 qf_info_T *qi = &ql_info;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5986 int status = OK;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5987 int qf_idx;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5988 dictitem_T *di;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5989 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	5990
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5991 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	5992 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	5993
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5994 if (wp != NULL)
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5995 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	5996
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	5997 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	5998
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5999 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	6000 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	6001
7c0e0e923537 patch 8.0.1389: getqflist() items are missing if not set Christian Brabandt <cb@256bit.org> parents: 13016 diff changeset	6002 /* 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	6003 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	6004 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	6005
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6006 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	6007 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	6008 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	6009 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	6010 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	6011 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	6012 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	6013 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	6014 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	6015 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	6016 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	6017 status = dict_add_number(retdict, "id", qi->qf_lists[qf_idx].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	6018 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	6019 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	6020 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	6021 status = dict_add_number(retdict, "size",
3c80092eb211 patch 8.1.0166: using dict_add_nr_str() is clumsy Christian Brabandt <cb@256bit.org> parents: 14299 diff changeset	6022 qi->qf_lists[qf_idx].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	6023 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	6024 status = dict_add_number(retdict, "changedtick",
3c80092eb211 patch 8.1.0166: using dict_add_nr_str() is clumsy Christian Brabandt <cb@256bit.org> parents: 14299 diff changeset	6025 qi->qf_lists[qf_idx].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	6026 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	6027 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	6028
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6029 return status;
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6030 }
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6031
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6032 /*
14633 462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6033 * 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	6034 * 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	6035 */
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6036 static int
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6037 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	6038 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	6039 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	6040 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	6041 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	6042 {
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6043 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	6044 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	6045 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	6046 long lnum;
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6047
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6048 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	6049 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	6050
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6051 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	6052 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	6053 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	6054 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	6055 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	6056 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	6057 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	6058 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	6059 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	6060 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	6061 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	6062 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	6063
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6064 valid = TRUE;
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6065 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	6066 valid = FALSE;
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6067
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6068 // 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	6069 // 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	6070 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	6071 {
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6072 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	6073 {
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6074 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	6075 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	6076 }
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6077 valid = FALSE;
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6078 bufnum = 0;
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6079 }
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6080
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6081 // 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	6082 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	6083 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	6084
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6085 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	6086 qf_idx,
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6087 NULL, // dir
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6088 filename,
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6089 module,
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6090 bufnum,
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6091 text,
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6092 lnum,
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6093 col,
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6094 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	6095 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	6096 nr,
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6097 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	6098 valid);
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6099
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6100 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	6101 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	6102 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	6103 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	6104 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	6105
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6106 return status;
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6107 }
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6108
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6109 /*
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6110 * 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	6111 * a dictionary with item information.
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6112 */
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6113 static int
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6114 qf_add_entries(
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6115 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	6116 int qf_idx,
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6117 list_T *list,
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6118 char_u *title,
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6119 int action)
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6120 {
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6121 listitem_T *li;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6122 dict_T *d;
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	6123 qfline_T *old_last = NULL;
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6124 int retval = OK;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	6125
11449 d2f00eb352b9 patch 8.0.0608: cannot manipulate other than the current quickfix list Christian Brabandt <cb@256bit.org> parents: 11447 diff changeset	6126 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	6127 {
277 fe16c18c24a7 updated for version 7.0074 vimboss parents: 273 diff changeset	6128 /* make place for a new list */
3965 eccae034465b updated for version 7.3.738 Bram Moolenaar <bram@vim.org> parents: 3949 diff changeset	6129 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	6130 qf_idx = qi->qf_curlist;
d2f00eb352b9 patch 8.0.0608: cannot manipulate other than the current quickfix list Christian Brabandt <cb@256bit.org> parents: 11447 diff changeset	6131 }
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	6132 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	6133 /* Adding to existing list, use last entry. */
11449 d2f00eb352b9 patch 8.0.0608: cannot manipulate other than the current quickfix list Christian Brabandt <cb@256bit.org> parents: 11447 diff changeset	6134 old_last = qi->qf_lists[qf_idx].qf_last;
277 fe16c18c24a7 updated for version 7.0074 vimboss parents: 273 diff changeset	6135 else if (action == 'r')
6079 75ae211df37d updated for version 7.4.378 Bram Moolenaar <bram@vim.org> parents: 5753 diff changeset	6136 {
11549 f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	6137 qf_free_items(qi, 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	6138 qf_store_title(qi, qf_idx, title);
6079 75ae211df37d updated for version 7.4.378 Bram Moolenaar <bram@vim.org> parents: 5753 diff changeset	6139 }
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6140
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6141 for (li = list->lv_first; li != NULL; li = li->li_next)
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6142 {
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6143 if (li->li_tv.v_type != VAR_DICT)
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6144 continue; /* Skip non-dict items */
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6145
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6146 d = li->li_tv.vval.v_dict;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6147 if (d == NULL)
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6148 continue;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6149
14633 462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6150 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	6151 if (retval == FAIL)
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6152 break;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6153 }
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6154
11449 d2f00eb352b9 patch 8.0.0608: cannot manipulate other than the current quickfix list Christian Brabandt <cb@256bit.org> parents: 11447 diff changeset	6155 if (qi->qf_lists[qf_idx].qf_index == 0)
2795 133d089f247e updated for version 7.3.173 Bram Moolenaar <bram@vim.org> parents: 2782 diff changeset	6156 /* no valid entry */
11449 d2f00eb352b9 patch 8.0.0608: cannot manipulate other than the current quickfix list Christian Brabandt <cb@256bit.org> parents: 11447 diff changeset	6157 qi->qf_lists[qf_idx].qf_nonevalid = TRUE;
2146 c17a42da3920 updated for version 7.2.428 Bram Moolenaar <bram@zimbu.org> parents: 2047 diff changeset	6158 else
11449 d2f00eb352b9 patch 8.0.0608: cannot manipulate other than the current quickfix list Christian Brabandt <cb@256bit.org> parents: 11447 diff changeset	6159 qi->qf_lists[qf_idx].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	6160 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	6161 {
11449 d2f00eb352b9 patch 8.0.0608: cannot manipulate other than the current quickfix list Christian Brabandt <cb@256bit.org> parents: 11447 diff changeset	6162 qi->qf_lists[qf_idx].qf_ptr =
d2f00eb352b9 patch 8.0.0608: cannot manipulate other than the current quickfix list Christian Brabandt <cb@256bit.org> parents: 11447 diff changeset	6163 qi->qf_lists[qf_idx].qf_start;
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	6164 if (!qf_list_empty(qi, 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	6165 qi->qf_lists[qf_idx].qf_index = 1;
8932 25c2031e9f9f commit https://github.com/vim/vim/commit/c1808d5822ed9534ef7f0fe509b15bee92a5cc28 Christian Brabandt <cb@256bit.org> parents: 8751 diff changeset	6166 }
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6167
8932 25c2031e9f9f commit https://github.com/vim/vim/commit/c1808d5822ed9534ef7f0fe509b15bee92a5cc28 Christian Brabandt <cb@256bit.org> parents: 8751 diff changeset	6168 /* 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	6169 qf_update_buffer(qi, old_last);
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6170
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6171 return retval;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6172 }
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6173
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6174 /*
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6175 * 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	6176 */
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6177 static int
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6178 qf_setprop_get_qfidx(
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6179 qf_info_T *qi,
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6180 dict_T *what,
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6181 int action,
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6182 int *newlist)
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6183 {
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6184 dictitem_T *di;
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6185 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	6186
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6187 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	6188 {
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6189 /* Use the specified quickfix/location list */
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6190 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	6191 {
11445 461ac47c3793 patch 8.0.0606: cannot set the context for a specified quickfix list Christian Brabandt <cb@256bit.org> parents: 11443 diff changeset	6192 /* 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	6193 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	6194 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	6195
12084 69ce6b3f0834 patch 8.0.0922: quickfix list always added after current one Christian Brabandt <cb@256bit.org> parents: 12048 diff changeset	6196 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	6197 {
11549 f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	6198 /*
f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	6199 * 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	6200 * 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	6201 * stack.
11549 f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	6202 */
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6203 *newlist = TRUE;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6204 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	6205 }
11549 f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	6206 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	6207 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	6208 else if (action != ' ')
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6209 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	6210 }
69ce6b3f0834 patch 8.0.0922: quickfix list always added after current one Christian Brabandt <cb@256bit.org> parents: 12048 diff changeset	6211 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	6212 && 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	6213 && 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	6214 {
12084 69ce6b3f0834 patch 8.0.0922: quickfix list always added after current one Christian Brabandt <cb@256bit.org> parents: 12048 diff changeset	6215 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	6216 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	6217 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	6218 qf_idx = 0;
69ce6b3f0834 patch 8.0.0922: quickfix list always added after current one Christian Brabandt <cb@256bit.org> parents: 12048 diff changeset	6219 else
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6220 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	6221 }
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6222 else
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6223 return INVALID_QFIDX;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6224 }
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6225
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6226 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	6227 {
20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	6228 /* 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	6229 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	6230 return INVALID_QFIDX;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6231
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6232 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	6233 }
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6234
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6235 return qf_idx;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6236 }
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6237
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6238 /*
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6239 * 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	6240 */
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6241 static int
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6242 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	6243 {
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6244 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	6245 return FAIL;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6246
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6247 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	6248 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	6249 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	6250 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	6251 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	6252
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6253 return OK;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6254 }
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6255
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6256 /*
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6257 * 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	6258 */
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6259 static int
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6260 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	6261 {
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6262 int retval = FAIL;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6263 char_u *title_save;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6264
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6265 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	6266 return FAIL;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6267
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6268 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	6269 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	6270 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	6271 vim_free(title_save);
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6272
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6273 return retval;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6274 }
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6275
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6276 /*
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6277 * 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	6278 */
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6279 static int
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6280 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	6281 qf_info_T *qi,
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6282 int qf_idx,
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6283 dict_T *what,
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6284 dictitem_T *di,
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6285 int action)
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 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	6288 dictitem_T *efm_di;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6289 int retval = FAIL;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6290
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6291 /* 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	6292 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	6293 {
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6294 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	6295 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	6296 return FAIL;
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6297 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	6298 }
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6299
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6300 /* 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	6301 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	6302 return FAIL;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6303
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6304 if (action == 'r')
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6305 qf_free_items(qi, qf_idx);
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6306 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	6307 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	6308 retval = OK;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6309
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6310 return retval;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6311 }
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6312
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6313 /*
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6314 * Set quickfix list context.
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6315 */
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6316 static int
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6317 qf_setprop_context(qf_info_T qi, int qf_idx, dictitem_T di)
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6318 {
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6319 typval_T *ctx;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6320
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6321 free_tv(qi->qf_lists[qf_idx].qf_ctx);
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6322 ctx = alloc_tv();
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6323 if (ctx != NULL)
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6324 copy_tv(&di->di_tv, ctx);
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6325 qi->qf_lists[qf_idx].qf_ctx = ctx;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6326
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6327 return OK;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6328 }
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6329
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6330 /*
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6331 * 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	6332 * 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	6333 * 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	6334 */
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6335 static int
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6336 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	6337 {
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6338 dictitem_T *di;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6339 int retval = FAIL;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6340 int qf_idx;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6341 int newlist = FALSE;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6342
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6343 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	6344 newlist = TRUE;
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 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	6347 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	6348 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	6349
9982 e24aa20d815c commit https://github.com/vim/vim/commit/2b529bb6260b52246e92429375d995b9b5ce76b6 Christian Brabandt <cb@256bit.org> parents: 9931 diff changeset	6350 if (newlist)
e24aa20d815c commit https://github.com/vim/vim/commit/2b529bb6260b52246e92429375d995b9b5ce76b6 Christian Brabandt <cb@256bit.org> parents: 9931 diff changeset	6351 {
12084 69ce6b3f0834 patch 8.0.0922: quickfix list always added after current one Christian Brabandt <cb@256bit.org> parents: 12048 diff changeset	6352 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	6353 qf_new_list(qi, title);
9982 e24aa20d815c commit https://github.com/vim/vim/commit/2b529bb6260b52246e92429375d995b9b5ce76b6 Christian Brabandt <cb@256bit.org> parents: 9931 diff changeset	6354 qf_idx = qi->qf_curlist;
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6355 }
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6356
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6357 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	6358 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	6359 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	6360 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	6361 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	6362 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	6363 if ((di = dict_find(what, (char_u *)"context", -1)) != NULL)
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6364 retval = qf_setprop_context(qi, qf_idx, di);
11412 84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6365
13062 6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	6366 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	6367 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	6368
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6369 return retval;
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6370 }
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6371
11301 cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6372 /*
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6373 * Find the non-location list window with the specified location list.
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6374 */
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6375 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	6376 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	6377 {
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6378 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	6379
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6380 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	6381 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	6382 return wp;
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6383
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6384 return NULL;
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6385 }
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6386
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6387 /*
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6388 * 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	6389 * 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	6390 */
11263 ae5f9f26f81c patch 8.0.0517: there is no way to remove quickfix lists Christian Brabandt <cb@256bit.org> parents: 11195 diff changeset	6391 static void
ae5f9f26f81c patch 8.0.0517: there is no way to remove quickfix lists Christian Brabandt <cb@256bit.org> parents: 11195 diff changeset	6392 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	6393 {
11301 cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6394 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	6395 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	6396 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	6397
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6398 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	6399 {
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6400 /* 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	6401 if (qi->qf_curlist < qi->qf_listcount)
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6402 qf_free(qi, qi->qf_curlist);
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6403 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	6404 }
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6405
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6406 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	6407 {
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6408 /* 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	6409 * 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	6410 */
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6411 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	6412 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	6413 wp = llwin;
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6414 }
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6415
11263 ae5f9f26f81c patch 8.0.0517: there is no way to remove quickfix lists Christian Brabandt <cb@256bit.org> parents: 11195 diff changeset	6416 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	6417 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	6418 {
ae5f9f26f81c patch 8.0.0517: there is no way to remove quickfix lists Christian Brabandt <cb@256bit.org> parents: 11195 diff changeset	6419 /* quickfix list */
ae5f9f26f81c patch 8.0.0517: there is no way to remove quickfix lists Christian Brabandt <cb@256bit.org> parents: 11195 diff changeset	6420 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	6421 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	6422 }
11301 cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6423 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	6424 {
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6425 /* 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	6426 * location list */
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6427 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	6428
11398 30af33f4d353 patch 8.0.0584: memory leak when executing quickfix tests Christian Brabandt <cb@256bit.org> parents: 11390 diff changeset	6429 /* 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	6430 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	6431
11301 cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6432 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	6433 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	6434 {
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6435 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	6436 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	6437 }
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6438 }
11263 ae5f9f26f81c patch 8.0.0517: there is no way to remove quickfix lists Christian Brabandt <cb@256bit.org> parents: 11195 diff changeset	6439 }
ae5f9f26f81c patch 8.0.0517: there is no way to remove quickfix lists Christian Brabandt <cb@256bit.org> parents: 11195 diff changeset	6440
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6441 /*
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6442 * 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	6443 * 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	6444 * "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	6445 */
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6446 int
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6447 set_errorlist(
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6448 win_T *wp,
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6449 list_T *list,
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6450 int action,
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6451 char_u *title,
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6452 dict_T *what)
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6453 {
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6454 qf_info_T *qi = &ql_info;
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6455 int retval = OK;
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6456
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6457 if (wp != NULL)
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6458 {
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6459 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	6460 if (qi == NULL)
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6461 return FAIL;
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6462 }
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6463
11263 ae5f9f26f81c patch 8.0.0517: there is no way to remove quickfix lists Christian Brabandt <cb@256bit.org> parents: 11195 diff changeset	6464 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	6465 {
ae5f9f26f81c patch 8.0.0517: there is no way to remove quickfix lists Christian Brabandt <cb@256bit.org> parents: 11195 diff changeset	6466 /* 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	6467 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	6468 }
ae5f9f26f81c patch 8.0.0517: there is no way to remove quickfix lists Christian Brabandt <cb@256bit.org> parents: 11195 diff changeset	6469 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	6470 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	6471 else
13062 6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	6472 {
11449 d2f00eb352b9 patch 8.0.0608: cannot manipulate other than the current quickfix list Christian Brabandt <cb@256bit.org> parents: 11447 diff changeset	6473 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	6474 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	6475 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	6476 }
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6477
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6478 return retval;
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6479 }
11412 84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6480
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	6481 /*
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	6482 * 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	6483 */
11412 84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6484 static int
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6485 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	6486 {
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6487 int i;
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6488 int abort = FALSE;
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6489 typval_T *ctx;
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6490
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6491 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	6492 {
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6493 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	6494 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	6495 && 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	6496 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	6497 }
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6498
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6499 return abort;
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6500 }
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6501
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6502 /*
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6503 * 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	6504 * "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	6505 */
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6506 int
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6507 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	6508 {
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6509 int abort = FALSE;
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6510 tabpage_T *tp;
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6511 win_T *win;
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6512
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6513 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	6514 if (abort)
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6515 return abort;
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6516
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6517 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	6518 {
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6519 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	6520 {
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6521 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	6522 if (abort)
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6523 return abort;
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6524 }
13074 66c014c71dad patch 8.0.1412: using free memory using setloclist() Christian Brabandt <cb@256bit.org> parents: 13066 diff changeset	6525 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	6526 {
66c014c71dad patch 8.0.1412: using free memory using setloclist() Christian Brabandt <cb@256bit.org> parents: 13066 diff changeset	6527 /* 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	6528 * 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	6529 * context as still in use.
66c014c71dad patch 8.0.1412: using free memory using setloclist() Christian Brabandt <cb@256bit.org> parents: 13066 diff changeset	6530 */
66c014c71dad patch 8.0.1412: using free memory using setloclist() Christian Brabandt <cb@256bit.org> parents: 13066 diff changeset	6531 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	6532 if (abort)
66c014c71dad patch 8.0.1412: using free memory using setloclist() Christian Brabandt <cb@256bit.org> parents: 13066 diff changeset	6533 return abort;
66c014c71dad patch 8.0.1412: using free memory using setloclist() Christian Brabandt <cb@256bit.org> parents: 13066 diff changeset	6534 }
11412 84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6535 }
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6536
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6537 return abort;
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6538 }
170 8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	6539 #endif
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	6540
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	6541 /*
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6542 * ":[range]cbuffer [bufnr]" command.
657 b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	6543 * ":[range]caddbuffer [bufnr]" command.
798 95dac6af3b3a updated for version 7.0232 vimboss parents: 789 diff changeset	6544 * ":[range]cgetbuffer [bufnr]" command.
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	6545 * ":[range]lbuffer [bufnr]" command.
657 b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	6546 * ":[range]laddbuffer [bufnr]" command.
798 95dac6af3b3a updated for version 7.0232 vimboss parents: 789 diff changeset	6547 * ":[range]lgetbuffer [bufnr]" command.
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6548 */
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6549 void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	6550 ex_cbuffer(exarg_T *eap)
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6551 {
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6552 buf_T *buf = NULL;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	6553 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	6554 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	6555 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	6556 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	6557 win_T *wp = NULL;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	6558
10056 21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6559 switch (eap->cmdidx)
21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6560 {
21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6561 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	6562 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	6563 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	6564 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	6565 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	6566 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	6567 default: break;
21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6568 }
10346 d52d97bf675e commit https://github.com/vim/vim/commit/21662be2211675824df1771c7f169948ede40c41 Christian Brabandt <cb@256bit.org> parents: 10281 diff changeset	6569 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	6570 curbuf->b_fname, TRUE, curbuf))
10056 21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6571 {
13380 69517d67421f patch 8.0.1564: too many #ifdefs Christian Brabandt <cb@256bit.org> parents: 13252 diff changeset	6572 #ifdef FEAT_EVAL
10346 d52d97bf675e commit https://github.com/vim/vim/commit/21662be2211675824df1771c7f169948ede40c41 Christian Brabandt <cb@256bit.org> parents: 10281 diff changeset	6573 if (aborting())
10056 21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6574 return;
21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6575 #endif
13380 69517d67421f patch 8.0.1564: too many #ifdefs Christian Brabandt <cb@256bit.org> parents: 13252 diff changeset	6576 }
10056 21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6577
13076 7c071a3f7f8e patch 8.0.1413: accessing freed memory in :cbuffer Christian Brabandt <cb@256bit.org> parents: 13074 diff changeset	6578 /* 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	6579 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	6580 {
7c071a3f7f8e patch 8.0.1413: accessing freed memory in :cbuffer Christian Brabandt <cb@256bit.org> parents: 13074 diff changeset	6581 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	6582 if (qi == NULL)
7c071a3f7f8e patch 8.0.1413: accessing freed memory in :cbuffer Christian Brabandt <cb@256bit.org> parents: 13074 diff changeset	6583 return;
14250 ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	6584 wp = curwin;
13076 7c071a3f7f8e patch 8.0.1413: accessing freed memory in :cbuffer Christian Brabandt <cb@256bit.org> parents: 13074 diff changeset	6585 }
7c071a3f7f8e patch 8.0.1413: accessing freed memory in :cbuffer Christian Brabandt <cb@256bit.org> parents: 13074 diff changeset	6586
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6587 if (*eap->arg == NUL)
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6588 buf = curbuf;
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6589 else if (*skipwhite(skipdigits(eap->arg)) == NUL)
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6590 buf = buflist_findnr(atoi((char *)eap->arg));
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6591 if (buf == NULL)
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6592 EMSG(_(e_invarg));
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6593 else if (buf->b_ml.ml_mfp == NULL)
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6594 EMSG(_("E681: Buffer is not loaded"));
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6595 else
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6596 {
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6597 if (eap->addr_count == 0)
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6598 {
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6599 eap->line1 = 1;
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6600 eap->line2 = buf->b_ml.ml_line_count;
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6601 }
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6602 if (eap->line1 < 1 \|\| eap->line1 > buf->b_ml.ml_line_count
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6603 \|\| eap->line2 < 1 \|\| eap->line2 > buf->b_ml.ml_line_count)
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6604 EMSG(_(e_invrange));
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6605 else
661 e93a99ef31d0 updated for version 7.0195 vimboss parents: 659 diff changeset	6606 {
13921 3b6c29f8c1a2 patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':' Christian Brabandt <cb@256bit.org> parents: 13882 diff changeset	6607 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	6608
68e394361ca3 Add "q" item for 'statusline'. Add w:quickfix_title. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2296 diff changeset	6609 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	6610 {
68e394361ca3 Add "q" item for 'statusline'. Add w:quickfix_title. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2296 diff changeset	6611 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	6612 (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	6613 qf_title = IObuff;
68e394361ca3 Add "q" item for 'statusline'. Add w:quickfix_title. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2296 diff changeset	6614 }
68e394361ca3 Add "q" item for 'statusline'. Add w:quickfix_title. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2296 diff changeset	6615
12954 49e136457c66 patch 8.0.1353: QuickFixCmdPost is not used consistently Christian Brabandt <cb@256bit.org> parents: 12912 diff changeset	6616 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	6617 (eap->cmdidx != CMD_caddbuffer
95dac6af3b3a updated for version 7.0232 vimboss parents: 789 diff changeset	6618 && 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	6619 eap->line1, eap->line2,
12954 49e136457c66 patch 8.0.1353: QuickFixCmdPost is not used consistently Christian Brabandt <cb@256bit.org> parents: 12912 diff changeset	6620 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	6621 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	6622 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	6623
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	6624 // 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	6625 // 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	6626 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	6627 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	6628 {
59e76d550c10 patch 8.1.0060: crash when autocommands delete the current buffer Christian Brabandt <cb@256bit.org> parents: 13992 diff changeset	6629 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	6630
12954 49e136457c66 patch 8.0.1353: QuickFixCmdPost is not used consistently Christian Brabandt <cb@256bit.org> parents: 12912 diff changeset	6631 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	6632 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	6633 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	6634 // 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	6635 // be invalid.
59e76d550c10 patch 8.1.0060: crash when autocommands delete the current buffer Christian Brabandt <cb@256bit.org> parents: 13992 diff changeset	6636 res = 0;
59e76d550c10 patch 8.1.0060: crash when autocommands delete the current buffer Christian Brabandt <cb@256bit.org> parents: 13992 diff changeset	6637 }
14250 ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	6638 // 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	6639 // free the list.
12954 49e136457c66 patch 8.0.1353: QuickFixCmdPost is not used consistently Christian Brabandt <cb@256bit.org> parents: 12912 diff changeset	6640 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	6641 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	6642 && qflist_valid(wp, save_qfid))
14469 0211e295835e patch 8.1.0248: duplicated quickfix code Christian Brabandt <cb@256bit.org> parents: 14433 diff changeset	6643 // display the first error
0211e295835e patch 8.1.0248: duplicated quickfix code Christian Brabandt <cb@256bit.org> parents: 14433 diff changeset	6644 qf_jump_first(qi, save_qfid, eap->forceit);
661 e93a99ef31d0 updated for version 7.0195 vimboss parents: 659 diff changeset	6645 }
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6646 }
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6647 }
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6648
532 7052f11a3dc9 updated for version 7.0150 vimboss parents: 531 diff changeset	6649 #if defined(FEAT_EVAL) \|\| defined(PROTO)
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6650 /*
798 95dac6af3b3a updated for version 7.0232 vimboss parents: 789 diff changeset	6651 * ":cexpr {expr}", ":cgetexpr {expr}", ":caddexpr {expr}" command.
95dac6af3b3a updated for version 7.0232 vimboss parents: 789 diff changeset	6652 * ":lexpr {expr}", ":lgetexpr {expr}", ":laddexpr {expr}" command.
446 7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	6653 */
7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	6654 void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	6655 ex_cexpr(exarg_T *eap)
446 7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	6656 {
7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	6657 typval_T *tv;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	6658 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	6659 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	6660 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	6661 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	6662 win_T *wp = NULL;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	6663
10056 21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6664 switch (eap->cmdidx)
21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6665 {
21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6666 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	6667 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	6668 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	6669 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	6670 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	6671 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	6672 default: break;
21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6673 }
10346 d52d97bf675e commit https://github.com/vim/vim/commit/21662be2211675824df1771c7f169948ede40c41 Christian Brabandt <cb@256bit.org> parents: 10281 diff changeset	6674 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	6675 curbuf->b_fname, TRUE, curbuf))
10056 21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6676 {
13380 69517d67421f patch 8.0.1564: too many #ifdefs Christian Brabandt <cb@256bit.org> parents: 13252 diff changeset	6677 #ifdef FEAT_EVAL
10346 d52d97bf675e commit https://github.com/vim/vim/commit/21662be2211675824df1771c7f169948ede40c41 Christian Brabandt <cb@256bit.org> parents: 10281 diff changeset	6678 if (aborting())
10056 21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6679 return;
21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6680 #endif
13380 69517d67421f patch 8.0.1564: too many #ifdefs Christian Brabandt <cb@256bit.org> parents: 13252 diff changeset	6681 }
10056 21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6682
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	6683 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	6684 {
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	6685 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	6686 if (qi == NULL)
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	6687 return;
14250 ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	6688 wp = curwin;
13090 a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	6689 }
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	6690
625 81fe2ccc1207 updated for version 7.0179 vimboss parents: 581 diff changeset	6691 /* 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	6692 * use it to fill the errorlist. */
446 7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	6693 tv = eval_expr(eap->arg, NULL);
625 81fe2ccc1207 updated for version 7.0179 vimboss parents: 581 diff changeset	6694 if (tv != NULL)
81fe2ccc1207 updated for version 7.0179 vimboss parents: 581 diff changeset	6695 {
81fe2ccc1207 updated for version 7.0179 vimboss parents: 581 diff changeset	6696 if ((tv->v_type == VAR_STRING && tv->vval.v_string != NULL)
81fe2ccc1207 updated for version 7.0179 vimboss parents: 581 diff changeset	6697 \|\| (tv->v_type == VAR_LIST && tv->vval.v_list != NULL))
81fe2ccc1207 updated for version 7.0179 vimboss parents: 581 diff changeset	6698 {
12954 49e136457c66 patch 8.0.1353: QuickFixCmdPost is not used consistently Christian Brabandt <cb@256bit.org> parents: 12912 diff changeset	6699 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	6700 (eap->cmdidx != CMD_caddexpr
95dac6af3b3a updated for version 7.0232 vimboss parents: 789 diff changeset	6701 && 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	6702 (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	6703 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	6704 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	6705 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	6706
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	6707 // 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	6708 // 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	6709 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	6710 if (au_name != NULL)
49e136457c66 patch 8.0.1353: QuickFixCmdPost is not used consistently Christian Brabandt <cb@256bit.org> parents: 12912 diff changeset	6711 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	6712 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	6713
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	6714 // 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	6715 // free the list.
14111 678e326bf7eb patch 8.1.0073: crash when autocommands call setloclist() Christian Brabandt <cb@256bit.org> parents: 14085 diff changeset	6716 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	6717 \|\| 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	6718 && qflist_valid(wp, save_qfid))
14469 0211e295835e patch 8.1.0248: duplicated quickfix code Christian Brabandt <cb@256bit.org> parents: 14433 diff changeset	6719 // display the first error
0211e295835e patch 8.1.0248: duplicated quickfix code Christian Brabandt <cb@256bit.org> parents: 14433 diff changeset	6720 qf_jump_first(qi, save_qfid, eap->forceit);
625 81fe2ccc1207 updated for version 7.0179 vimboss parents: 581 diff changeset	6721 }
81fe2ccc1207 updated for version 7.0179 vimboss parents: 581 diff changeset	6722 else
626 732c7ae5743e updated for version 7.0180 vimboss parents: 625 diff changeset	6723 EMSG(_("E777: String or List expected"));
625 81fe2ccc1207 updated for version 7.0179 vimboss parents: 581 diff changeset	6724 free_tv(tv);
81fe2ccc1207 updated for version 7.0179 vimboss parents: 581 diff changeset	6725 }
446 7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	6726 }
532 7052f11a3dc9 updated for version 7.0150 vimboss parents: 531 diff changeset	6727 #endif
446 7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	6728
7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	6729 /*
13764 7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6730 * 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	6731 */
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6732 static qf_info_T *
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6733 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	6734 {
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6735 win_T *wp;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6736 qf_info_T *qi;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6737
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6738 /* 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	6739 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	6740 wp = curwin;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6741 else
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6742 /* 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	6743 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	6744
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6745 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	6746 qi = NULL;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6747 else
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6748 qi = wp->w_llist;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6749
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6750 if (qi == NULL)
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6751 {
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6752 /* 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	6753 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	6754 return NULL;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6755 *new_ll = TRUE;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6756 }
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6757
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6758 return qi;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6759 }
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6760
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6761 /*
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6762 * 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	6763 */
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6764 static void
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6765 hgr_search_file(
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6766 qf_info_T *qi,
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6767 char_u *fname,
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6768 #ifdef FEAT_MBYTE
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6769 vimconv_T *p_vc,
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6770 #endif
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6771 regmatch_T *p_regmatch)
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6772 {
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6773 FILE *fd;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6774 long lnum;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6775
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6776 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	6777 if (fd == NULL)
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6778 return;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6779
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6780 lnum = 1;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6781 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	6782 {
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6783 char_u *line = IObuff;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6784 #ifdef FEAT_MBYTE
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6785 /* 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	6786 * 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	6787 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	6788 && has_non_ascii(IObuff))
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6789 {
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6790 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	6791 if (line == NULL)
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6792 line = IObuff;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6793 }
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6794 #endif
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6795
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6796 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	6797 {
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6798 int l = (int)STRLEN(line);
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6799
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6800 /* 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	6801 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	6802 line[--l] = NUL;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6803
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6804 if (qf_add_entry(qi,
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6805 qi->qf_curlist,
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6806 NULL, /* dir */
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6807 fname,
13821 98274127d675 patch 8.0.1782: no simple way to label quickfix entries Christian Brabandt <cb@256bit.org> parents: 13819 diff changeset	6808 NULL,
13764 7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6809 0,
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6810 line,
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6811 lnum,
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6812 (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	6813 + 1, /* col */
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6814 FALSE, /* vis_col */
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6815 NULL, /* search pattern */
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6816 0, /* nr */
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6817 1, /* type */
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6818 TRUE /* valid */
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6819 ) == FAIL)
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6820 {
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6821 got_int = TRUE;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6822 #ifdef FEAT_MBYTE
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6823 if (line != IObuff)
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6824 vim_free(line);
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6825 #endif
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6826 break;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6827 }
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6828 }
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6829 #ifdef FEAT_MBYTE
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6830 if (line != IObuff)
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6831 vim_free(line);
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6832 #endif
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6833 ++lnum;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6834 line_breakcheck();
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6835 }
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6836 fclose(fd);
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6837 }
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6838
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6839 /*
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6840 * 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	6841 * the given directory.
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6842 */
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6843 static void
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6844 hgr_search_files_in_dir(
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6845 qf_info_T *qi,
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6846 char_u *dirname,
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6847 regmatch_T *p_regmatch
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6848 #ifdef FEAT_MBYTE
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6849 , vimconv_T *p_vc
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6850 #endif
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6851 #ifdef FEAT_MULTI_LANG
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6852 , char_u *lang
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6853 #endif
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6854 )
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6855 {
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6856 int fcount;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6857 char_u **fnames;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6858 int fi;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6859
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6860 /* 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	6861 add_pathsep(dirname);
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6862 STRCAT(dirname, "doc/*.\$txt\\\|??x\$");
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6863 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	6864 &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	6865 && fcount > 0)
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6866 {
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6867 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	6868 {
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6869 #ifdef FEAT_MULTI_LANG
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6870 /* 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	6871 if (lang != NULL
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6872 && 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	6873 + 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	6874 && !(STRNICMP(lang, "en", 2) == 0
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6875 && STRNICMP("txt", fnames[fi]
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6876 + 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	6877 continue;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6878 #endif
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6879
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6880 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	6881 #ifdef FEAT_MBYTE
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6882 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 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 FreeWild(fcount, fnames);
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6887 }
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
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6890 /*
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	6891 * 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	6892 * 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	6893 * '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	6894 * specified language are found.
13764 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 static void
14603 d1b69129db99 patch 8.1.0315: helpgrep with language doesn't work properly Christian Brabandt <cb@256bit.org> parents: 14560 diff changeset	6897 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	6898 {
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6899 char_u *p;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6900
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6901 #ifdef FEAT_MBYTE
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6902 vimconv_T vc;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6903
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6904 /* 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	6905 * differs. */
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6906 vc.vc_type = CONV_NONE;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6907 if (!enc_utf8)
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6908 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	6909 #endif
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
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	6912 /* 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	6913 p = p_rtp;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6914 while (*p != NUL && !got_int)
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6915 {
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6916 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	6917
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6918 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	6919 #ifdef FEAT_MBYTE
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6920 , &vc
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6921 #endif
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6922 #ifdef FEAT_MULTI_LANG
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6923 , lang
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6924 #endif
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6925 );
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6926 }
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6927
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6928 #ifdef FEAT_MBYTE
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6929 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	6930 convert_setup(&vc, NULL, NULL);
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6931 #endif
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6932 }
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 /*
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6935 * ":helpgrep {pattern}"
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6936 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6937 void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	6938 ex_helpgrep(exarg_T *eap)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6939 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6940 regmatch_T regmatch;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6941 char_u *save_cpo;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	6942 qf_info_T *qi = &ql_info;
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	6943 int new_qi = FALSE;
3269 5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	6944 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	6945 char_u *lang = NULL;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6946
3269 5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	6947 switch (eap->cmdidx)
5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	6948 {
5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	6949 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	6950 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	6951 default: break;
5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	6952 }
10346 d52d97bf675e commit https://github.com/vim/vim/commit/21662be2211675824df1771c7f169948ede40c41 Christian Brabandt <cb@256bit.org> parents: 10281 diff changeset	6953 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	6954 curbuf->b_fname, TRUE, curbuf))
3269 5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	6955 {
13380 69517d67421f patch 8.0.1564: too many #ifdefs Christian Brabandt <cb@256bit.org> parents: 13252 diff changeset	6956 #ifdef FEAT_EVAL
10346 d52d97bf675e commit https://github.com/vim/vim/commit/21662be2211675824df1771c7f169948ede40c41 Christian Brabandt <cb@256bit.org> parents: 10281 diff changeset	6957 if (aborting())
3269 5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	6958 return;
5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	6959 #endif
13380 69517d67421f patch 8.0.1564: too many #ifdefs Christian Brabandt <cb@256bit.org> parents: 13252 diff changeset	6960 }
3269 5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	6961
14603 d1b69129db99 patch 8.1.0315: helpgrep with language doesn't work properly Christian Brabandt <cb@256bit.org> parents: 14560 diff changeset	6962 // 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	6963 save_cpo = p_cpo;
5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	6964 p_cpo = empty_option;
5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	6965
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	6966 if (is_loclist_cmd(eap->cmdidx))
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	6967 {
13764 7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6968 qi = hgr_get_ll(&new_qi);
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	6969 if (qi == NULL)
13764 7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6970 return;
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	6971 }
d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	6972
14603 d1b69129db99 patch 8.1.0315: helpgrep with language doesn't work properly Christian Brabandt <cb@256bit.org> parents: 14560 diff changeset	6973 #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	6974 // 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	6975 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	6976 #endif
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6977 regmatch.regprog = vim_regcomp(eap->arg, RE_MAGIC + RE_STRING);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6978 regmatch.rm_ic = FALSE;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6979 if (regmatch.regprog != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6980 {
14603 d1b69129db99 patch 8.1.0315: helpgrep with language doesn't work properly Christian Brabandt <cb@256bit.org> parents: 14560 diff changeset	6981 // 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	6982 qf_new_list(qi, qf_cmdtitle(*eap->cmdlinep));
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6983
14603 d1b69129db99 patch 8.1.0315: helpgrep with language doesn't work properly Christian Brabandt <cb@256bit.org> parents: 14560 diff changeset	6984 hgr_search_in_rtp(qi, &regmatch, lang);
3257 75217982ea46 updated for version 7.3.397 Bram Moolenaar <bram@vim.org> parents: 3242 diff changeset	6985
4805 66803af09906 updated for version 7.3.1149 Bram Moolenaar <bram@vim.org> parents: 4371 diff changeset	6986 vim_regfree(regmatch.regprog);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6987
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	6988 qi->qf_lists[qi->qf_curlist].qf_nonevalid = FALSE;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	6989 qi->qf_lists[qi->qf_curlist].qf_ptr =
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	6990 qi->qf_lists[qi->qf_curlist].qf_start;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	6991 qi->qf_lists[qi->qf_curlist].qf_index = 1;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6992 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6993
1672 fddea6c03dee updated for version 7.2b-004 vimboss parents: 1668 diff changeset	6994 if (p_cpo == empty_option)
fddea6c03dee updated for version 7.2b-004 vimboss parents: 1668 diff changeset	6995 p_cpo = save_cpo;
fddea6c03dee updated for version 7.2b-004 vimboss parents: 1668 diff changeset	6996 else
14603 d1b69129db99 patch 8.1.0315: helpgrep with language doesn't work properly Christian Brabandt <cb@256bit.org> parents: 14560 diff changeset	6997 // Darn, some plugin changed the value.
1672 fddea6c03dee updated for version 7.2b-004 vimboss parents: 1668 diff changeset	6998 free_string_option(save_cpo);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6999
13062 6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	7000 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	7001 qf_update_buffer(qi, NULL);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	7002
3269 5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	7003 if (au_name != NULL)
5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	7004 {
5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	7005 apply_autocmds(EVENT_QUICKFIXCMDPOST, au_name,
5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	7006 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	7007 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	7008 /* autocommands made "qi" invalid */
5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	7009 return;
5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	7010 }
5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	7011
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	7012 /* Jump to first match. */
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	7013 if (!qf_list_empty(qi, qi->qf_curlist))
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	7014 qf_jump(qi, 0, 0, FALSE);
9 4102fb4ea781 updated for version 7.0002 vimboss parents: 7 diff changeset	7015 else
4102fb4ea781 updated for version 7.0002 vimboss parents: 7 diff changeset	7016 EMSG2(_(e_nomatch2), eap->arg);
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	7017
d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	7018 if (eap->cmdidx == CMD_lhelpgrep)
d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	7019 {
14603 d1b69129db99 patch 8.1.0315: helpgrep with language doesn't work properly Christian Brabandt <cb@256bit.org> parents: 14560 diff changeset	7020 // 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	7021 // 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	7022 if (!bt_help(curwin->w_buffer) \|\| curwin->w_llist == qi)
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	7023 {
d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	7024 if (new_qi)
d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	7025 ll_free_all(&qi);
d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	7026 }
d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	7027 else if (curwin->w_llist == NULL)
d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	7028 curwin->w_llist = qi;
d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	7029 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	7030 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	7031
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	7032 #endif /* FEAT_QUICKFIX */

Mercurial > vim

annotate src/quickfix.c @ 14667:289d3fac3399