vim: src/quickfix.c annotate

annotate src/quickfix.c @ 14796:74fd69162d50 v8.1.0410

patch 8.1.0410: the ex_copen() function is too long commit https://github.com/vim/vim/commit/476c0db00205590974395df717519407a7717270 Author: Bram Moolenaar <Bram@vim.org> Date: Wed Sep 19 21:56:02 2018 +0200 patch 8.1.0410: the ex_copen() function is too long Problem: The ex_copen() function is too long. Solution: Refactor to split off two functions. (Yegappan Lakshmanan)

author	Christian Brabandt <cb@256bit.org>
date	Wed, 19 Sep 2018 22:00:06 +0200
parents	3ca7aba1116e
children	6040d93396de

rev	line source
10042 4aead6a9b7a9 commit https://github.com/vim/vim/commit/edf3f97ae2af024708ebb4ac614227327033ca47 Christian Brabandt <cb@256bit.org> parents: 9982 diff changeset	1 /* vi:set ts=8 sts=4 sw=4 noet:
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2 *
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3 * VIM - Vi IMproved by Bram Moolenaar
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4 *
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5 * Do ":help uganda" in Vim to read copying and usage conditions.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6 * Do ":help credits" in Vim to see a list of people who contributed.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	7 * See README.txt for an overview of the Vim source code.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	8 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	9
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	10 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	11 * quickfix.c: functions for quickfix mode, using a file with error messages
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	12 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	13
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	14 #include "vim.h"
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	15
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	16 #if defined(FEAT_QUICKFIX) \|\| defined(PROTO)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	17
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	18 struct dir_stack_T
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	19 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	20 struct dir_stack_T *next;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	21 char_u *dirname;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	22 };
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	23
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	24 /*
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	25 * For each error the next struct is allocated and linked in a list.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	26 */
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	27 typedef struct qfline_S qfline_T;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	28 struct qfline_S
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	29 {
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	30 qfline_T qf_next; / pointer to next error in the list */
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	31 qfline_T qf_prev; / pointer to previous error in the list */
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	32 linenr_T qf_lnum; /* line number where the error occurred */
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	33 int qf_fnum; /* file number for the line */
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	34 int qf_col; /* column where the error occurred */
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	35 int qf_nr; /* error number */
13821 98274127d675 patch 8.0.1782: no simple way to label quickfix entries Christian Brabandt <cb@256bit.org> parents: 13819 diff changeset	36 char_u qf_module; / module name for this error */
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	37 char_u qf_pattern; / search pattern for the error */
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	38 char_u qf_text; / description of the error */
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	39 char_u qf_viscol; /* set to TRUE if qf_col is screen column */
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	40 char_u qf_cleared; /* set to TRUE if line has been deleted */
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	41 char_u qf_type; /* type of the error (mostly 'E'); 1 for
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	42 :helpgrep */
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	43 char_u qf_valid; /* valid error message detected */
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	44 };
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	45
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	46 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	47 * There is a stack of error lists.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	48 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	49 #define LISTCOUNT 10
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	50 #define INVALID_QFIDX (-1)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	51
11549 f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	52 /*
f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	53 * Quickfix/Location list definition
f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	54 * Contains a list of entries (qfline_T). qf_start points to the first entry
f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	55 * and qf_last points to the last entry. qf_count contains the list size.
f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	56 *
f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	57 * Usually the list contains one or more entries. But an empty list can be
f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	58 * created using setqflist()/setloclist() with a title and/or user context
f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	59 * information and entries can be added later using setqflist()/setloclist().
f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	60 */
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	61 typedef struct qf_list_S
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	62 {
12287 20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	63 int_u qf_id; /* Unique identifier for this list */
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	64 qfline_T qf_start; / pointer to the first error */
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	65 qfline_T qf_last; / pointer to the last error */
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	66 qfline_T qf_ptr; / pointer to the current error */
11549 f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	67 int qf_count; /* number of errors (0 means empty list) */
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	68 int qf_index; /* current index in the error list */
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	69 int qf_nonevalid; /* TRUE if not a single valid entry found */
2411 68e394361ca3 Add "q" item for 'statusline'. Add w:quickfix_title. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2296 diff changeset	70 char_u qf_title; / title derived from the command that created
11549 f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	71 * the error list or set by setqflist */
11412 84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	72 typval_T qf_ctx; / context set by setqflist/setloclist */
11700 dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	73
dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	74 struct dir_stack_T *qf_dir_stack;
dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	75 char_u *qf_directory;
dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	76 struct dir_stack_T *qf_file_stack;
dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	77 char_u *qf_currfile;
dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	78 int qf_multiline;
dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	79 int qf_multiignore;
dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	80 int qf_multiscan;
13062 6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	81 long qf_changedtick;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	82 } qf_list_T;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	83
11549 f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	84 /*
f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	85 * Quickfix/Location list stack definition
f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	86 * Contains a list of quickfix/location lists (qf_list_T)
f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	87 */
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	88 struct qf_info_S
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	89 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	90 /*
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	91 * Count of references to this list. Used only for location lists.
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	92 * When a location list window reference this list, qf_refcount
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	93 * will be 2. Otherwise, qf_refcount will be 1. When qf_refcount
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	94 * reaches 0, the list is freed.
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	95 */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	96 int qf_refcount;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	97 int qf_listcount; /* current number of lists */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	98 int qf_curlist; /* current error list */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	99 qf_list_T qf_lists[LISTCOUNT];
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	100 };
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	101
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	102 static qf_info_T ql_info; /* global quickfix list */
12287 20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	103 static int_u last_qf_id = 0; /* Last used quickfix list id */
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	104
13821 98274127d675 patch 8.0.1782: no simple way to label quickfix entries Christian Brabandt <cb@256bit.org> parents: 13819 diff changeset	105 #define FMT_PATTERNS 11 /* maximum number of % recognized */
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	106
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	107 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	108 * Structure used to hold the info of one part of 'errorformat'
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	109 */
789 b29b006d52d2 updated for version 7.0230 vimboss parents: 729 diff changeset	110 typedef struct efm_S efm_T;
b29b006d52d2 updated for version 7.0230 vimboss parents: 729 diff changeset	111 struct efm_S
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	112 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	113 regprog_T prog; / pre-formatted part of 'errorformat' */
789 b29b006d52d2 updated for version 7.0230 vimboss parents: 729 diff changeset	114 efm_T next; / pointer to next (NULL if last) */
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	115 char_u addr[FMT_PATTERNS]; /* indices of used % patterns */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	116 char_u prefix; /* prefix of this format line: */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	117 /* 'D' enter directory */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	118 /* 'X' leave directory */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	119 /* 'A' start of multi-line message */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	120 /* 'E' error message */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	121 /* 'W' warning message */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	122 /* 'I' informational message */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	123 /* 'C' continuation line */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	124 /* 'Z' end of multi-line message */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	125 /* 'G' general, unspecific message */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	126 /* 'P' push file (partial) message */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	127 /* 'Q' pop/quit file (partial) message */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	128 /* 'O' overread (partial) message */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	129 char_u flags; /* additional flags given in prefix */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	130 /* '-' do not include this line */
625 81fe2ccc1207 updated for version 7.0179 vimboss parents: 581 diff changeset	131 /* '+' include whole line in message */
789 b29b006d52d2 updated for version 7.0230 vimboss parents: 729 diff changeset	132 int conthere; /* %> used */
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	133 };
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	134
10367 4e4e116e3689 commit https://github.com/vim/vim/commit/63bed3d319b5d90765dbdae93a3579b6322d79fb Christian Brabandt <cb@256bit.org> parents: 10359 diff changeset	135 static efm_T fmt_start = NULL; / cached across qf_parse_line() calls */
4e4e116e3689 commit https://github.com/vim/vim/commit/63bed3d319b5d90765dbdae93a3579b6322d79fb Christian Brabandt <cb@256bit.org> parents: 10359 diff changeset	136
7805 0b6c37dd858d commit https://github.com/vim/vim/commit/baaa7e9ec7398a813e21285c272fa99792642077 Christian Brabandt <cb@256bit.org> parents: 7710 diff changeset	137 static void qf_new_list(qf_info_T qi, char_u qf_title);
13821 98274127d675 patch 8.0.1782: no simple way to label quickfix entries Christian Brabandt <cb@256bit.org> parents: 13819 diff changeset	138 static int qf_add_entry(qf_info_T qi, int qf_idx, char_u dir, char_u fname, char_u module, int bufnum, char_u mesg, long lnum, int col, int vis_col, char_u pattern, int nr, int type, int valid);
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	139 static void qf_free(qf_list_T *qfl);
7805 0b6c37dd858d commit https://github.com/vim/vim/commit/baaa7e9ec7398a813e21285c272fa99792642077 Christian Brabandt <cb@256bit.org> parents: 7710 diff changeset	140 static char_u *qf_types(int, int);
11700 dd821396754e patch 8.0.0733: can only add entries to one list in the quickfix stack Christian Brabandt <cb@256bit.org> parents: 11609 diff changeset	141 static int qf_get_fnum(qf_info_T qi, int qf_idx, char_u , char_u *);
9397 e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	142 static char_u qf_push_dir(char_u , struct dir_stack_T **, int is_file_stack);
7805 0b6c37dd858d commit https://github.com/vim/vim/commit/baaa7e9ec7398a813e21285c272fa99792642077 Christian Brabandt <cb@256bit.org> parents: 7710 diff changeset	143 static char_u qf_pop_dir(struct dir_stack_T *);
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	144 static char_u qf_guess_filepath(qf_list_T qfl, char_u *);
7805 0b6c37dd858d commit https://github.com/vim/vim/commit/baaa7e9ec7398a813e21285c272fa99792642077 Christian Brabandt <cb@256bit.org> parents: 7710 diff changeset	145 static void qf_fmt_text(char_u text, char_u buf, int bufsize);
0b6c37dd858d commit https://github.com/vim/vim/commit/baaa7e9ec7398a813e21285c272fa99792642077 Christian Brabandt <cb@256bit.org> parents: 7710 diff changeset	146 static int qf_win_pos_update(qf_info_T *qi, int old_qf_index);
0b6c37dd858d commit https://github.com/vim/vim/commit/baaa7e9ec7398a813e21285c272fa99792642077 Christian Brabandt <cb@256bit.org> parents: 7710 diff changeset	147 static win_T qf_find_win(qf_info_T qi);
0b6c37dd858d commit https://github.com/vim/vim/commit/baaa7e9ec7398a813e21285c272fa99792642077 Christian Brabandt <cb@256bit.org> parents: 7710 diff changeset	148 static buf_T qf_find_buf(qf_info_T qi);
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	149 static void qf_update_buffer(qf_info_T qi, qfline_T old_last);
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	150 static void qf_fill_buffer(qf_info_T qi, buf_T buf, qfline_T *old_last);
7805 0b6c37dd858d commit https://github.com/vim/vim/commit/baaa7e9ec7398a813e21285c272fa99792642077 Christian Brabandt <cb@256bit.org> parents: 7710 diff changeset	151 static char_u *get_mef_name(void);
0b6c37dd858d commit https://github.com/vim/vim/commit/baaa7e9ec7398a813e21285c272fa99792642077 Christian Brabandt <cb@256bit.org> parents: 7710 diff changeset	152 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	153 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	154 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	155 static qf_info_T ll_get_or_alloc_list(win_T );
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	156
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	157 /* Quickfix window check helper macro */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	158 #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	159 /* Location list window check helper macro */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	160 #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	161
8413e66d00a1 patch 8.1.0293: checks for type of stack is cryptic Christian Brabandt <cb@256bit.org> parents: 14552 diff changeset	162 // 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	163 #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	164 #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	165
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	166 /*
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	167 * Return location list for window 'wp'
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	168 * For location list window, return the referenced location list
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	169 */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	170 #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	171
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	172 /*
11443 30b3775addb2 patch 8.0.0605: the quickfix cached buffer may become invalid Christian Brabandt <cb@256bit.org> parents: 11426 diff changeset	173 * 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	174 * 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	175 */
11447 698ee9d4fe9f patch 8.0.0607: after :bwipe + :new bufref might still be valid Christian Brabandt <cb@256bit.org> parents: 11445 diff changeset	176 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	177 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	178
13090 a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	179 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	180 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	181
11443 30b3775addb2 patch 8.0.0605: the quickfix cached buffer may become invalid Christian Brabandt <cb@256bit.org> parents: 11426 diff changeset	182 /*
9033 0536d1469b67 commit https://github.com/vim/vim/commit/6be8c8e165204b8aa4eeb8a52be87a58d8b41b9e Christian Brabandt <cb@256bit.org> parents: 8932 diff changeset	183 * 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	184 */
0536d1469b67 commit https://github.com/vim/vim/commit/6be8c8e165204b8aa4eeb8a52be87a58d8b41b9e Christian Brabandt <cb@256bit.org> parents: 8932 diff changeset	185 #define LINE_MAXLEN 4096
0536d1469b67 commit https://github.com/vim/vim/commit/6be8c8e165204b8aa4eeb8a52be87a58d8b41b9e Christian Brabandt <cb@256bit.org> parents: 8932 diff changeset	186
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	187 static struct fmtpattern
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	188 {
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	189 char_u convchar;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	190 char *pattern;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	191 } 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	192 {
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	193 {'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	194 {'n', "\\d\\+"},
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	195 {'l', "\\d\\+"},
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	196 {'c', "\\d\\+"},
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	197 {'t', "."},
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	198 {'m', ".\\+"},
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	199 {'r', ".*"},
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	200 {'p', "[- .]*"},
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	201 {'v', "\\d\\+"},
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	202 {'s', ".\\+"},
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	203 {'o', ".\\+"}
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	204 };
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	205
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	206 /*
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	207 * 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	208 * 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	209 * 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	210 * 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	211 */
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	212 static char_u *
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	213 efmpat_to_regpat(
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	214 char_u *efmpat,
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	215 char_u *regpat,
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	216 efm_T *efminfo,
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	217 int idx,
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	218 int round,
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	219 char_u *errmsg)
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	220 {
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	221 char_u *srcptr;
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	222
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	223 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	224 {
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	225 /* 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	226 sprintf((char *)errmsg,
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	227 _("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	228 EMSG(errmsg);
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	229 return NULL;
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	230 }
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	231 if ((idx && idx < 6
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	232 && 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	233 \|\| (idx == 6
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	234 && 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	235 {
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	236 sprintf((char *)errmsg,
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	237 _("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	238 EMSG(errmsg);
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	239 return NULL;
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	240 }
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	241 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	242 *regpat++ = '\\';
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	243 *regpat++ = '(';
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	244 #ifdef BACKSLASH_IN_FILENAME
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	245 if (*efmpat == 'f')
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	246 {
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	247 /* 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	248 * 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	249 * "\%(\a:\)\=" */
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	250 STRCPY(regpat, "\\%(\\a:\\)\\=");
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	251 regpat += 10;
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	252 }
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	253 #endif
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	254 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	255 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	256 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	257 {
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	258 /* 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	259 * 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	260 * 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	261 * 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	262 * follows should work. */
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	263 STRCPY(regpat, ".\\{-1,}");
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	264 regpat += 7;
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	265 }
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	266 else
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	267 {
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	268 /* 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	269 * 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	270 STRCPY(regpat, "\\f\\+");
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	271 regpat += 4;
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	272 }
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	273 }
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	274 else
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	275 {
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	276 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	277 while ((regpat = srcptr++) != NUL)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	278 ++regpat;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	279 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	280 *regpat++ = '\\';
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	281 *regpat++ = ')';
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	282
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	283 return regpat;
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	284 }
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	285
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	286 /*
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	287 * 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	288 * 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	289 */
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	290 static char_u *
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	291 scanf_fmt_to_regpat(
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	292 char_u **pefmp,
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	293 char_u *efm,
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	294 int len,
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	295 char_u *regpat,
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	296 char_u *errmsg)
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	297 {
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	298 char_u efmp = pefmp;
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	299
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	300 if (efmp == '[' \|\| efmp == '\\')
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	301 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	302 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	303 {
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	304 if (efmp[1] == '^')
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	305 regpat++ = ++efmp;
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	306 if (efmp < efm + len)
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	307 {
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	308 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	309 while (efmp < efm + len
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	310 && (regpat++ = ++efmp) != ']')
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	311 /* skip */;
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	312 if (efmp == efm + len)
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	313 {
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	314 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	315 return NULL;
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	316 }
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	317 }
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	318 }
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	319 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	320 regpat++ = ++efmp;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	321 *regpat++ = '\\';
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	322 *regpat++ = '+';
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	323 }
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	324 else
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	325 {
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	326 /* 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	327 sprintf((char *)errmsg,
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	328 _("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	329 EMSG(errmsg);
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	330 return NULL;
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	331 }
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	332
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	333 *pefmp = efmp;
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	334
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	335 return regpat;
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	336 }
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	337
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	338 /*
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	339 * 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	340 */
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	341 static char_u *
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	342 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	343 {
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	344 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	345 efminfo->flags = *efmp++;
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	346 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	347 efminfo->prefix = *efmp;
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	348 else
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	349 {
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	350 sprintf((char *)errmsg,
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	351 _("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	352 EMSG(errmsg);
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	353 return NULL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	354 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	355
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	356 return efmp;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	357 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	358
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	359 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	360 * 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	361 * 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	362 * 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	363 * Returns OK or FAIL.
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	364 */
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	365 static int
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	366 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	367 char_u *efm,
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	368 int len,
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	369 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	370 char_u *regpat,
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	371 char_u *errmsg)
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	372 {
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	373 char_u *ptr;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	374 char_u *efmp;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	375 int round;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	376 int idx = 0;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	377
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	378 /*
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	379 * 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	380 */
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	381 ptr = regpat;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	382 *ptr++ = '^';
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	383 round = 0;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	384 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	385 {
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	386 if (*efmp == '%')
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	387 {
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	388 ++efmp;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	389 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	390 if (fmt_pat[idx].convchar == *efmp)
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	391 break;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	392 if (idx < FMT_PATTERNS)
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	393 {
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	394 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	395 errmsg);
9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	396 if (ptr == NULL)
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	397 return FAIL;
13984 9b1dc5c2f460 patch 8.1.0010: efm_to_regpat() is too long Christian Brabandt <cb@256bit.org> parents: 13948 diff changeset	398 round++;
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	399 }
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	400 else if (efmp == '')
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	401 {
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	402 ++efmp;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	403 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	404 if (ptr == NULL)
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	405 return FAIL;
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	406 }
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	407 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	408 ptr++ = efmp; /* regexp magic characters */
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	409 else if (*efmp == '#')
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	410 ptr++ = '';
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	411 else if (*efmp == '>')
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	412 fmt_ptr->conthere = TRUE;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	413 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	414 {
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	415 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	416 * 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	417 * option part
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	418 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	419 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	420 if (efmp == NULL)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	421 return FAIL;
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	422 }
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	423 else
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	424 {
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	425 sprintf((char *)errmsg,
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	426 _("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	427 EMSG(errmsg);
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	428 return FAIL;
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	429 }
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	430 }
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	431 else /* copy normal character */
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	432 {
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	433 if (*efmp == '\\' && efmp + 1 < efm + len)
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	434 ++efmp;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	435 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	436 ptr++ = '\\'; / escape regexp atoms */
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	437 if (*efmp)
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	438 ptr++ = efmp;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	439 }
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	440 }
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	441 *ptr++ = '$';
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	442 *ptr = NUL;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	443
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	444 return OK;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	445 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	446
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	447 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	448 * Free the 'errorformat' information list
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	449 */
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	450 static void
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	451 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	452 {
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	453 efm_T *efm_ptr;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	454
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	455 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	456 {
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	457 *efm_first = efm_ptr->next;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	458 vim_regfree(efm_ptr->prog);
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	459 vim_free(efm_ptr);
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	460 }
10367 4e4e116e3689 commit https://github.com/vim/vim/commit/63bed3d319b5d90765dbdae93a3579b6322d79fb Christian Brabandt <cb@256bit.org> parents: 10359 diff changeset	461 fmt_start = NULL;
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	462 }
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	463
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	464 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	465 * 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	466 * a regular expression pattern.
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	467 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	468 static int
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	469 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	470 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	471 int sz;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	472 int i;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	473
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	474 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	475 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	476 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	477 #ifdef BACKSLASH_IN_FILENAME
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	478 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	479 #else
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	480 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	481 #endif
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	482
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	483 return sz;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	484 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	485
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	486 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	487 * 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	488 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	489 static int
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	490 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	491 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	492 int len;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	493
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	494 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	495 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	496 ++len;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	497
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	498 return len;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	499 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	500
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	501 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	502 * 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	503 * 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	504 * the parsed 'errorformat' option.
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	505 */
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	506 static efm_T *
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	507 parse_efm_option(char_u *efm)
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	508 {
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	509 char_u *errmsg = NULL;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	510 int errmsglen;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	511 efm_T *fmt_ptr = NULL;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	512 efm_T *fmt_first = NULL;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	513 efm_T *fmt_last = NULL;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	514 char_u *fmtstr = NULL;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	515 int len;
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	516 int sz;
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	517
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	518 errmsglen = CMDBUFFSIZE + 1;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	519 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	520 if (errmsg == NULL)
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	521 goto parse_efm_end;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	522
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	523 /*
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	524 * 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	525 * 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	526 */
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 /*
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	529 * 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	530 */
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	531 sz = efm_regpat_bufsz(efm);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	532 if ((fmtstr = alloc(sz)) == NULL)
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	533 goto parse_efm_error;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	534
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	535 while (efm[0] != NUL)
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	536 {
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	537 /*
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	538 * 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	539 */
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	540 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	541 if (fmt_ptr == NULL)
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	542 goto parse_efm_error;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	543 if (fmt_first == NULL) /* first one */
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	544 fmt_first = fmt_ptr;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	545 else
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	546 fmt_last->next = fmt_ptr;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	547 fmt_last = fmt_ptr;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	548
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	549 /*
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	550 * 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	551 */
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	552 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	553
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	554 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	555 goto parse_efm_error;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	556 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	557 goto parse_efm_error;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	558 /*
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	559 * Advance to next part
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	560 */
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	561 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	562 }
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 if (fmt_first == NULL) /* nothing found */
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	565 EMSG(_("E378: 'errorformat' contains no pattern"));
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	566
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	567 goto parse_efm_end;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	568
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	569 parse_efm_error:
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	570 free_efm_list(&fmt_first);
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	571
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	572 parse_efm_end:
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	573 vim_free(fmtstr);
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	574 vim_free(errmsg);
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	575
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	576 return fmt_first;
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	577 }
3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	578
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	579 enum {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	580 QF_FAIL = 0,
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	581 QF_OK = 1,
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	582 QF_END_OF_INPUT = 2,
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	583 QF_NOMEM = 3,
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	584 QF_IGNORE_LINE = 4,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	585 QF_MULTISCAN = 5,
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	586 };
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	587
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	588 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	589 * 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	590 * list.
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	591 */
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	592 typedef struct {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	593 char_u *linebuf;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	594 int linelen;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	595 char_u *growbuf;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	596 int growbufsiz;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	597 FILE *fd;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	598 typval_T *tv;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	599 char_u *p_str;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	600 listitem_T *p_li;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	601 buf_T *buf;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	602 linenr_T buflnum;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	603 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	604 vimconv_T vc;
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	605 } qfstate_T;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	606
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	607 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	608 * 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	609 */
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	610 static char_u *
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	611 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	612 {
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	613 char_u *p;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	614
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	615 /*
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	616 * 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	617 * 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	618 */
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	619 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	620 if (state->growbuf == NULL)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	621 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	622 state->growbuf = alloc(state->linelen + 1);
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	623 if (state->growbuf == NULL)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	624 return NULL;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	625 state->growbufsiz = state->linelen;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	626 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	627 else if (state->linelen > state->growbufsiz)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	628 {
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	629 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	630 return NULL;
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	631 state->growbuf = p;
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	632 state->growbufsiz = state->linelen;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	633 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	634 return state->growbuf;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	635 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	636
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	637 /*
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	638 * 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	639 */
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	640 static int
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	641 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	642 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	643 /* 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	644 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	645 char_u *p;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	646 int len;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	647
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	648 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	649 return QF_END_OF_INPUT;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	650
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	651 p = vim_strchr(p_str, '\n');
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	652 if (p != NULL)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	653 len = (int)(p - p_str) + 1;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	654 else
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	655 len = (int)STRLEN(p_str);
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	656
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	657 if (len > IOSIZE - 2)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	658 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	659 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	660 if (state->linebuf == NULL)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	661 return QF_NOMEM;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	662 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	663 else
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	664 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	665 state->linebuf = IObuff;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	666 state->linelen = len;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	667 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	668 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	669
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 * 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	672 * line if it exceeds LINE_MAXLEN.
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	673 */
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	674 p_str += len;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	675 state->p_str = p_str;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	676
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	677 return QF_OK;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	678 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	679
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	680 /*
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	681 * 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	682 */
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	683 static int
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	684 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	685 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	686 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	687 int len;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	688
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	689 while (p_li != NULL
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	690 && (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	691 \|\| 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	692 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	693
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	694 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	695 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	696 state->p_li = NULL;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	697 return QF_END_OF_INPUT;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	698 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	699
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	700 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	701 if (len > IOSIZE - 2)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	702 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	703 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	704 if (state->linebuf == NULL)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	705 return QF_NOMEM;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	706 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	707 else
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	708 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	709 state->linebuf = IObuff;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	710 state->linelen = len;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	711 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	712
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	713 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	714
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	715 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	716 return QF_OK;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	717 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	718
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	719 /*
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	720 * 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	721 */
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	722 static int
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	723 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	724 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	725 char_u *p_buf = NULL;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	726 int len;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	727
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	728 /* 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	729 if (state->buflnum > state->lnumlast)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	730 return QF_END_OF_INPUT;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	731
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	732 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	733 state->buflnum += 1;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	734
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	735 len = (int)STRLEN(p_buf);
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	736 if (len > IOSIZE - 2)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	737 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	738 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	739 if (state->linebuf == NULL)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	740 return QF_NOMEM;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	741 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	742 else
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	743 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	744 state->linebuf = IObuff;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	745 state->linelen = len;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	746 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	747 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	748
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	749 return QF_OK;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	750 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	751
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	752 /*
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	753 * 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	754 */
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	755 static int
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	756 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	757 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	758 int discard;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	759 int growbuflen;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	760
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	761 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	762 return QF_END_OF_INPUT;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	763
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	764 discard = FALSE;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	765 state->linelen = (int)STRLEN(IObuff);
9738 6818e3c96473 commit https://github.com/vim/vim/commit/796aa9c804f09276bd3cc45123f4a191a001dec2 Christian Brabandt <cb@256bit.org> parents: 9649 diff changeset	766 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	767 {
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 * 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	770 * 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	771 */
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	772 if (state->growbuf == NULL)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	773 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	774 state->growbufsiz = 2 * (IOSIZE - 1);
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	775 state->growbuf = alloc(state->growbufsiz);
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	776 if (state->growbuf == NULL)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	777 return QF_NOMEM;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	778 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	779
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	780 /* 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	781 memcpy(state->growbuf, IObuff, IOSIZE - 1);
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	782 growbuflen = state->linelen;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	783
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	784 for (;;)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	785 {
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	786 char_u *p;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	787
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	788 if (fgets((char *)state->growbuf + growbuflen,
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	789 state->growbufsiz - growbuflen, state->fd) == NULL)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	790 break;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	791 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	792 growbuflen += state->linelen;
9738 6818e3c96473 commit https://github.com/vim/vim/commit/796aa9c804f09276bd3cc45123f4a191a001dec2 Christian Brabandt <cb@256bit.org> parents: 9649 diff changeset	793 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	794 break;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	795 if (state->growbufsiz == LINE_MAXLEN)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	796 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	797 discard = TRUE;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	798 break;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	799 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	800
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	801 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	802 ? 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	803 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	804 return QF_NOMEM;
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	805 state->growbuf = p;
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	806 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	807
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	808 while (discard)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	809 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	810 /*
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	811 * 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	812 * 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	813 * reached.
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	814 */
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	815 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	816 \|\| (int)STRLEN(IObuff) < IOSIZE - 1
9738 6818e3c96473 commit https://github.com/vim/vim/commit/796aa9c804f09276bd3cc45123f4a191a001dec2 Christian Brabandt <cb@256bit.org> parents: 9649 diff changeset	817 \|\| IObuff[IOSIZE - 1] == '\n')
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	818 break;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	819 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	820
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	821 state->linebuf = state->growbuf;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	822 state->linelen = growbuflen;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	823 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	824 else
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	825 state->linebuf = IObuff;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	826
11063 e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	827 #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	828 /* 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	829 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	830 {
11063 e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	831 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	832
e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	833 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	834 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	835 {
e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	836 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	837 {
e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	838 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	839 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	840 }
e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	841 else
e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	842 {
e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	843 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	844 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	845 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	846 ? 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 }
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 #endif
e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	851
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	852 return QF_OK;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	853 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	854
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	855 /*
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	856 * 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	857 */
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	858 static int
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	859 qf_get_nextline(qfstate_T *state)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	860 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	861 int status = QF_FAIL;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	862
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	863 if (state->fd == NULL)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	864 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	865 if (state->tv != NULL)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	866 {
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	867 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	868 /* 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	869 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	870 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	871 /* 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	872 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	873 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	874 else
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	875 /* 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	876 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	877 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	878 else
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	879 /* 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	880 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	881
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	882 if (status != QF_OK)
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	883 return status;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	884
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	885 /* remove newline/CR from the line */
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	886 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	887 {
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	888 state->linebuf[state->linelen - 1] = NUL;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	889 #ifdef USE_CRNL
9738 6818e3c96473 commit https://github.com/vim/vim/commit/796aa9c804f09276bd3cc45123f4a191a001dec2 Christian Brabandt <cb@256bit.org> parents: 9649 diff changeset	890 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	891 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	892 #endif
9738 6818e3c96473 commit https://github.com/vim/vim/commit/796aa9c804f09276bd3cc45123f4a191a001dec2 Christian Brabandt <cb@256bit.org> parents: 9649 diff changeset	893 }
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	894
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	895 #ifdef FEAT_MBYTE
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	896 remove_bom(state->linebuf);
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	897 #endif
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	898
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	899 return QF_OK;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	900 }
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	901
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	902 typedef struct {
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	903 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	904 char_u *module;
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	905 char_u *errmsg;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	906 int errmsglen;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	907 long lnum;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	908 int col;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	909 char_u use_viscol;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	910 char_u *pattern;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	911 int enr;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	912 int type;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	913 int valid;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	914 } qffields_T;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	915
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	916 /*
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	917 * 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	918 * 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	919 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	920 static int
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	921 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	922 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	923 int c;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	924
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	925 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	926 return QF_FAIL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	927
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	928 /* 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	929 c = *rmp->endp[midx];
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	930 *rmp->endp[midx] = NUL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	931 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	932 *rmp->endp[midx] = c;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	933
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	934 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	935 * 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	936 * should exist.
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	937 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	938 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	939 && mch_getperm(fields->namebuf) == -1)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	940 return QF_FAIL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	941
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	942 return QF_OK;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	943 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	944
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	945 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	946 * 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	947 * 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	948 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	949 static int
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	950 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	951 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	952 if (rmp->startp[midx] == NULL)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	953 return QF_FAIL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	954 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	955 return QF_OK;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	956 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	957
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	958 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	959 * 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	960 * 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	961 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	962 static int
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	963 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	964 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	965 if (rmp->startp[midx] == NULL)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	966 return QF_FAIL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	967 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	968 return QF_OK;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	969 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	970
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	971 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	972 * 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	973 * 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	974 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	975 static int
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	976 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	977 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	978 if (rmp->startp[midx] == NULL)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	979 return QF_FAIL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	980 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	981 return QF_OK;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	982 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	983
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	984 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	985 * 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	986 * 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	987 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	988 static int
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	989 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	990 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	991 if (rmp->startp[midx] == NULL)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	992 return QF_FAIL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	993 fields->type = *rmp->startp[midx];
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	994 return QF_OK;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	995 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	996
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	997 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	998 * 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	999 * 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	1000 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1001 static int
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1002 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	1003 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1004 char_u *p;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1005
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1006 if (linelen >= fields->errmsglen)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1007 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1008 /* linelen + null terminator */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1009 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	1010 return QF_NOMEM;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1011 fields->errmsg = p;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1012 fields->errmsglen = linelen + 1;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1013 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1014 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	1015 return QF_OK;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1016 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1017
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1018 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1019 * 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	1020 * 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	1021 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1022 static int
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1023 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	1024 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1025 char_u *p;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1026 int len;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1027
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1028 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	1029 return QF_FAIL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1030 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	1031 if (len >= fields->errmsglen)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1032 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1033 /* len + null terminator */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1034 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	1035 return QF_NOMEM;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1036 fields->errmsg = p;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1037 fields->errmsglen = len + 1;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1038 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1039 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	1040 return QF_OK;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1041 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1042
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1043 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1044 * 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	1045 * 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	1046 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1047 static int
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1048 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	1049 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1050 if (rmp->startp[midx] == NULL)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1051 return QF_FAIL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1052 *tail = rmp->startp[midx];
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1053 return QF_OK;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1054 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1055
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1056 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1057 * 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	1058 * 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	1059 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1060 static int
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1061 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	1062 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1063 char_u *match_ptr;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1064
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1065 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	1066 return QF_FAIL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1067 fields->col = 0;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1068 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	1069 ++match_ptr)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1070 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1071 ++fields->col;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1072 if (*match_ptr == TAB)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1073 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1074 fields->col += 7;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1075 fields->col -= fields->col % 8;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1076 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1077 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1078 ++fields->col;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1079 fields->use_viscol = TRUE;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1080 return QF_OK;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1081 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1082
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1083 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1084 * 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	1085 * 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	1086 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1087 static int
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1088 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	1089 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1090 if (rmp->startp[midx] == NULL)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1091 return QF_FAIL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1092 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	1093 fields->use_viscol = TRUE;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1094 return QF_OK;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1095 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1096
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1097 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1098 * 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	1099 * 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	1100 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1101 static int
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1102 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	1103 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1104 int len;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1105
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1106 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	1107 return QF_FAIL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1108 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	1109 if (len > CMDBUFFSIZE - 5)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1110 len = CMDBUFFSIZE - 5;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1111 STRCPY(fields->pattern, "^\\V");
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1112 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	1113 fields->pattern[len + 3] = '\\';
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1114 fields->pattern[len + 4] = '$';
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1115 fields->pattern[len + 5] = NUL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1116 return QF_OK;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1117 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1118
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1119 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1120 * 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	1121 * 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	1122 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1123 static int
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1124 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	1125 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1126 int len;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1127
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1128 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	1129 return QF_FAIL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1130 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	1131 if (len > CMDBUFFSIZE)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1132 len = CMDBUFFSIZE;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1133 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	1134 return QF_OK;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1135 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1136
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1137 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1138 * 'errorformat' format pattern parser functions.
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1139 * 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	1140 * 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	1141 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1142 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	1143 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1144 NULL,
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1145 qf_parse_fmt_n,
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1146 qf_parse_fmt_l,
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1147 qf_parse_fmt_c,
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1148 qf_parse_fmt_t,
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1149 qf_parse_fmt_m,
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1150 NULL,
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1151 qf_parse_fmt_p,
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1152 qf_parse_fmt_v,
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1153 qf_parse_fmt_s,
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1154 qf_parse_fmt_o
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1155 };
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1156
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1157 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1158 * 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	1159 * "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	1160 * 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	1161 * 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	1162 */
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1163 static int
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1164 qf_parse_match(
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1165 char_u *linebuf,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1166 int linelen,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1167 efm_T *fmt_ptr,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1168 regmatch_T *regmatch,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1169 qffields_T *fields,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1170 int qf_multiline,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1171 int qf_multiscan,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1172 char_u **tail)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1173 {
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1174 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	1175 int i;
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1176 int midx;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1177 int status;
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1178
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1179 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	1180 return QF_FAIL;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1181 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	1182 fields->type = idx;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1183 else
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1184 fields->type = 0;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1185 /*
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1186 * 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	1187 * 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	1188 * 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	1189 */
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1190 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	1191 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1192 status = QF_OK;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1193 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	1194 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	1195 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	1196 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	1197 {
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1198 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	1199 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	1200 else if (midx > 0) /* %m */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1201 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	1202 }
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1203 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	1204 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	1205 else if (midx > 0) /* others */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1206 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	1207
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1208 if (status != QF_OK)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1209 return status;
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1210 }
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1211
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1212 return QF_OK;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1213 }
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1214
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1215 /*
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1216 * 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	1217 * '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	1218 * 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	1219 * 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	1220 */
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1221 static int
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1222 qf_parse_get_fields(
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1223 char_u *linebuf,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1224 int linelen,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1225 efm_T *fmt_ptr,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1226 qffields_T *fields,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1227 int qf_multiline,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1228 int qf_multiscan,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1229 char_u **tail)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1230 {
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1231 regmatch_T regmatch;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1232 int status = QF_FAIL;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1233 int r;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1234
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1235 if (qf_multiscan &&
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1236 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	1237 return QF_FAIL;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1238
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1239 fields->namebuf[0] = NUL;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1240 fields->module[0] = NUL;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1241 fields->pattern[0] = NUL;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1242 if (!qf_multiscan)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1243 fields->errmsg[0] = NUL;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1244 fields->lnum = 0;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1245 fields->col = 0;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1246 fields->use_viscol = FALSE;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1247 fields->enr = -1;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1248 fields->type = 0;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1249 *tail = NULL;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1250
13921 3b6c29f8c1a2 patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':' Christian Brabandt <cb@256bit.org> parents: 13882 diff changeset	1251 /* 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	1252 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	1253 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	1254 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	1255 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	1256 if (r)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1257 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	1258 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	1259
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1260 return status;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1261 }
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1262
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1263 /*
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1264 * 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	1265 * 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	1266 * names.
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1267 */
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1268 static int
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1269 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	1270 {
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1271 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	1272 {
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1273 if (*fields->namebuf == NUL)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1274 {
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1275 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	1276 return QF_FAIL;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1277 }
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1278 qfl->qf_directory =
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1279 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	1280 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	1281 return QF_FAIL;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1282 }
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1283 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	1284 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	1285
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1286 return QF_OK;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1287 }
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1288
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1289 /*
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1290 * 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	1291 */
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1292 static int
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1293 qf_parse_file_pfx(
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1294 int idx,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1295 qffields_T *fields,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1296 qf_list_T *qfl,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1297 char_u *tail)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1298 {
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1299 fields->valid = FALSE;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1300 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	1301 {
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1302 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	1303 qfl->qf_currfile =
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1304 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	1305 else if (idx == 'Q')
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1306 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	1307 *fields->namebuf = NUL;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1308 if (tail && *tail)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1309 {
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1310 STRMOVE(IObuff, skipwhite(tail));
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1311 qfl->qf_multiscan = TRUE;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1312 return QF_MULTISCAN;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1313 }
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1314 }
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1315
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1316 return QF_OK;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1317 }
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1318
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1319 /*
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1320 * 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	1321 * format in 'efm').
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1322 */
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1323 static int
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1324 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	1325 {
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1326 char_u *p;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1327
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1328 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	1329 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	1330 fields->valid = FALSE;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1331 if (linelen >= fields->errmsglen)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1332 {
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1333 /* linelen + null terminator */
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1334 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	1335 return QF_NOMEM;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1336 fields->errmsg = p;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1337 fields->errmsglen = linelen + 1;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1338 }
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1339 /* 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	1340 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	1341
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1342 return QF_OK;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1343 }
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1344
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1345 /*
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1346 * 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	1347 */
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1348 static int
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1349 qf_parse_multiline_pfx(
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1350 qf_info_T *qi,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1351 int qf_idx,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1352 int idx,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1353 qf_list_T *qfl,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1354 qffields_T *fields)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1355 {
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1356 char_u *ptr;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1357 int len;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1358
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1359 if (!qfl->qf_multiignore)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1360 {
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1361 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	1362
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1363 if (qfprev == NULL)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1364 return QF_FAIL;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1365 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	1366 {
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1367 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	1368 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	1369 == NULL)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1370 return QF_FAIL;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1371 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	1372 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	1373 qfprev->qf_text = ptr;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1374 *(ptr += len) = '\n';
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1375 STRCPY(++ptr, fields->errmsg);
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1376 }
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1377 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	1378 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	1379 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	1380 /* only printable chars allowed */
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1381 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	1382
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1383 if (!qfprev->qf_lnum)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1384 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	1385 if (!qfprev->qf_col)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1386 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	1387 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	1388 if (!qfprev->qf_fnum)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1389 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	1390 qfl->qf_directory,
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1391 *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	1392 ? fields->namebuf
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1393 : 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	1394 ? qfl->qf_currfile : 0);
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1395 }
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1396 if (idx == 'Z')
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1397 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	1398 line_breakcheck();
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1399
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1400 return QF_IGNORE_LINE;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1401 }
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1402
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1403 /*
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1404 * 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	1405 * Return the QF_ status.
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1406 */
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1407 static int
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1408 qf_parse_line(
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1409 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	1410 int qf_idx,
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1411 char_u *linebuf,
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1412 int linelen,
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1413 efm_T *fmt_first,
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1414 qffields_T *fields)
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1415 {
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1416 efm_T *fmt_ptr;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1417 int idx = 0;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1418 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	1419 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	1420 int status;
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1421
13612 89223f5d5d12 patch 8.0.1678: errorformat "%r" implies "%>" Christian Brabandt <cb@256bit.org> parents: 13594 diff changeset	1422 restofline:
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1423 /* 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	1424 if (fmt_start == NULL)
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1425 fmt_ptr = fmt_first;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1426 else
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1427 {
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1428 /* 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	1429 fmt_ptr = fmt_start;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1430 fmt_start = NULL;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1431 }
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1432
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1433 /*
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1434 * 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	1435 * match or no match.
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1436 */
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1437 fields->valid = TRUE;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1438 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	1439 {
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1440 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	1441 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	1442 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	1443 if (status == QF_NOMEM)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1444 return status;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1445 if (status == QF_OK)
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1446 break;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1447 }
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	1448 qfl->qf_multiscan = FALSE;
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1449
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1450 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	1451 {
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1452 if (fmt_ptr != NULL)
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1453 {
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1454 /* '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	1455 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	1456 if (status != QF_OK)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1457 return status;
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1458 }
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1459
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1460 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	1461 if (status != QF_OK)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1462 return status;
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1463
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1464 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	1465 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	1466 }
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1467 else if (fmt_ptr != NULL)
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1468 {
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1469 /* honor %> item */
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1470 if (fmt_ptr->conthere)
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1471 fmt_start = fmt_ptr;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1472
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1473 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	1474 {
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	1475 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	1476 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	1477 }
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1478 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	1479 { /* 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	1480 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	1481 if (status != QF_OK)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1482 return status;
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1483 }
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1484 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	1485 { /* global file names */
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1486 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	1487 if (status == QF_MULTISCAN)
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1488 goto restofline;
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1489 }
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1490 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	1491 {
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	1492 if (qfl->qf_multiline)
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1493 /* 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	1494 qfl->qf_multiignore = TRUE;
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1495 return QF_IGNORE_LINE;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1496 }
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1497 }
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1498
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1499 return QF_OK;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1500 }
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1501
9033 0536d1469b67 commit https://github.com/vim/vim/commit/6be8c8e165204b8aa4eeb8a52be87a58d8b41b9e Christian Brabandt <cb@256bit.org> parents: 8932 diff changeset	1502 /*
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1503 * 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	1504 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1505 static int
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1506 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	1507 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1508 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	1509 return TRUE;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1510 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	1511 }
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 /*
13992 710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1514 * 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	1515 */
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1516 static int
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1517 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	1518 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1519 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	1520 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	1521 pfields->errmsglen = CMDBUFFSIZE + 1;
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1522 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	1523 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	1524 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	1525 \|\| 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	1526 return FAIL;
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1527
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1528 return OK;
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1529 }
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1530
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1531 /*
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1532 * 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	1533 */
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1534 static void
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1535 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	1536 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1537 vim_free(pfields->namebuf);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1538 vim_free(pfields->module);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1539 vim_free(pfields->errmsg);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1540 vim_free(pfields->pattern);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1541 }
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1542
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1543 /*
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1544 * 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	1545 * quickfix list.
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1546 */
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1547 static int
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1548 qf_setup_state(
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1549 qfstate_T *pstate,
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1550 char_u *enc,
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1551 char_u *efile,
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1552 typval_T *tv,
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1553 buf_T *buf,
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1554 linenr_T lnumfirst,
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1555 linenr_T lnumlast)
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1556 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1557 #ifdef FEAT_MBYTE
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1558 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	1559 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	1560 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	1561 #endif
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1562
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1563 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	1564 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1565 EMSG2(_(e_openerrf), efile);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1566 return FAIL;
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1567 }
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1568
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1569 if (tv != NULL)
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1570 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1571 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	1572 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	1573 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	1574 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	1575 pstate->tv = tv;
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1576 }
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1577 pstate->buf = buf;
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1578 pstate->buflnum = lnumfirst;
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1579 pstate->lnumlast = lnumlast;
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1580
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1581 return OK;
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1582 }
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1583
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1584 /*
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1585 * 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	1586 * quickfix list.
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1587 */
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1588 static void
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1589 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	1590 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1591 if (pstate->fd != NULL)
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1592 fclose(pstate->fd);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1593
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1594 vim_free(pstate->growbuf);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1595 #ifdef FEAT_MBYTE
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1596 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	1597 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	1598 #endif
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1599 }
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1600
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1601 /*
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	1602 * Read the errorfile "efile" into memory, line by line, building the error
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	1603 * list.
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	1604 * 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	1605 * 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	1606 * 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	1607 * 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	1608 * Set the title of the list to "qf_title".
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	1609 * Return -1 for error, number of errors for success.
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	1610 */
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	1611 static int
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1612 qf_init_ext(
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1613 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	1614 int qf_idx,
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1615 char_u *efile,
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1616 buf_T *buf,
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1617 typval_T *tv,
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1618 char_u *errorformat,
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1619 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	1620 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	1621 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	1622 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	1623 char_u *enc)
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	1624 {
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	1625 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	1626 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	1627 qffields_T fields;
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	1628 qfline_T *old_last = NULL;
10369 4e5b307638cb commit https://github.com/vim/vim/commit/2b946c9f9b0e0fd805fb8f3e4c16e0a68ae13129 Christian Brabandt <cb@256bit.org> parents: 10367 diff changeset	1629 int adding = FALSE;
9397 e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	1630 static efm_T *fmt_first = NULL;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1631 char_u *efm;
9397 e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	1632 static char_u *last_efm = NULL;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1633 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	1634 int status;
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1635
11443 30b3775addb2 patch 8.0.0605: the quickfix cached buffer may become invalid Christian Brabandt <cb@256bit.org> parents: 11426 diff changeset	1636 /* 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	1637 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	1638
11063 e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	1639 vim_memset(&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	1640 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	1641 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	1642 (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	1643 lnumfirst, lnumlast) == FAIL))
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1644 goto qf_init_end;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1645
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	1646 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	1647 {
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1648 /* make place for a new list */
3965 eccae034465b updated for version 7.3.738 Bram Moolenaar <bram@vim.org> parents: 3949 diff changeset	1649 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	1650 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	1651 }
11609 6f11697fb92c patch 8.0.0687: minor issues related to quickfix Christian Brabandt <cb@256bit.org> parents: 11589 diff changeset	1652 else
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	1653 {
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	1654 /* 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	1655 adding = TRUE;
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	1656 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	1657 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	1658 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1659
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	1660 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	1661
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1662 /* Use the local value of 'errorformat' if it's set. */
446 7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	1663 if (errorformat == p_efm && tv == NULL && *buf->b_p_efm != NUL)
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	1664 efm = buf->b_p_efm;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1665 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1666 efm = errorformat;
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	1667
9397 e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	1668 /*
e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	1669 * 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	1670 * previously parsed values.
e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	1671 */
e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	1672 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	1673 {
e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	1674 /* 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	1675 VIM_CLEAR(last_efm);
9397 e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	1676 free_efm_list(&fmt_first);
e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	1677
e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	1678 /* parse the current 'efm' */
e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	1679 fmt_first = parse_efm_option(efm);
e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	1680 if (fmt_first != NULL)
e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	1681 last_efm = vim_strsave(efm);
e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	1682 }
e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	1683
9365 3830a92c12bf commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3 Christian Brabandt <cb@256bit.org> parents: 9334 diff changeset	1684 if (fmt_first == NULL) /* nothing found */
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1685 goto error2;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1686
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1687 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1688 * got_int is reset here, because it was probably set when killing the
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1689 * ":make" command, but we still want to read the errorfile then.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1690 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1691 got_int = FALSE;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1692
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1693 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1694 * Read the lines in the error file one by one.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1695 * Try to recognize one of the error formats in each line.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1696 */
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	1697 while (!got_int)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1698 {
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	1699 /* 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	1700 status = qf_get_nextline(&state);
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	1701 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	1702 goto qf_init_end;
50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	1703 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	1704 break;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1705
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	1706 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	1707 fmt_first, &fields);
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1708 if (status == QF_FAIL)
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1709 goto error2;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1710 if (status == QF_NOMEM)
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1711 goto qf_init_end;
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1712 if (status == QF_IGNORE_LINE)
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1713 continue;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1714
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	1715 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	1716 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	1717 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	1718 (*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	1719 ? 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	1720 : ((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	1721 ? 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	1722 fields.module,
1065 caa550fe4457 updated for version 7.0-191 vimboss parents: 1020 diff changeset	1723 0,
9568 ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1724 fields.errmsg,
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1725 fields.lnum,
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1726 fields.col,
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1727 fields.use_viscol,
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1728 fields.pattern,
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1729 fields.enr,
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1730 fields.type,
ccbd2e604e59 commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3 Christian Brabandt <cb@256bit.org> parents: 9540 diff changeset	1731 fields.valid) == FAIL)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1732 goto error2;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1733 line_breakcheck();
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1734 }
9531 50697f3b49d6 commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d Christian Brabandt <cb@256bit.org> parents: 9487 diff changeset	1735 if (state.fd == NULL \|\| !ferror(state.fd))
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1736 {
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	1737 if (qfl->qf_index == 0)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1738 {
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1739 /* 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	1740 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	1741 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	1742 qfl->qf_nonevalid = TRUE;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1743 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1744 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1745 {
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	1746 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	1747 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	1748 qfl->qf_ptr = qfl->qf_start;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1749 }
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1750 /* 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	1751 retval = qfl->qf_count;
9369 ce5b79b005ec commit https://github.com/vim/vim/commit/bcf7772a23624edc0942120e564f6b4ac95604ad Christian Brabandt <cb@256bit.org> parents: 9365 diff changeset	1752 goto qf_init_end;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1753 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1754 EMSG(_(e_readerrf));
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1755 error2:
10369 4e5b307638cb commit https://github.com/vim/vim/commit/2b946c9f9b0e0fd805fb8f3e4c16e0a68ae13129 Christian Brabandt <cb@256bit.org> parents: 10367 diff changeset	1756 if (!adding)
4e5b307638cb commit https://github.com/vim/vim/commit/2b946c9f9b0e0fd805fb8f3e4c16e0a68ae13129 Christian Brabandt <cb@256bit.org> parents: 10367 diff changeset	1757 {
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	1758 /* Error when creating a new list. Free the new list */
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	1759 qf_free(&qi->qf_lists[qi->qf_curlist]);
10369 4e5b307638cb commit https://github.com/vim/vim/commit/2b946c9f9b0e0fd805fb8f3e4c16e0a68ae13129 Christian Brabandt <cb@256bit.org> parents: 10367 diff changeset	1760 qi->qf_listcount--;
4e5b307638cb commit https://github.com/vim/vim/commit/2b946c9f9b0e0fd805fb8f3e4c16e0a68ae13129 Christian Brabandt <cb@256bit.org> parents: 10367 diff changeset	1761 if (qi->qf_curlist > 0)
4e5b307638cb commit https://github.com/vim/vim/commit/2b946c9f9b0e0fd805fb8f3e4c16e0a68ae13129 Christian Brabandt <cb@256bit.org> parents: 10367 diff changeset	1762 --qi->qf_curlist;
4e5b307638cb commit https://github.com/vim/vim/commit/2b946c9f9b0e0fd805fb8f3e4c16e0a68ae13129 Christian Brabandt <cb@256bit.org> parents: 10367 diff changeset	1763 }
9369 ce5b79b005ec commit https://github.com/vim/vim/commit/bcf7772a23624edc0942120e564f6b4ac95604ad Christian Brabandt <cb@256bit.org> parents: 9365 diff changeset	1764 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	1765 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	1766 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	1767 qf_cleanup_state(&state);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1768 qf_free_fields(&fields);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1769
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1770 return retval;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1771 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1772
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1773 /*
13992 710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1774 * 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	1775 * 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	1776 * 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	1777 */
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1778 int
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1779 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	1780 char_u *efile,
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1781 char_u *errorformat,
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1782 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	1783 char_u *qf_title,
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1784 char_u *enc)
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1785 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1786 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	1787
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1788 if (wp != NULL)
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1789 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1790 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	1791 if (qi == NULL)
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1792 return FAIL;
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1793 }
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1794
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	1795 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	1796 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	1797 }
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 /*
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1800 * 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	1801 * Prepends ':' to the title.
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1802 */
6079 75ae211df37d updated for version 7.4.378 Bram Moolenaar <bram@vim.org> parents: 5753 diff changeset	1803 static void
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	1804 qf_store_title(qf_list_T qfl, char_u title)
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	1805 {
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	1806 VIM_CLEAR(qfl->qf_title);
11549 f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	1807
6079 75ae211df37d updated for version 7.4.378 Bram Moolenaar <bram@vim.org> parents: 5753 diff changeset	1808 if (title != NULL)
75ae211df37d updated for version 7.4.378 Bram Moolenaar <bram@vim.org> parents: 5753 diff changeset	1809 {
75ae211df37d updated for version 7.4.378 Bram Moolenaar <bram@vim.org> parents: 5753 diff changeset	1810 char_u *p = alloc((int)STRLEN(title) + 2);
75ae211df37d updated for version 7.4.378 Bram Moolenaar <bram@vim.org> parents: 5753 diff changeset	1811
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	1812 qfl->qf_title = p;
6079 75ae211df37d updated for version 7.4.378 Bram Moolenaar <bram@vim.org> parents: 5753 diff changeset	1813 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	1814 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	1815 }
3b6c29f8c1a2 patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':' Christian Brabandt <cb@256bit.org> parents: 13882 diff changeset	1816 }
3b6c29f8c1a2 patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':' Christian Brabandt <cb@256bit.org> parents: 13882 diff changeset	1817
3b6c29f8c1a2 patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':' Christian Brabandt <cb@256bit.org> parents: 13882 diff changeset	1818 /*
3b6c29f8c1a2 patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':' Christian Brabandt <cb@256bit.org> parents: 13882 diff changeset	1819 * 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	1820 * 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	1821 * 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	1822 * 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	1823 */
3b6c29f8c1a2 patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':' Christian Brabandt <cb@256bit.org> parents: 13882 diff changeset	1824 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	1825 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	1826 {
3b6c29f8c1a2 patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':' Christian Brabandt <cb@256bit.org> parents: 13882 diff changeset	1827 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	1828
3b6c29f8c1a2 patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':' Christian Brabandt <cb@256bit.org> parents: 13882 diff changeset	1829 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	1830 return qftitle_str;
6079 75ae211df37d updated for version 7.4.378 Bram Moolenaar <bram@vim.org> parents: 5753 diff changeset	1831 }
75ae211df37d updated for version 7.4.378 Bram Moolenaar <bram@vim.org> parents: 5753 diff changeset	1832
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1833 /*
12084 69ce6b3f0834 patch 8.0.0922: quickfix list always added after current one Christian Brabandt <cb@256bit.org> parents: 12048 diff changeset	1834 * 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	1835 * 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	1836 * the new list is added.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1837 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1838 static void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1839 qf_new_list(qf_info_T qi, char_u qf_title)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1840 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1841 int i;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1842
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1843 /*
6079 75ae211df37d updated for version 7.4.378 Bram Moolenaar <bram@vim.org> parents: 5753 diff changeset	1844 * If the current entry is not the last entry, delete entries beyond
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1845 * the current entry. This makes it possible to browse in a tree-like
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1846 * way with ":grep'.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1847 */
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1848 while (qi->qf_listcount > qi->qf_curlist + 1)
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	1849 qf_free(&qi->qf_lists[--qi->qf_listcount]);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1850
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1851 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1852 * When the stack is full, remove to oldest entry
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1853 * Otherwise, add a new entry.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1854 */
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1855 if (qi->qf_listcount == LISTCOUNT)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1856 {
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	1857 qf_free(&qi->qf_lists[0]);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1858 for (i = 1; i < LISTCOUNT; ++i)
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1859 qi->qf_lists[i - 1] = qi->qf_lists[i];
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1860 qi->qf_curlist = LISTCOUNT - 1;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1861 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1862 else
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1863 qi->qf_curlist = qi->qf_listcount++;
3259 9eb7fdfb5e63 updated for version 7.3.398 Bram Moolenaar <bram@vim.org> parents: 3257 diff changeset	1864 vim_memset(&qi->qf_lists[qi->qf_curlist], 0, (size_t)(sizeof(qf_list_T)));
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	1865 qf_store_title(&qi->qf_lists[qi->qf_curlist], qf_title);
12287 20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	1866 qi->qf_lists[qi->qf_curlist].qf_id = ++last_qf_id;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1867 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1868
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1869 /*
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	1870 * Free a location list stack
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1871 */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1872 static void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1873 ll_free_all(qf_info_T **pqi)
359 6c62b9b939bd updated for version 7.0093 vimboss parents: 297 diff changeset	1874 {
6c62b9b939bd updated for version 7.0093 vimboss parents: 297 diff changeset	1875 int i;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1876 qf_info_T *qi;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1877
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1878 qi = *pqi;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1879 if (qi == NULL)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1880 return;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1881 pqi = NULL; / Remove reference to this list */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1882
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1883 qi->qf_refcount--;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1884 if (qi->qf_refcount < 1)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1885 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1886 /* No references to this location list */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1887 for (i = 0; i < qi->qf_listcount; ++i)
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	1888 qf_free(&qi->qf_lists[i]);
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1889 vim_free(qi);
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1890 }
359 6c62b9b939bd updated for version 7.0093 vimboss parents: 297 diff changeset	1891 }
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1892
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1893 /*
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	1894 * 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	1895 */
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1896 void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1897 qf_free_all(win_T *wp)
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1898 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1899 int i;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1900 qf_info_T *qi = &ql_info;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1901
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1902 if (wp != NULL)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1903 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1904 /* location list */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1905 ll_free_all(&wp->w_llist);
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1906 ll_free_all(&wp->w_llist_ref);
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1907 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1908 else
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1909 /* quickfix list */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1910 for (i = 0; i < qi->qf_listcount; ++i)
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	1911 qf_free(&qi->qf_lists[i]);
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	1912 }
359 6c62b9b939bd updated for version 7.0093 vimboss parents: 297 diff changeset	1913
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1914 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1915 * Add an entry to the end of the list of errors.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1916 * Returns OK or FAIL.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1917 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1918 static int
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1919 qf_add_entry(
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1920 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	1921 int qf_idx, /* list index */
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1922 char_u dir, / optional directory name */
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1923 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	1924 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	1925 int bufnum, /* buffer number or zero */
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1926 char_u mesg, / message */
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1927 long lnum, /* line number */
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1928 int col, /* column */
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1929 int vis_col, /* using visual column */
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1930 char_u pattern, / search pattern */
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1931 int nr, /* error number */
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1932 int type, /* type character */
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	1933 int valid) /* valid entry */
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1934 {
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	1935 qf_list_T *qfl = &qi->qf_lists[qf_idx];
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
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	1983 lastp = &qfl->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 {
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	1986 qfl->qf_start = qfp;
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	1987 qfl->qf_ptr = qfp;
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	1988 qfl->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;
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	1999 ++qfl->qf_count;
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2000 if (qfl->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 {
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2003 qfl->qf_index = qfl->qf_count;
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2004 qfl->qf_ptr = qfp;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2005 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2006
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2007 return OK;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2008 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2009
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2010 /*
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2011 * Allocate a new location list stack
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2012 */
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	2013 static qf_info_T *
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	2014 ll_new_list(void)
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2015 {
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	2016 qf_info_T *qi;
d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	2017
14495 178162aeebeb patch 8.1.0261: Coverity complains about a negative array index Christian Brabandt <cb@256bit.org> parents: 14491 diff changeset	2018 qi = (qf_info_T *)alloc_clear((unsigned)sizeof(qf_info_T));
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	2019 if (qi != NULL)
d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	2020 qi->qf_refcount++;
d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	2021 return qi;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2022 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2023
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2024 /*
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2025 * Return the location list stack for window 'wp'.
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2026 * If not present, allocate a location list stack
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2027 */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2028 static qf_info_T *
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	2029 ll_get_or_alloc_list(win_T *wp)
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2030 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2031 if (IS_LL_WINDOW(wp))
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2032 /* For a location list window, use the referenced location list */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2033 return wp->w_llist_ref;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2034
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2035 /*
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2036 * 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	2037 * location list.
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2038 */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2039 ll_free_all(&wp->w_llist_ref);
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2040
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2041 if (wp->w_llist == NULL)
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	2042 wp->w_llist = ll_new_list(); /* new location list */
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2043 return wp->w_llist;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2044 }
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 * Copy the location list from window "from" to window "to".
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2048 */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2049 void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	2050 copy_loclist(win_T from, win_T to)
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2051 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2052 qf_info_T *qi;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2053 int idx;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2054 int i;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2055
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2056 /*
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2057 * When copying from a location list window, copy the referenced
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2058 * location list. For other windows, copy the location list for
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2059 * that window.
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2060 */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2061 if (IS_LL_WINDOW(from))
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2062 qi = from->w_llist_ref;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2063 else
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2064 qi = from->w_llist;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2065
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2066 if (qi == NULL) /* no location list to copy */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2067 return;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2068
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	2069 /* allocate a new location list */
d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	2070 if ((to->w_llist = ll_new_list()) == NULL)
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2071 return;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2072
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2073 to->w_llist->qf_listcount = qi->qf_listcount;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2074
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2075 /* 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	2076 for (idx = 0; idx < qi->qf_listcount; ++idx)
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2077 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2078 qf_list_T *from_qfl;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2079 qf_list_T *to_qfl;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2080
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2081 to->w_llist->qf_curlist = idx;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2082
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2083 from_qfl = &qi->qf_lists[idx];
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2084 to_qfl = &to->w_llist->qf_lists[idx];
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2085
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2086 /* Some of the fields are populated by qf_add_entry() */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2087 to_qfl->qf_nonevalid = from_qfl->qf_nonevalid;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2088 to_qfl->qf_count = 0;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2089 to_qfl->qf_index = 0;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2090 to_qfl->qf_start = NULL;
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	2091 to_qfl->qf_last = NULL;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2092 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	2093 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	2094 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	2095 else
68e394361ca3 Add "q" item for 'statusline'. Add w:quickfix_title. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2296 diff changeset	2096 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	2097 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	2098 {
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	2099 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	2100 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	2101 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	2102 }
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	2103 else
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	2104 to_qfl->qf_ctx = NULL;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2105
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2106 if (from_qfl->qf_count)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2107 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2108 qfline_T *from_qfp;
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	2109 qfline_T *prevp;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2110
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2111 /* 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	2112 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	2113 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	2114 ++i, from_qfp = from_qfp->qf_next)
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2115 {
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	2116 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	2117 to->w_llist->qf_curlist,
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2118 NULL,
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2119 NULL,
13821 98274127d675 patch 8.0.1782: no simple way to label quickfix entries Christian Brabandt <cb@256bit.org> parents: 13819 diff changeset	2120 from_qfp->qf_module,
1065 caa550fe4457 updated for version 7.0-191 vimboss parents: 1020 diff changeset	2121 0,
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2122 from_qfp->qf_text,
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2123 from_qfp->qf_lnum,
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2124 from_qfp->qf_col,
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2125 from_qfp->qf_viscol,
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2126 from_qfp->qf_pattern,
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2127 from_qfp->qf_nr,
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2128 0,
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2129 from_qfp->qf_valid) == FAIL)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2130 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2131 qf_free_all(to);
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2132 return;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2133 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2134 /*
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2135 * qf_add_entry() will not set the qf_num field, as the
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2136 * directory and file names are not supplied. So the qf_fnum
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2137 * field is copied here.
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2138 */
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	2139 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	2140 prevp->qf_fnum = from_qfp->qf_fnum; /* file number */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2141 prevp->qf_type = from_qfp->qf_type; /* error type */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2142 if (from_qfl->qf_ptr == from_qfp)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2143 to_qfl->qf_ptr = prevp; /* current location */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2144 }
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 to_qfl->qf_index = from_qfl->qf_index; /* current index in the list */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2148
12287 20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	2149 /* 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	2150 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	2151 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	2152
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2153 /* When no valid entries are present in the list, qf_ptr points to
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2154 * the first item in the list */
2795 133d089f247e updated for version 7.3.173 Bram Moolenaar <bram@vim.org> parents: 2782 diff changeset	2155 if (to_qfl->qf_nonevalid)
5060 30910831e5b0 updated for version 7.3.1273 Bram Moolenaar <bram@vim.org> parents: 4805 diff changeset	2156 {
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2157 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	2158 to_qfl->qf_index = 1;
30910831e5b0 updated for version 7.3.1273 Bram Moolenaar <bram@vim.org> parents: 4805 diff changeset	2159 }
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2160 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2161
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2162 to->w_llist->qf_curlist = qi->qf_curlist; /* current list */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2163 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2164
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	2165 /*
10379 73e2a7abe2a3 commit https://github.com/vim/vim/commit/7618e00d3b8bfe064cfc524640d754607361f9df Christian Brabandt <cb@256bit.org> parents: 10369 diff changeset	2166 * 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	2167 * Also sets the b_has_qf_entry flag.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2168 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2169 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	2170 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	2171 {
9473 bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2172 char_u *ptr = NULL;
9201 692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2173 buf_T *buf;
9473 bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2174 char_u *bufname;
9201 692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2175
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2176 if (fname == NULL \|\| fname == NUL) / no file name */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2177 return 0;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2178
2823 8bd38abda314 updated for version 7.3.187 Bram Moolenaar <bram@vim.org> parents: 2795 diff changeset	2179 #ifdef VMS
9201 692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2180 vms_remove_version(fname);
2823 8bd38abda314 updated for version 7.3.187 Bram Moolenaar <bram@vim.org> parents: 2795 diff changeset	2181 #endif
8bd38abda314 updated for version 7.3.187 Bram Moolenaar <bram@vim.org> parents: 2795 diff changeset	2182 #ifdef BACKSLASH_IN_FILENAME
9201 692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2183 if (directory != NULL)
692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2184 slash_adjust(directory);
692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2185 slash_adjust(fname);
2823 8bd38abda314 updated for version 7.3.187 Bram Moolenaar <bram@vim.org> parents: 2795 diff changeset	2186 #endif
9201 692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2187 if (directory != NULL && !vim_isAbsName(fname)
692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2188 && (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	2189 {
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 * 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	2192 * 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	2193 * "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	2194 * directory change.
692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2195 */
692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2196 if (mch_getperm(ptr) < 0)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2197 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2198 vim_free(ptr);
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2199 directory = qf_guess_filepath(&qi->qf_lists[qf_idx], fname);
9201 692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2200 if (directory)
692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2201 ptr = concat_fnames(directory, fname, TRUE);
692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2202 else
692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2203 ptr = vim_strsave(fname);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2204 }
9201 692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2205 /* 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	2206 bufname = ptr;
bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2207 }
bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2208 else
bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2209 bufname = fname;
bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2210
bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2211 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	2212 && bufref_valid(&qf_last_bufref))
9473 bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2213 {
9475 4d8f7f8da90c commit https://github.com/vim/vim/commit/b25f9a97e9aad3cbb4bc3fe87cdbd5700f8aa0c6 Christian Brabandt <cb@256bit.org> parents: 9473 diff changeset	2214 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	2215 vim_free(ptr);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2216 }
9201 692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2217 else
9473 bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2218 {
bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2219 vim_free(qf_last_bufname);
bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2220 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	2221 if (bufname == ptr)
bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2222 qf_last_bufname = bufname;
bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2223 else
bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2224 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	2225 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	2226 }
9201 692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2227 if (buf == NULL)
692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	2228 return 0;
9473 bdac1019552f commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9 Christian Brabandt <cb@256bit.org> parents: 9458 diff changeset	2229
9608 fa64afb99dda commit https://github.com/vim/vim/commit/c1542744e788d96fed24dd421f43009288092504 Christian Brabandt <cb@256bit.org> parents: 9579 diff changeset	2230 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	2231 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	2232 return buf->b_fnum;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2233 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2234
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2235 /*
9334 674f9e3ccd1a commit https://github.com/vim/vim/commit/38df43bd13a2498cc96b3ddd9a20dd75126bd171 Christian Brabandt <cb@256bit.org> parents: 9201 diff changeset	2236 * 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	2237 * NULL on error.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2238 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2239 static char_u *
9397 e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	2240 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	2241 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2242 struct dir_stack_T *ds_new;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2243 struct dir_stack_T *ds_ptr;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2244
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2245 /* allocate new stack element and hook it in */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2246 ds_new = (struct dir_stack_T *)alloc((unsigned)sizeof(struct dir_stack_T));
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2247 if (ds_new == NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2248 return NULL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2249
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2250 ds_new->next = *stackptr;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2251 *stackptr = ds_new;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2252
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2253 /* store directory on the stack */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2254 if (vim_isAbsName(dirbuf)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2255 \|\| (*stackptr)->next == NULL
9397 e08e8b00fe48 commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac Christian Brabandt <cb@256bit.org> parents: 9389 diff changeset	2256 \|\| (*stackptr && is_file_stack))
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2257 (*stackptr)->dirname = vim_strsave(dirbuf);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2258 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2259 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2260 /* Okay we don't have an absolute path.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2261 * dirbuf must be a subdir of one of the directories on the stack.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2262 * Let's search...
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2263 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2264 ds_new = (*stackptr)->next;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2265 (*stackptr)->dirname = NULL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2266 while (ds_new)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2267 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2268 vim_free((*stackptr)->dirname);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2269 (*stackptr)->dirname = concat_fnames(ds_new->dirname, dirbuf,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2270 TRUE);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2271 if (mch_isdir((*stackptr)->dirname) == TRUE)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2272 break;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2273
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2274 ds_new = ds_new->next;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2275 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2276
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2277 /* clean up all dirs we already left */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2278 while ((*stackptr)->next != ds_new)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2279 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2280 ds_ptr = (*stackptr)->next;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2281 (stackptr)->next = (stackptr)->next->next;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2282 vim_free(ds_ptr->dirname);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2283 vim_free(ds_ptr);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2284 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2285
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2286 /* Nothing found -> it must be on top level */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2287 if (ds_new == NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2288 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2289 vim_free((*stackptr)->dirname);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2290 (*stackptr)->dirname = vim_strsave(dirbuf);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2291 }
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 if ((*stackptr)->dirname != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2295 return (*stackptr)->dirname;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2296 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2297 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2298 ds_ptr = *stackptr;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2299 stackptr = (stackptr)->next;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2300 vim_free(ds_ptr);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2301 return NULL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2302 }
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 * pop dirbuf from the directory stack and return previous directory or NULL if
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2307 * stack is empty
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2308 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2309 static char_u *
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	2310 qf_pop_dir(struct dir_stack_T **stackptr)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2311 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2312 struct dir_stack_T *ds_ptr;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2313
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2314 /* TODO: Should we check if dirbuf is the directory on top of the stack?
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2315 * What to do if it isn't? */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2316
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2317 /* pop top element and free it */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2318 if (*stackptr != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2319 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2320 ds_ptr = *stackptr;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2321 stackptr = (stackptr)->next;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2322 vim_free(ds_ptr->dirname);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2323 vim_free(ds_ptr);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2324 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2325
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2326 /* return NEW top element as current dir or NULL if stack is empty*/
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2327 return stackptr ? (stackptr)->dirname : NULL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2328 }
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 * clean up directory stack
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2332 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2333 static void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	2334 qf_clean_dir_stack(struct dir_stack_T **stackptr)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2335 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2336 struct dir_stack_T *ds_ptr;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2337
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2338 while ((ds_ptr = *stackptr) != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2339 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2340 stackptr = (stackptr)->next;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2341 vim_free(ds_ptr->dirname);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2342 vim_free(ds_ptr);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2343 }
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 * Check in which directory of the directory stack the given file can be
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2348 * found.
7092 64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	2349 * Returns a pointer to the directory name or NULL if not found.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2350 * Cleans up intermediate directory entries.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2351 *
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2352 * 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	2353 * If we have this directory tree:
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2354 * ./
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2355 * ./aa
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2356 * ./aa/bb
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2357 * ./bb
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2358 * ./bb/x.c
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2359 * and make says:
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2360 * making all in aa
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2361 * making all in bb
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2362 * x.c:9: Error
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2363 * 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	2364 * qf_guess_filepath will return NULL.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2365 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2366 static char_u *
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2367 qf_guess_filepath(qf_list_T qfl, char_u filename)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2368 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2369 struct dir_stack_T *ds_ptr;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2370 struct dir_stack_T *ds_tmp;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2371 char_u *fullname;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2372
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2373 /* 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	2374 if (qfl->qf_dir_stack == NULL)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2375 return NULL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2376
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	2377 ds_ptr = qfl->qf_dir_stack->next;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2378 fullname = NULL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2379 while (ds_ptr)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2380 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2381 vim_free(fullname);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2382 fullname = concat_fnames(ds_ptr->dirname, filename, TRUE);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2383
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2384 /* If concat_fnames failed, just go on. The worst thing that can happen
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2385 * is that we delete the entire stack.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2386 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2387 if ((fullname != NULL) && (mch_getperm(fullname) >= 0))
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2388 break;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2389
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2390 ds_ptr = ds_ptr->next;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2391 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2392
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2393 vim_free(fullname);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2394
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2395 /* 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	2396 while (qfl->qf_dir_stack->next != ds_ptr)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2397 {
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 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	2399 qfl->qf_dir_stack->next = qfl->qf_dir_stack->next->next;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2400 vim_free(ds_tmp->dirname);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2401 vim_free(ds_tmp);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2402 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2403
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	2404 return ds_ptr == NULL ? NULL : ds_ptr->dirname;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2405 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2406
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2407 /*
13090 a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2408 * 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	2409 */
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2410 static int
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2411 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	2412 {
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2413 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	2414 int i;
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2415
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2416 if (wp != NULL)
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 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	2419 if (qi == NULL)
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2420 return FALSE;
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2421 }
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2422
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2423 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	2424 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	2425 return TRUE;
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2426
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2427 return FALSE;
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
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2430 /*
14250 ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	2431 * 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	2432 * 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	2433 * 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	2434 * Similar to location list.
39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2435 */
39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2436 static int
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2437 is_qf_entry_present(qf_list_T qfl, qfline_T qf_ptr)
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2438 {
8702 39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2439 qfline_T *qfp;
39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2440 int i;
39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2441
39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2442 /* 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	2443 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	2444 ++i, qfp = qfp->qf_next)
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	2445 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	2446 break;
39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2447
39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2448 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	2449 return FALSE;
39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2450
39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2451 return TRUE;
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
39d6e4f2f748 commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2454 /*
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2455 * 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	2456 * 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	2457 */
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2458 static qfline_T *
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2459 get_next_valid_entry(
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2460 qf_list_T *qfl,
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2461 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	2462 int *qf_index,
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2463 int dir)
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2464 {
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2465 int idx;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2466 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	2467
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2468 idx = *qf_index;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2469 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	2470
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2471 do
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2472 {
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2473 if (idx == qfl->qf_count \|\| qf_ptr->qf_next == NULL)
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2474 return NULL;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2475 ++idx;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2476 qf_ptr = qf_ptr->qf_next;
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2477 } while ((!qfl->qf_nonevalid && !qf_ptr->qf_valid)
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2478 \|\| (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	2479
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2480 *qf_index = idx;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2481 return qf_ptr;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2482 }
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2483
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2484 /*
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2485 * 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	2486 * 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	2487 */
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2488 static qfline_T *
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2489 get_prev_valid_entry(
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2490 qf_list_T *qfl,
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2491 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	2492 int *qf_index,
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2493 int dir)
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 int idx;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2496 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	2497
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2498 idx = *qf_index;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2499 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	2500
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2501 do
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2502 {
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2503 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	2504 return NULL;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2505 --idx;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2506 qf_ptr = qf_ptr->qf_prev;
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2507 } while ((!qfl->qf_nonevalid && !qf_ptr->qf_valid)
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2508 \|\| (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	2509
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2510 *qf_index = idx;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2511 return qf_ptr;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2512 }
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2513
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2514 /*
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2515 * 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	2516 * the quickfix list.
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2517 * 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	2518 * 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	2519 */
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2520 static qfline_T *
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2521 get_nth_valid_entry(
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2522 qf_list_T *qfl,
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2523 int errornr,
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2524 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	2525 int *qf_index,
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2526 int dir)
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 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	2529 int prev_index;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2530 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	2531 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	2532
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2533 while (errornr--)
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2534 {
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2535 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	2536 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	2537
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2538 if (dir == FORWARD \|\| dir == FORWARD_FILE)
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2539 qf_ptr = get_next_valid_entry(qfl, qf_ptr, qf_index, dir);
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2540 else
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2541 qf_ptr = get_prev_valid_entry(qfl, qf_ptr, qf_index, dir);
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2542 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	2543 {
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2544 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	2545 *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	2546 if (err != NULL)
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2547 {
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2548 EMSG(_(err));
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2549 return NULL;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2550 }
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2551 break;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2552 }
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2553
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2554 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
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2557 return qf_ptr;
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
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2560 /*
12503 4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2561 * 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	2562 */
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2563 static qfline_T *
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2564 get_nth_entry(
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2565 qf_list_T *qfl,
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2566 int errornr,
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2567 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	2568 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	2569 {
12503 4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2570 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	2571
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2572 /* 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	2573 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	2574 {
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2575 --qf_idx;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2576 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	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 /* New error number is greater than the current error number */
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2579 while (errornr > qf_idx && qf_idx < qfl->qf_count &&
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2580 qf_ptr->qf_next != NULL)
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2581 {
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2582 ++qf_idx;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2583 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	2584 }
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 *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	2587 return qf_ptr;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2588 }
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2589
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2590 /*
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	2591 * 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	2592 */
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2593 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	2594 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	2595 {
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2596 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	2597
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2598 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	2599 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	2600 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	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 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	2603 }
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 /*
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2606 * 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	2607 */
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2608 static int
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2609 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	2610 {
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2611 win_T *wp;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2612 int flags;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2613
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2614 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	2615 wp = NULL;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2616 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	2617 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	2618 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	2619 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	2620 else
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2621 {
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 * 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	2624 * 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	2625 */
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2626 flags = WSP_HELP;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2627 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	2628 && 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	2629 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	2630 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	2631 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	2632
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2633 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	2634 return FAIL;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2635
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2636 *opened_window = TRUE;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2637
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2638 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	2639 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	2640
14560 8413e66d00a1 patch 8.1.0293: checks for type of stack is cryptic Christian Brabandt <cb@256bit.org> parents: 14552 diff changeset	2641 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	2642 {
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2643 /* 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	2644 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	2645 qi->qf_refcount++;
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 }
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2648
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2649 if (!p_im)
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2650 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	2651
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2652 return OK;
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2653 }
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2654
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	2655 /*
13882 f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2656 * 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	2657 * 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	2658 */
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2659 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	2660 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	2661 {
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2662 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	2663
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2664 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	2665 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	2666 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	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 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	2669 }
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 /*
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 * 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	2673 */
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 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	2675 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	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 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	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 FOR_ALL_WINDOWS(wp)
14433 4a94173743d9 patch 8.1.0230: directly checking 'buftype' value Christian Brabandt <cb@256bit.org> parents: 14397 diff changeset	2680 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	2681 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	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 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	2684 }
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 /*
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 * 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	2688 * 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	2689 */
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 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	2691 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	2692 {
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 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	2694 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	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 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	2697 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	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 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	2700 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	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
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 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	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
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2706 /*
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2707 * 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	2708 * 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	2709 */
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2710 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	2711 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	2712 {
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2713 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	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 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	2716 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	2717 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	2718 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	2719 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	2720 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	2721 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	2722 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	2723 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	2724 {
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2725 /* 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	2726 * 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	2727 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	2728 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	2729 }
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 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	2731 }
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2732
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 * 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	2735 * 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	2736 * 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	2737 * 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	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 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	2740 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	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 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	2743
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2744 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	2745 {
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2746 /* 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	2747 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	2748 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	2749 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	2750 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	2751 {
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2752 /* 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	2753 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	2754 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	2755 {
14433 4a94173743d9 patch 8.1.0230: directly checking 'buftype' value Christian Brabandt <cb@256bit.org> parents: 14397 diff changeset	2756 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	2757 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	2758 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	2759 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	2760 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	2761 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	2762 } 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	2763 }
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2764 }
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2765 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	2766
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 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	2768 * 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	2769 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	2770 {
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2771 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	2772 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	2773 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	2774 }
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
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 /*
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2778 * Go to a window that contains the specified buffer 'qf_fnum'. If a window is
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2779 * not found, then go to the window just above the quickfix window. This is
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2780 * used for opening a file from a quickfix window and not from a location
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2781 * 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	2782 */
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2783 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	2784 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	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 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	2787 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	2788
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 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	2790 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	2791 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	2792 {
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 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	2794 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	2795 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	2796 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	2797 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	2798 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	2799
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 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	2801 {
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 /* 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	2803 * 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	2804 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	2805 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	2806 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	2807 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	2808 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	2809 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	2810 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	2811 }
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
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 /* Remember a usable window. */
14433 4a94173743d9 patch 8.1.0230: directly checking 'buftype' value Christian Brabandt <cb@256bit.org> parents: 14397 diff changeset	2814 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	2815 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	2816 }
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
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 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	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 /*
f48fcaa196a9 patch 8.0.1812: the qf_jump_to_usable_window() function is too long Christian Brabandt <cb@256bit.org> parents: 13868 diff changeset	2822 * 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	2823 * 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	2824 * 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	2825 * 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	2826 */
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2827 static int
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2828 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	2829 {
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2830 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	2831 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	2832 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	2833 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	2834
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2835 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	2836
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2837 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	2838 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	2839 {
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	2840 /* 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	2841 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	2842 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	2843 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	2844 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2845
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2846 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	2847 {
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2848 /* 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	2849 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	2850 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	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 /*
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2855 * 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	2856 * 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	2857 */
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2858 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	2859 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	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 * 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	2863 * 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	2864 */
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2865 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	2866 {
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 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	2868 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	2869 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	2870 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2871 else
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2872 {
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	2873 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	2874 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	2875 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	2876 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	2877 }
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 return OK;
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2880 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2881
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2882 /*
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2883 * 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	2884 */
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2885 static int
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2886 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	2887 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	2888 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	2889 int forceit,
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2890 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	2891 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	2892 int *abort)
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2893 {
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2894 qf_list_T *qfl = &qi->qf_lists[qi->qf_curlist];
12503 4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2895 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	2896
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2897 if (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	2898 {
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2899 /* 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	2900 * 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	2901 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	2902 {
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2903 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	2904 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	2905 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2906 else
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2907 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	2908 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	2909 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	2910 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2911 else
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 int old_qf_curlist = qi->qf_curlist;
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2914 int save_qfid = qfl->qf_id;
12503 4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2915
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2916 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	2917 (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	2918
14560 8413e66d00a1 patch 8.1.0293: checks for type of stack is cryptic Christian Brabandt <cb@256bit.org> parents: 14552 diff changeset	2919 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	2920 {
13090 a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2921 /*
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2922 * 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	2923 * 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	2924 */
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2925 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	2926 {
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2927 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	2928 *abort = TRUE;
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2929 *opened_window = FALSE;
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2930 }
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2931 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	2932 {
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2933 EMSG(_(e_loc_list_changed));
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2934 *abort = TRUE;
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2935 }
12503 4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2936 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2937 else if (old_qf_curlist != qi->qf_curlist
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	2938 \|\| !is_qf_entry_present(qfl, qf_ptr))
12503 4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2939 {
14560 8413e66d00a1 patch 8.1.0293: checks for type of stack is cryptic Christian Brabandt <cb@256bit.org> parents: 14552 diff changeset	2940 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	2941 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	2942 else
13090 a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	2943 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	2944 *abort = TRUE;
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2945 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2946
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2947 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	2948 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	2949 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2950
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2951 return retval;
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 /*
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	2955 * 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	2956 * 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	2957 */
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2958 static void
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2959 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	2960 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	2961 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	2962 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	2963 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	2964 {
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2965 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	2966 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	2967 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	2968 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	2969
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2970 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	2971 {
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2972 /*
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2973 * 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	2974 */
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2975 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	2976 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	2977 {
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2978 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	2979 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	2980 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	2981 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2982 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	2983 {
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2984 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	2985 #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	2986 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	2987 #endif
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2988 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	2989 {
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 * 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	2992 * 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	2993 * 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	2994 * 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	2995 */
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	2996 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	2997 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	2998 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	2999 {
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3000 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	3001 break;
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3002 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	3003 {
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3004 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	3005 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	3006 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3007 else
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3008 ++screen_col;
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3009 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3010 }
14552 b298737a7188 patch 8.1.0289: cursor moves to wrong column after quickfix jump Christian Brabandt <cb@256bit.org> parents: 14550 diff changeset	3011 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	3012 check_cursor();
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 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	3016 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3017 else
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3018 {
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3019 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	3020
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3021 /* 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	3022 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	3023 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	3024 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	3025 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	3026 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	3027 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3028 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3029
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3030 /*
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3031 * 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	3032 */
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3033 static void
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3034 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	3035 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	3036 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	3037 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	3038 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	3039 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	3040 {
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3041 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	3042 int len;
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3043
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3044 /* 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	3045 * scrolled up. */
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3046 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	3047 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	3048 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	3049 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	3050 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	3051 (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	3052 /* 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	3053 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	3054 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	3055
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3056 /* 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	3057 * 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	3058 * whole message. */
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3059 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	3060 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	3061 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	3062 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	3063 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	3064 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	3065 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	3066 }
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3067
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3068 /*
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3069 * jump to a quickfix line
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3070 * if dir == FORWARD go "errornr" valid entries forward
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3071 * if dir == BACKWARD go "errornr" valid entries backward
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3072 * if dir == FORWARD_FILE go "errornr" valid entries files backward
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3073 * if dir == BACKWARD_FILE go "errornr" valid entries files backward
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3074 * else if "errornr" is zero, redisplay the same line
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3075 * else go to entry "errornr"
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3076 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3077 void
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	3078 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	3079 int dir,
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	3080 int errornr,
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	3081 int forceit)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3082 {
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3083 qf_list_T *qfl;
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	3084 qfline_T *qf_ptr;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	3085 qfline_T *old_qf_ptr;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3086 int qf_index;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3087 int old_qf_index;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3088 buf_T *old_curbuf;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3089 linenr_T old_lnum;
639 c79d4df4686e updated for version 7.0185 vimboss parents: 634 diff changeset	3090 char_u *old_swb = p_swb;
1621 82b5078be2dd updated for version 7.2a vimboss parents: 1571 diff changeset	3091 unsigned old_swb_flags = swb_flags;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3092 int opened_window = FALSE;
1743 734d5bdae499 updated for version 7.2-041 vimboss parents: 1683 diff changeset	3093 win_T *oldwin = curwin;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3094 int print_message = TRUE;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3095 #ifdef FEAT_FOLDING
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3096 int old_KeyTyped = KeyTyped; /* getting file may reset it */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3097 #endif
12503 4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3098 int retval = OK;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3099
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	3100 if (qi == NULL)
d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	3101 qi = &ql_info;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3102
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3103 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	3104 \|\| qf_list_empty(qi, qi->qf_curlist))
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3105 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3106 EMSG(_(e_quickfix));
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3107 return;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3108 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3109
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3110 qfl = &qi->qf_lists[qi->qf_curlist];
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3111
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3112 qf_ptr = qfl->qf_ptr;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3113 old_qf_ptr = qf_ptr;
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3114 qf_index = qfl->qf_index;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3115 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	3116 if (dir != 0) /* next/prev valid entry */
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3117 {
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3118 qf_ptr = get_nth_valid_entry(qfl, errornr, qf_ptr, &qf_index, dir);
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	3119 if (qf_ptr == NULL)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3120 {
12449 7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	3121 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	3122 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	3123 goto theend;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3124 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3125 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3126 else if (errornr != 0) /* go to specified number */
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3127 qf_ptr = get_nth_entry(qfl, errornr, qf_ptr, &qf_index);
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3128
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3129 qfl->qf_index = qf_index;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3130 if (qf_win_pos_update(qi, old_qf_index))
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3131 /* No need to print the error message if it's visible in the error
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3132 * window */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3133 print_message = FALSE;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3134
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3135 /*
9 4102fb4ea781 updated for version 7.0002 vimboss parents: 7 diff changeset	3136 * For ":helpgrep" find a help window or open one.
4102fb4ea781 updated for version 7.0002 vimboss parents: 7 diff changeset	3137 */
11800 5ceaecedbad2 patch 8.0.0782: using freed memory in quickfix code Christian Brabandt <cb@256bit.org> parents: 11788 diff changeset	3138 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	3139 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	3140 goto theend;
9 4102fb4ea781 updated for version 7.0002 vimboss parents: 7 diff changeset	3141
4102fb4ea781 updated for version 7.0002 vimboss parents: 7 diff changeset	3142 /*
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3143 * If currently in the quickfix window, find another window to show the
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3144 * file in.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3145 */
26 404aac550f35 updated for version 7.0017 vimboss parents: 17 diff changeset	3146 if (bt_quickfix(curbuf) && !opened_window)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3147 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3148 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3149 * If there is no file specified, we don't know where to go.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3150 * But do advance, otherwise ":cn" gets stuck.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3151 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3152 if (qf_ptr->qf_fnum == 0)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3153 goto theend;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3154
12503 4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3155 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	3156 goto failed;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3157 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3158
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3159 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3160 * If there is a file name,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3161 * read the wanted file if needed, and check autowrite etc.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3162 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3163 old_curbuf = curbuf;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3164 old_lnum = curwin->w_cursor.lnum;
9 4102fb4ea781 updated for version 7.0002 vimboss parents: 7 diff changeset	3165
4102fb4ea781 updated for version 7.0002 vimboss parents: 7 diff changeset	3166 if (qf_ptr->qf_fnum != 0)
4102fb4ea781 updated for version 7.0002 vimboss parents: 7 diff changeset	3167 {
12503 4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3168 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	3169
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3170 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	3171 &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	3172 if (abort)
8605 536b9b88d1ca commit https://github.com/vim/vim/commit/0899d698030ec076eb26352cda1ea334ab0819d9 Christian Brabandt <cb@256bit.org> parents: 8603 diff changeset	3173 {
12503 4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3174 qi = NULL;
4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3175 qf_ptr = NULL;
8605 536b9b88d1ca commit https://github.com/vim/vim/commit/0899d698030ec076eb26352cda1ea334ab0819d9 Christian Brabandt <cb@256bit.org> parents: 8603 diff changeset	3176 }
9 4102fb4ea781 updated for version 7.0002 vimboss parents: 7 diff changeset	3177 }
4102fb4ea781 updated for version 7.0002 vimboss parents: 7 diff changeset	3178
12503 4d40b2644e92 patch 8.0.1130: the qf_jump() function is still too long Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	3179 if (retval == OK)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3180 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3181 /* When not switched to another buffer, still need to set pc mark */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3182 if (curbuf == old_curbuf)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3183 setpcmark();
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3184
14250 ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	3185 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	3186 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	3187 qf_ptr->qf_viscol, qf_ptr->qf_pattern);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3188
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3189 #ifdef FEAT_FOLDING
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3190 if ((fdo_flags & FDO_QUICKFIX) && old_KeyTyped)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3191 foldOpenCursor();
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3192 #endif
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3193 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	3194 qf_jump_print_msg(qi, qf_index, qf_ptr, old_curbuf, old_lnum);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3195 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3196 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3197 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3198 if (opened_window)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3199 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	3200 if (qf_ptr != NULL && qf_ptr->qf_fnum != 0)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3201 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3202 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3203 * Couldn't open file, so put index back where it was. This could
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3204 * happen if the file was readonly and we changed something.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3205 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3206 failed:
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3207 qf_ptr = old_qf_ptr;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3208 qf_index = old_qf_index;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3209 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3210 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3211 theend:
8605 536b9b88d1ca commit https://github.com/vim/vim/commit/0899d698030ec076eb26352cda1ea334ab0819d9 Christian Brabandt <cb@256bit.org> parents: 8603 diff changeset	3212 if (qi != NULL)
536b9b88d1ca commit https://github.com/vim/vim/commit/0899d698030ec076eb26352cda1ea334ab0819d9 Christian Brabandt <cb@256bit.org> parents: 8603 diff changeset	3213 {
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3214 qfl->qf_ptr = qf_ptr;
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3215 qfl->qf_index = qf_index;
8605 536b9b88d1ca commit https://github.com/vim/vim/commit/0899d698030ec076eb26352cda1ea334ab0819d9 Christian Brabandt <cb@256bit.org> parents: 8603 diff changeset	3216 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3217 if (p_swb != old_swb && opened_window)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3218 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3219 /* Restore old 'switchbuf' value, but not when an autocommand or
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3220 * modeline has changed the value. */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3221 if (p_swb == empty_option)
1621 82b5078be2dd updated for version 7.2a vimboss parents: 1571 diff changeset	3222 {
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3223 p_swb = old_swb;
1621 82b5078be2dd updated for version 7.2a vimboss parents: 1571 diff changeset	3224 swb_flags = old_swb_flags;
82b5078be2dd updated for version 7.2a vimboss parents: 1571 diff changeset	3225 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3226 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3227 free_string_option(old_swb);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3228 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3229 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3230
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3231 /*
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3232 * 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	3233 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3234 static int qfFileAttr;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3235 static int qfSepAttr;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3236 static int qfLineAttr;
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 /*
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3239 * 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	3240 * Used by ":clist/:llist" commands.
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3241 * 'cursel' will be set to TRUE for the currently selected entry in the
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3242 * quickfix list.
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3243 */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3244 static void
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3245 qf_list_entry(qfline_T *qfp, int qf_idx, int cursel)
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3246 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3247 char_u *fname;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3248 buf_T *buf;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3249 int filter_entry;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3250
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3251 fname = NULL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3252 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	3253 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	3254 (char *)qfp->qf_module);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3255 else {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3256 if (qfp->qf_fnum != 0
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3257 && (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	3258 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3259 fname = buf->b_fname;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3260 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	3261 fname = gettail(fname);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3262 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3263 if (fname == NULL)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3264 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	3265 else
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3266 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	3267 qf_idx, (char *)fname);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3268 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3269
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3270 // 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	3271 // 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	3272 // text of the entry.
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3273 filter_entry = TRUE;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3274 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	3275 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	3276 if (filter_entry && fname != NULL)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3277 filter_entry &= message_filtered(fname);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3278 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	3279 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	3280 if (filter_entry)
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_text);
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 return;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3284
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3285 msg_putchar('\n');
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3286 msg_outtrans_attr(IObuff, cursel ? HL_ATTR(HLF_QFL) : qfFileAttr);
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3287
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3288 if (qfp->qf_lnum != 0)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3289 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	3290 if (qfp->qf_lnum == 0)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3291 IObuff[0] = NUL;
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3292 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	3293 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	3294 else
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3295 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	3296 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	3297 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	3298 (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	3299 msg_puts_attr(IObuff, qfLineAttr);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3300 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	3301 if (qfp->qf_pattern != NULL)
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3302 {
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3303 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	3304 msg_puts(IObuff);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3305 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	3306 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3307 msg_puts((char_u *)" ");
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3308
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3309 /* 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	3310 * 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	3311 * with ^^^^. */
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3312 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	3313 ? 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	3314 IObuff, IOSIZE);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3315 msg_prt_line(IObuff, FALSE);
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3316 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	3317 }
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3318
1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	3319 /*
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3320 * ":clist": list all errors
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3321 * ":llist": list all locations
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3322 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3323 void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	3324 qf_list(exarg_T *eap)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3325 {
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3326 qf_list_T *qfl;
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	3327 qfline_T *qfp;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	3328 int i;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	3329 int idx1 = 1;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	3330 int idx2 = -1;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	3331 char_u *arg = eap->arg;
9379 b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3332 int plus = FALSE;
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	3333 int all = eap->forceit; /* if not :cl!, only show
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3334 recognised errors */
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3335 qf_info_T *qi = &ql_info;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3336
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	3337 if (is_loclist_cmd(eap->cmdidx))
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3338 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3339 qi = GET_LOC_LIST(curwin);
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3340 if (qi == NULL)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3341 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3342 EMSG(_(e_loclist));
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3343 return;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3344 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3345 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3346
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3347 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	3348 \|\| qf_list_empty(qi, qi->qf_curlist))
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3349 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3350 EMSG(_(e_quickfix));
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3351 return;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3352 }
9379 b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3353 if (*arg == '+')
b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3354 {
b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3355 ++arg;
b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3356 plus = TRUE;
b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3357 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3358 if (!get_list_range(&arg, &idx1, &idx2) \|\| *arg != NUL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3359 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3360 EMSG(_(e_trailing));
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3361 return;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3362 }
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3363 qfl = &qi->qf_lists[qi->qf_curlist];
9379 b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3364 if (plus)
b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3365 {
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3366 i = qfl->qf_index;
9379 b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3367 idx2 = i + idx1;
b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3368 idx1 = i;
b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3369 }
b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3370 else
b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3371 {
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3372 i = qfl->qf_count;
9379 b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3373 if (idx1 < 0)
b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3374 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	3375 if (idx2 < 0)
b398e4e12751 commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb Christian Brabandt <cb@256bit.org> parents: 9369 diff changeset	3376 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	3377 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3378
13819 31bb8e1f7625 patch 8.0.1781: file names in quickfix window are not shortened Christian Brabandt <cb@256bit.org> parents: 13802 diff changeset	3379 /* 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	3380 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	3381
12912 888441e8fbb0 patch 8.0.1332: highlighting in quickfix window could be better Christian Brabandt <cb@256bit.org> parents: 12531 diff changeset	3382 /*
888441e8fbb0 patch 8.0.1332: highlighting in quickfix window could be better Christian Brabandt <cb@256bit.org> parents: 12531 diff changeset	3383 * 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	3384 * 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	3385 */
888441e8fbb0 patch 8.0.1332: highlighting in quickfix window could be better Christian Brabandt <cb@256bit.org> parents: 12531 diff changeset	3386 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	3387 if (qfFileAttr == 0)
888441e8fbb0 patch 8.0.1332: highlighting in quickfix window could be better Christian Brabandt <cb@256bit.org> parents: 12531 diff changeset	3388 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	3389 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	3390 if (qfSepAttr == 0)
888441e8fbb0 patch 8.0.1332: highlighting in quickfix window could be better Christian Brabandt <cb@256bit.org> parents: 12531 diff changeset	3391 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	3392 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	3393 if (qfLineAttr == 0)
888441e8fbb0 patch 8.0.1332: highlighting in quickfix window could be better Christian Brabandt <cb@256bit.org> parents: 12531 diff changeset	3394 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	3395
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3396 if (qfl->qf_nonevalid)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3397 all = TRUE;
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3398 qfp = qfl->qf_start;
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3399 for (i = 1; !got_int && i <= qfl->qf_count; )
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3400 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3401 if ((qfp->qf_valid \|\| all) && idx1 <= i && i <= idx2)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3402 {
2047 85da03763130 updated for version 7.2.333 Bram Moolenaar <bram@zimbu.org> parents: 1918 diff changeset	3403 if (got_int)
85da03763130 updated for version 7.2.333 Bram Moolenaar <bram@zimbu.org> parents: 1918 diff changeset	3404 break;
446 7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	3405
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3406 qf_list_entry(qfp, i, i == qfl->qf_index);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3407 }
446 7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	3408
7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	3409 qfp = qfp->qf_next;
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	3410 if (qfp == NULL)
543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	3411 break;
446 7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	3412 ++i;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3413 ui_breakcheck();
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3414 }
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 * Remove newlines and leading whitespace from an error message.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3419 * Put the result in "buf[bufsize]".
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3420 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3421 static void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	3422 qf_fmt_text(char_u text, char_u buf, int bufsize)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3423 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3424 int i;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3425 char_u *p = text;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3426
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3427 for (i = 0; *p != NUL && i < bufsize - 1; ++i)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3428 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3429 if (*p == '\n')
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3430 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3431 buf[i] = ' ';
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3432 while (*++p != NUL)
11129 f4ea50924c6d patch 8.0.0452: some macros are in lower case Christian Brabandt <cb@256bit.org> parents: 11063 diff changeset	3433 if (!VIM_ISWHITE(p) && p != '\n')
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3434 break;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3435 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3436 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3437 buf[i] = *p++;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3438 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3439 buf[i] = NUL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3440 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3441
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	3442 /*
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	3443 * 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	3444 * quickfix/location list.
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	3445 */
9538 26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3446 static void
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3447 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	3448 {
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3449 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	3450 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	3451 char_u buf[IOSIZE];
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3452
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3453 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	3454 lead,
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3455 which + 1,
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3456 qi->qf_listcount,
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3457 count);
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3458
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3459 if (title != NULL)
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3460 {
9579 2fb7e008ac9b commit https://github.com/vim/vim/commit/16ec3c9be3fcdc38530bddb12978bc5a7b98c0f6 Christian Brabandt <cb@256bit.org> parents: 9573 diff changeset	3461 size_t len = STRLEN(buf);
2fb7e008ac9b commit https://github.com/vim/vim/commit/16ec3c9be3fcdc38530bddb12978bc5a7b98c0f6 Christian Brabandt <cb@256bit.org> parents: 9573 diff changeset	3462
2fb7e008ac9b commit https://github.com/vim/vim/commit/16ec3c9be3fcdc38530bddb12978bc5a7b98c0f6 Christian Brabandt <cb@256bit.org> parents: 9573 diff changeset	3463 if (len < 34)
2fb7e008ac9b commit https://github.com/vim/vim/commit/16ec3c9be3fcdc38530bddb12978bc5a7b98c0f6 Christian Brabandt <cb@256bit.org> parents: 9573 diff changeset	3464 {
2fb7e008ac9b commit https://github.com/vim/vim/commit/16ec3c9be3fcdc38530bddb12978bc5a7b98c0f6 Christian Brabandt <cb@256bit.org> parents: 9573 diff changeset	3465 vim_memset(buf + len, ' ', 34 - len);
2fb7e008ac9b commit https://github.com/vim/vim/commit/16ec3c9be3fcdc38530bddb12978bc5a7b98c0f6 Christian Brabandt <cb@256bit.org> parents: 9573 diff changeset	3466 buf[34] = NUL;
2fb7e008ac9b commit https://github.com/vim/vim/commit/16ec3c9be3fcdc38530bddb12978bc5a7b98c0f6 Christian Brabandt <cb@256bit.org> parents: 9573 diff changeset	3467 }
2fb7e008ac9b commit https://github.com/vim/vim/commit/16ec3c9be3fcdc38530bddb12978bc5a7b98c0f6 Christian Brabandt <cb@256bit.org> parents: 9573 diff changeset	3468 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	3469 }
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3470 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	3471 msg(buf);
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3472 }
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3473
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3474 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3475 * ":colder [count]": Up in the quickfix stack.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3476 * ":cnewer [count]": Down in the quickfix stack.
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3477 * ":lolder [count]": Up in the location list stack.
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3478 * ":lnewer [count]": Down in the location list stack.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3479 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3480 void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	3481 qf_age(exarg_T *eap)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3482 {
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3483 qf_info_T *qi = &ql_info;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3484 int count;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3485
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	3486 if (is_loclist_cmd(eap->cmdidx))
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3487 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3488 qi = GET_LOC_LIST(curwin);
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3489 if (qi == NULL)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3490 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3491 EMSG(_(e_loclist));
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3492 return;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3493 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3494 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3495
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3496 if (eap->addr_count != 0)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3497 count = eap->line2;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3498 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3499 count = 1;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3500 while (count--)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3501 {
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3502 if (eap->cmdidx == CMD_colder \|\| eap->cmdidx == CMD_lolder)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3503 {
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3504 if (qi->qf_curlist == 0)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3505 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3506 EMSG(_("E380: At bottom of quickfix stack"));
4371 000bb500208d updated for version 7.3.934 Bram Moolenaar <bram@vim.org> parents: 4352 diff changeset	3507 break;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3508 }
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3509 --qi->qf_curlist;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3510 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3511 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3512 {
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3513 if (qi->qf_curlist >= qi->qf_listcount - 1)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3514 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3515 EMSG(_("E381: At top of quickfix stack"));
4371 000bb500208d updated for version 7.3.934 Bram Moolenaar <bram@vim.org> parents: 4352 diff changeset	3516 break;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3517 }
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3518 ++qi->qf_curlist;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3519 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3520 }
9538 26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3521 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	3522 qf_update_buffer(qi, NULL);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3523 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3524
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	3525 /*
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	3526 * 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	3527 */
9538 26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3528 void
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3529 qf_history(exarg_T *eap)
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3530 {
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3531 qf_info_T *qi = &ql_info;
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3532 int i;
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3533
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	3534 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	3535 qi = GET_LOC_LIST(curwin);
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3536 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	3537 && 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	3538 MSG(_("No entries"));
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3539 else
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3540 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	3541 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	3542 }
26da1efa9e46 commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954 Christian Brabandt <cb@256bit.org> parents: 9534 diff changeset	3543
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3544 /*
11549 f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	3545 * 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	3546 * associated with the list like context and title are not freed.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3547 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3548 static void
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3549 qf_free_items(qf_list_T *qfl)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3550 {
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	3551 qfline_T *qfp;
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	3552 qfline_T *qfpnext;
3982 4934eb2e22dc updated for version 7.3.746 Bram Moolenaar <bram@vim.org> parents: 3974 diff changeset	3553 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	3554
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 while (qfl->qf_count && qfl->qf_start != NULL)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3556 {
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	3557 qfp = qfl->qf_start;
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	3558 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	3559 if (!stop)
3949 37a4cacd2051 updated for version 7.3.730 Bram Moolenaar <bram@vim.org> parents: 3939 diff changeset	3560 {
13821 98274127d675 patch 8.0.1782: no simple way to label quickfix entries Christian Brabandt <cb@256bit.org> parents: 13819 diff changeset	3561 vim_free(qfp->qf_module);
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	3562 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	3563 vim_free(qfp->qf_pattern);
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	3564 stop = (qfp == qfpnext);
543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	3565 vim_free(qfp);
3982 4934eb2e22dc updated for version 7.3.746 Bram Moolenaar <bram@vim.org> parents: 3974 diff changeset	3566 if (stop)
4934eb2e22dc updated for version 7.3.746 Bram Moolenaar <bram@vim.org> parents: 3974 diff changeset	3567 /* 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	3568 * to avoid crashing when it's wrong.
4934eb2e22dc updated for version 7.3.746 Bram Moolenaar <bram@vim.org> parents: 3974 diff changeset	3569 * 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	3570 qfl->qf_count = 1;
3949 37a4cacd2051 updated for version 7.3.730 Bram Moolenaar <bram@vim.org> parents: 3939 diff changeset	3571 }
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_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	3573 --qfl->qf_count;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3574 }
11549 f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	3575
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	3576 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	3577 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	3578 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	3579 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	3580 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	3581
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 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	3583 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	3584 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	3585 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	3586 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	3587 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	3588 qfl->qf_multiscan = FALSE;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3589 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3590
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3591 /*
11549 f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	3592 * 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	3593 * 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	3594 */
f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	3595 static void
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3596 qf_free(qf_list_T *qfl)
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3597 {
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3598 qf_free_items(qfl);
11549 f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	3599
13244 ac42c4b11dbc patch 8.0.1496: clearing a pointer takes two lines Christian Brabandt <cb@256bit.org> parents: 13115 diff changeset	3600 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	3601 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	3602 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	3603 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	3604 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	3605 }
f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	3606
f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	3607 /*
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3608 * qf_mark_adjust: adjust marks
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3609 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3610 void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	3611 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	3612 win_T *wp,
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	3613 linenr_T line1,
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	3614 linenr_T line2,
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	3615 long amount,
7a743053dfd6 patch 8.0.1104: the qf_jump() function is too long Christian Brabandt <cb@256bit.org> parents: 12427 diff changeset	3616 long amount_after)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3617 {
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	3618 int i;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	3619 qfline_T *qfp;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	3620 int idx;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3621 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	3622 int found_one = FALSE;
9608 fa64afb99dda commit https://github.com/vim/vim/commit/c1542744e788d96fed24dd421f43009288092504 Christian Brabandt <cb@256bit.org> parents: 9579 diff changeset	3623 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	3624
fa64afb99dda commit https://github.com/vim/vim/commit/c1542744e788d96fed24dd421f43009288092504 Christian Brabandt <cb@256bit.org> parents: 9579 diff changeset	3625 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	3626 return;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3627 if (wp != NULL)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3628 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3629 if (wp->w_llist == NULL)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3630 return;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3631 qi = wp->w_llist;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3632 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3633
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3634 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	3635 if (!qf_list_empty(qi, idx))
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3636 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	3637 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	3638 ++i, qfp = qfp->qf_next)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3639 if (qfp->qf_fnum == curbuf->b_fnum)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3640 {
9201 692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	3641 found_one = TRUE;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3642 if (qfp->qf_lnum >= line1 && qfp->qf_lnum <= line2)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3643 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3644 if (amount == MAXLNUM)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3645 qfp->qf_cleared = TRUE;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3646 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3647 qfp->qf_lnum += amount;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3648 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3649 else if (amount_after && qfp->qf_lnum > line2)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3650 qfp->qf_lnum += amount_after;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3651 }
9201 692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	3652
692e156c7023 commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3 Christian Brabandt <cb@256bit.org> parents: 9197 diff changeset	3653 if (!found_one)
9608 fa64afb99dda commit https://github.com/vim/vim/commit/c1542744e788d96fed24dd421f43009288092504 Christian Brabandt <cb@256bit.org> parents: 9579 diff changeset	3654 curbuf->b_has_qf_entry &= ~buf_has_flag;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3655 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3656
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3657 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3658 * Make a nice message out of the error character and the error number:
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3659 * char number message
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3660 * e or E 0 " error"
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3661 * w or W 0 " warning"
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3662 * i or I 0 " info"
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3663 * 0 0 ""
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3664 * other 0 " c"
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3665 * e or E n " error n"
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3666 * w or W n " warning n"
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3667 * i or I n " info n"
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3668 * 0 n " error n"
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3669 * other n " c n"
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3670 * 1 x "" :helpgrep
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3671 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3672 static char_u *
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	3673 qf_types(int c, int nr)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3674 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3675 static char_u buf[20];
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3676 static char_u cc[3];
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3677 char_u *p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3678
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3679 if (c == 'W' \|\| c == 'w')
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3680 p = (char_u *)" warning";
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3681 else if (c == 'I' \|\| c == 'i')
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3682 p = (char_u *)" info";
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3683 else if (c == 'E' \|\| c == 'e' \|\| (c == 0 && nr > 0))
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3684 p = (char_u *)" error";
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3685 else if (c == 0 \|\| c == 1)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3686 p = (char_u *)"";
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3687 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3688 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3689 cc[0] = ' ';
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3690 cc[1] = c;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3691 cc[2] = NUL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3692 p = cc;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3693 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3694
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3695 if (nr <= 0)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3696 return p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3697
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3698 sprintf((char )buf, "%s %3d", (char )p, nr);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3699 return buf;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3700 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3701
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3702 /*
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	3703 * 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	3704 * 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	3705 */
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	3706 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	3707 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	3708 {
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 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	3710
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 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	3712 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	3713
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 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	3715 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	3716
14491 9df0fcbfebb2 patch 8.1.0259: no test for fixed quickfix issue Christian Brabandt <cb@256bit.org> parents: 14477 diff changeset	3717 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	3718 {
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 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	3720 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	3721 }
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 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	3724 {
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 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	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 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	3728 (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	3729 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	3730 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	3731 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	3732 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	3733 }
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
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 *)(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	3736 }
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 /*
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3739 * ":cwindow": open the quickfix window if we have errors to display,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3740 * close it if not.
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3741 * ":lwindow": open the location list window if we have locations to display,
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3742 * close it if not.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3743 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3744 void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	3745 ex_cwindow(exarg_T *eap)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3746 {
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3747 qf_info_T *qi = &ql_info;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3748 win_T *win;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3749
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	3750 if (is_loclist_cmd(eap->cmdidx))
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3751 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3752 qi = GET_LOC_LIST(curwin);
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3753 if (qi == NULL)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3754 return;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3755 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3756
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3757 /* Look for an existing quickfix window. */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3758 win = qf_find_win(qi);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3759
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3760 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3761 * If a quickfix window is open but we have no errors to display,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3762 * close the window. If a quickfix window is not open, then open
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3763 * it if we have errors; otherwise, leave it closed.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3764 */
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3765 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	3766 \|\| qf_list_empty(qi, qi->qf_curlist)
857 b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	3767 \|\| qi->qf_curlist >= qi->qf_listcount)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3768 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3769 if (win != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3770 ex_cclose(eap);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3771 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3772 else if (win == NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3773 ex_copen(eap);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3774 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3775
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3776 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3777 * ":cclose": close the window showing the list of errors.
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3778 * ":lclose": close the window showing the location list
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3779 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3780 void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	3781 ex_cclose(exarg_T *eap)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3782 {
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3783 win_T *win = NULL;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3784 qf_info_T *qi = &ql_info;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3785
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	3786 if (is_loclist_cmd(eap->cmdidx))
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3787 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3788 qi = GET_LOC_LIST(curwin);
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3789 if (qi == NULL)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3790 return;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3791 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3792
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3793 /* Find existing quickfix window and close it. */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3794 win = qf_find_win(qi);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3795 if (win != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3796 win_close(win, FALSE);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3797 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3798
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3799 /*
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3800 * Set "w:quickfix_title" if "qi" has a title.
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3801 */
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3802 static void
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3803 qf_set_title_var(qf_list_T *qfl)
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3804 {
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3805 if (qfl->qf_title != NULL)
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3806 set_internal_string_var((char_u *)"w:quickfix_title", qfl->qf_title);
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3807 }
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3808
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3809 /*
14796 74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3810 * Goto a quickfix or location list window (if present).
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3811 * Returns OK if the window is found, FAIL otherwise.
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3812 */
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3813 static int
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3814 qf_goto_cwindow(qf_info_T *qi, int resize, int sz, int vertsplit)
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3815 {
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3816 win_T *win;
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3817
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3818 win = qf_find_win(qi);
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3819 if (win == NULL)
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3820 return FAIL;
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3821
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3822 win_goto(win);
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3823 if (resize)
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3824 {
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3825 if (vertsplit)
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3826 {
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3827 if (sz != win->w_width)
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3828 win_setwidth(sz);
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3829 }
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3830 else if (sz != win->w_height)
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3831 win_setheight(sz);
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3832 }
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3833
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3834 return OK;
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3835 }
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3836
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3837 /*
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3838 * Open a new quickfix or location list window, load the quickfix buffer and
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3839 * set the appropriate options for the window.
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3840 * Returns FAIL if the window could not be opened.
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3841 */
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3842 static int
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3843 qf_open_new_cwindow(qf_info_T *qi, int height)
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3844 {
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3845 buf_T *qf_buf;
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3846 win_T *oldwin = curwin;
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3847 tabpage_T *prevtab = curtab;
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3848 int flags = 0;
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3849 win_T *win;
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3850
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3851 qf_buf = qf_find_buf(qi);
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3852
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3853 // The current window becomes the previous window afterwards.
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3854 win = curwin;
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3855
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3856 if (IS_QF_STACK(qi) && cmdmod.split == 0)
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3857 // Create the new quickfix window at the very bottom, except when
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3858 // :belowright or :aboveleft is used.
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3859 win_goto(lastwin);
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3860 // Default is to open the window below the current window
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3861 if (cmdmod.split == 0)
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3862 flags = WSP_BELOW;
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3863 flags \|= WSP_NEWLOC;
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3864 if (win_split(height, flags) == FAIL)
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3865 return FAIL; // not enough room for window
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3866 RESET_BINDING(curwin);
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3867
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3868 if (IS_LL_STACK(qi))
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3869 {
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3870 // For the location list window, create a reference to the
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3871 // location list from the window 'win'.
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3872 curwin->w_llist_ref = win->w_llist;
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3873 win->w_llist->qf_refcount++;
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3874 }
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3875
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3876 if (oldwin != curwin)
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3877 oldwin = NULL; // don't store info when in another window
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3878 if (qf_buf != NULL)
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3879 {
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3880 // Use the existing quickfix buffer
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3881 (void)do_ecmd(qf_buf->b_fnum, NULL, NULL, NULL, ECMD_ONE,
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3882 ECMD_HIDE + ECMD_OLDBUF, oldwin);
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3883 }
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3884 else
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3885 {
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3886 // Create a new quickfix buffer
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3887 (void)do_ecmd(0, NULL, NULL, NULL, ECMD_ONE, ECMD_HIDE, oldwin);
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3888
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3889 // switch off 'swapfile'
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3890 set_option_value((char_u *)"swf", 0L, NULL, OPT_LOCAL);
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3891 set_option_value((char_u )"bt", 0L, (char_u )"quickfix",
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3892 OPT_LOCAL);
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3893 set_option_value((char_u )"bh", 0L, (char_u )"wipe", OPT_LOCAL);
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3894 RESET_BINDING(curwin);
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3895 #ifdef FEAT_DIFF
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3896 curwin->w_p_diff = FALSE;
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3897 #endif
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3898 #ifdef FEAT_FOLDING
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3899 set_option_value((char_u )"fdm", 0L, (char_u )"manual",
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3900 OPT_LOCAL);
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3901 #endif
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3902 }
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3903
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3904 // Only set the height when still in the same tab page and there is no
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3905 // window to the side.
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3906 if (curtab == prevtab && curwin->w_width == Columns)
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3907 win_setheight(height);
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3908 curwin->w_p_wfh = TRUE; // set 'winfixheight'
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3909 if (win_valid(win))
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3910 prevwin = win;
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3911
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3912 return OK;
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3913 }
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3914
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3915 /*
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3916 * ":copen": open a window that shows the list of errors.
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3917 * ":lopen": open a window that shows the location list.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3918 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3919 void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	3920 ex_copen(exarg_T *eap)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3921 {
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3922 qf_info_T *qi = &ql_info;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3923 int height;
14796 74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3924 int status = FAIL;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3925
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	3926 if (is_loclist_cmd(eap->cmdidx))
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3927 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3928 qi = GET_LOC_LIST(curwin);
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3929 if (qi == NULL)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3930 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3931 EMSG(_(e_loclist));
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3932 return;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3933 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3934 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3935
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3936 if (eap->addr_count != 0)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3937 height = eap->line2;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3938 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3939 height = QF_WINHEIGHT;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3940
14796 74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3941 reset_VIsual_and_resel(); // stop Visual mode
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3942 #ifdef FEAT_GUI
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3943 need_mouse_correct = TRUE;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3944 #endif
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3945
14796 74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3946 // Find an existing quickfix window, or open a new one.
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3947 if (cmdmod.tab == 0)
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3948 status = qf_goto_cwindow(qi, eap->addr_count != 0, height,
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3949 cmdmod.split & WSP_VERT);
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3950 if (status == FAIL)
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3951 if (qf_open_new_cwindow(qi, height) == FAIL)
74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3952 return;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3953
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	3954 qf_set_title_var(&qi->qf_lists[qi->qf_curlist]);
6793 e1d59836eecc patch 7.4.718 Bram Moolenaar <bram@vim.org> parents: 6721 diff changeset	3955
14796 74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3956 // Fill the buffer with the quickfix list.
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	3957 qf_fill_buffer(qi, curbuf, NULL);
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3958
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	3959 curwin->w_cursor.lnum = qi->qf_lists[qi->qf_curlist].qf_index;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3960 curwin->w_cursor.col = 0;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3961 check_cursor();
14796 74fd69162d50 patch 8.1.0410: the ex_copen() function is too long Christian Brabandt <cb@256bit.org> parents: 14790 diff changeset	3962 update_topline(); // scroll to show the line
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3963 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3964
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3965 /*
9432 abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3966 * 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	3967 */
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3968 static void
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3969 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	3970 {
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3971 win_T *old_curwin = curwin;
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3972
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3973 curwin = win;
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3974 curbuf = win->w_buffer;
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3975 curwin->w_cursor.lnum = lnum;
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3976 curwin->w_cursor.col = 0;
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3977 #ifdef FEAT_VIRTUALEDIT
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3978 curwin->w_cursor.coladd = 0;
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3979 #endif
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3980 curwin->w_curswant = 0;
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3981 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	3982 redraw_later(VALID);
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3983 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	3984 curwin = old_curwin;
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3985 curbuf = curwin->w_buffer;
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3986 }
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3987
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3988 /*
9458 374afcf9d11d commit https://github.com/vim/vim/commit/537ef08408c50e0c4104d57f74993b3b0ed9560d Christian Brabandt <cb@256bit.org> parents: 9432 diff changeset	3989 * :cbottom/:lbottom commands.
9432 abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3990 */
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3991 void
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	3992 ex_cbottom(exarg_T *eap)
9432 abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	3993 {
9458 374afcf9d11d commit https://github.com/vim/vim/commit/537ef08408c50e0c4104d57f74993b3b0ed9560d Christian Brabandt <cb@256bit.org> parents: 9432 diff changeset	3994 qf_info_T *qi = &ql_info;
374afcf9d11d commit https://github.com/vim/vim/commit/537ef08408c50e0c4104d57f74993b3b0ed9560d Christian Brabandt <cb@256bit.org> parents: 9432 diff changeset	3995 win_T *win;
374afcf9d11d commit https://github.com/vim/vim/commit/537ef08408c50e0c4104d57f74993b3b0ed9560d Christian Brabandt <cb@256bit.org> parents: 9432 diff changeset	3996
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	3997 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	3998 {
374afcf9d11d commit https://github.com/vim/vim/commit/537ef08408c50e0c4104d57f74993b3b0ed9560d Christian Brabandt <cb@256bit.org> parents: 9432 diff changeset	3999 qi = GET_LOC_LIST(curwin);
374afcf9d11d commit https://github.com/vim/vim/commit/537ef08408c50e0c4104d57f74993b3b0ed9560d Christian Brabandt <cb@256bit.org> parents: 9432 diff changeset	4000 if (qi == NULL)
374afcf9d11d commit https://github.com/vim/vim/commit/537ef08408c50e0c4104d57f74993b3b0ed9560d Christian Brabandt <cb@256bit.org> parents: 9432 diff changeset	4001 {
374afcf9d11d commit https://github.com/vim/vim/commit/537ef08408c50e0c4104d57f74993b3b0ed9560d Christian Brabandt <cb@256bit.org> parents: 9432 diff changeset	4002 EMSG(_(e_loclist));
374afcf9d11d commit https://github.com/vim/vim/commit/537ef08408c50e0c4104d57f74993b3b0ed9560d Christian Brabandt <cb@256bit.org> parents: 9432 diff changeset	4003 return;
374afcf9d11d commit https://github.com/vim/vim/commit/537ef08408c50e0c4104d57f74993b3b0ed9560d Christian Brabandt <cb@256bit.org> parents: 9432 diff changeset	4004 }
374afcf9d11d commit https://github.com/vim/vim/commit/537ef08408c50e0c4104d57f74993b3b0ed9560d Christian Brabandt <cb@256bit.org> parents: 9432 diff changeset	4005 }
374afcf9d11d commit https://github.com/vim/vim/commit/537ef08408c50e0c4104d57f74993b3b0ed9560d Christian Brabandt <cb@256bit.org> parents: 9432 diff changeset	4006
374afcf9d11d commit https://github.com/vim/vim/commit/537ef08408c50e0c4104d57f74993b3b0ed9560d Christian Brabandt <cb@256bit.org> parents: 9432 diff changeset	4007 win = qf_find_win(qi);
9432 abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4008 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	4009 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	4010 }
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4011
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4012 /*
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4013 * Return the number of the current entry (line number in the quickfix
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4014 * window).
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4015 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4016 linenr_T
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4017 qf_current_entry(win_T *wp)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4018 {
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4019 qf_info_T *qi = &ql_info;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4020
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4021 if (IS_LL_WINDOW(wp))
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4022 /* In the location list window, use the referenced location list */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4023 qi = wp->w_llist_ref;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4024
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4025 return qi->qf_lists[qi->qf_curlist].qf_index;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4026 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4027
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4028 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4029 * Update the cursor position in the quickfix window to the current error.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4030 * Return TRUE if there is a quickfix window.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4031 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4032 static int
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4033 qf_win_pos_update(
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4034 qf_info_T *qi,
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4035 int old_qf_index) /* previous qf_index or zero */
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4036 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4037 win_T *win;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4038 int qf_index = qi->qf_lists[qi->qf_curlist].qf_index;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4039
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4040 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4041 * Put the cursor on the current error in the quickfix window, so that
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4042 * it's viewable.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4043 */
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4044 win = qf_find_win(qi);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4045 if (win != NULL
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4046 && qf_index <= win->w_buffer->b_ml.ml_line_count
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4047 && old_qf_index != qf_index)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4048 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4049 if (qf_index > old_qf_index)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4050 {
9432 abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4051 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	4052 win->w_redraw_bot = qf_index;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4053 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4054 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4055 {
9432 abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4056 win->w_redraw_top = qf_index;
abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4057 win->w_redraw_bot = old_qf_index;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4058 }
9432 abb72f0b9e06 commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263 Christian Brabandt <cb@256bit.org> parents: 9397 diff changeset	4059 qf_win_goto(win, qf_index);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4060 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4061 return win != NULL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4062 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4063
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4064 /*
859 99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4065 * Check whether the given window is displaying the specified quickfix/location
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	4066 * stack.
859 99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4067 */
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4068 static int
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4069 is_qf_win(win_T win, qf_info_T qi)
859 99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4070 {
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4071 /*
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4072 * A window displaying the quickfix buffer will have the w_llist_ref field
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4073 * set to NULL.
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4074 * A window displaying a location list buffer will have the w_llist_ref
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4075 * pointing to the location list.
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4076 */
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4077 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	4078 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	4079 \|\| (IS_LL_STACK(qi) && win->w_llist_ref == qi))
859 99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4080 return TRUE;
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4081
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4082 return FALSE;
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4083 }
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4084
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4085 /*
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	4086 * Find a window displaying the quickfix/location stack 'qi'
13115 9812a9ca3ab2 patch 8.0.1432: after ":copen" can't get the window-ID of the quickfix window Christian Brabandt <cb@256bit.org> parents: 13105 diff changeset	4087 * Only searches in the current tabpage.
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4088 */
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4089 static win_T *
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4090 qf_find_win(qf_info_T *qi)
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4091 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4092 win_T *win;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4093
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4094 FOR_ALL_WINDOWS(win)
859 99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4095 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	4096 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	4097 return NULL;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4098 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4099
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4100 /*
859 99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4101 * Find a quickfix buffer.
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4102 * Searches in windows opened in all the tabs.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4103 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4104 static buf_T *
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4105 qf_find_buf(qf_info_T *qi)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4106 {
859 99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4107 tabpage_T *tp;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4108 win_T *win;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4109
859 99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4110 FOR_ALL_TAB_WINDOWS(tp, win)
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4111 if (is_qf_win(win, qi))
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4112 return win->w_buffer;
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4113
99305c4c42d4 updated for version 7.0g02 vimboss parents: 857 diff changeset	4114 return NULL;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4115 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4116
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4117 /*
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4118 * 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	4119 */
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4120 static void
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4121 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	4122 {
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4123 win_T *win;
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4124 win_T *curwin_save;
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4125
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4126 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	4127 {
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4128 curwin_save = curwin;
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4129 curwin = win;
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	4130 qf_set_title_var(&qi->qf_lists[qi->qf_curlist]);
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4131 curwin = curwin_save;
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4132 }
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4133 }
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4134
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4135 /*
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4136 * Find the quickfix buffer. If it exists, update the contents.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4137 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4138 static void
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4139 qf_update_buffer(qf_info_T qi, qfline_T old_last)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4140 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4141 buf_T *buf;
3016 58bba69b3371 updated for version 7.3.280 Bram Moolenaar <bram@vim.org> parents: 3002 diff changeset	4142 win_T *win;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4143 aco_save_T aco;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4144
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4145 /* Check if a buffer for the quickfix list exists. Update it. */
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4146 buf = qf_find_buf(qi);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4147 if (buf != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4148 {
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4149 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	4150
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4151 if (old_last == NULL)
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4152 /* 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	4153 aucmd_prepbuf(&aco, buf);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4154
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	4155 qf_update_win_titlevar(qi);
3016 58bba69b3371 updated for version 7.3.280 Bram Moolenaar <bram@vim.org> parents: 3002 diff changeset	4156
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4157 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	4158 ++CHANGEDTICK(buf);
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4159
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4160 if (old_last == NULL)
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4161 {
8932 25c2031e9f9f commit https://github.com/vim/vim/commit/c1808d5822ed9534ef7f0fe509b15bee92a5cc28 Christian Brabandt <cb@256bit.org> parents: 8751 diff changeset	4162 (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	4163
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4164 /* 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	4165 aucmd_restbuf(&aco);
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4166 }
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4167
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4168 /* 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	4169 * 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	4170 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	4171 redraw_buf_later(buf, NOT_VALID);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4172 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4173 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4174
6793 e1d59836eecc patch 7.4.718 Bram Moolenaar <bram@vim.org> parents: 6721 diff changeset	4175 /*
13992 710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4176 * 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	4177 */
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4178 static int
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4179 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	4180 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4181 int len;
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4182 buf_T *errbuf;
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4183
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4184 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	4185 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4186 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	4187 len = (int)STRLEN(IObuff);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4188 }
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4189 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	4190 && (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	4191 && errbuf->b_fname != NULL)
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4192 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4193 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	4194 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	4195 else
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4196 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4197 /* 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	4198 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	4199 \|\| 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	4200 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4201 if (*dirname == NUL)
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4202 mch_dirname(dirname, MAXPATHL);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4203 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	4204 }
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4205 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	4206 }
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);
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
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4210 len = 0;
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4211 IObuff[len++] = '\|';
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4212
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4213 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	4214 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4215 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	4216 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	4217
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4218 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	4219 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4220 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	4221 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	4222 }
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4223
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4224 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	4225 (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	4226 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	4227 }
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4228 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	4229 {
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4230 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	4231 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	4232 }
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4233 IObuff[len++] = '\|';
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4234 IObuff[len++] = ' ';
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4235
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4236 /* 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	4237 * 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	4238 * mark a word with ^^^^. */
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4239 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	4240 IObuff + len, IOSIZE - len);
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4241
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4242 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	4243 (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	4244 return FAIL;
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4245
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4246 return OK;
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4247 }
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4248
710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4249 /*
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4250 * Fill current buffer with quickfix errors, replacing any previous contents.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4251 * 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	4252 * 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	4253 * 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	4254 * ml_delete() is used and autocommands will be triggered.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4255 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4256 static void
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4257 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	4258 {
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	4259 linenr_T lnum;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	4260 qfline_T *qfp;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	4261 int old_KeyTyped = KeyTyped;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4262
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4263 if (old_last == NULL)
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4264 {
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4265 if (buf != curbuf)
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4266 {
10359 66f1b5bf3fa6 commit https://github.com/vim/vim/commit/95f096030ed1a8afea028f2ea295d6f6a70f466f Christian Brabandt <cb@256bit.org> parents: 10349 diff changeset	4267 internal_error("qf_fill_buffer()");
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4268 return;
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
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4271 /* delete all existing lines */
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4272 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	4273 (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	4274 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4275
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4276 /* Check if there is anything to display */
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4277 if (qi->qf_curlist < qi->qf_listcount)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4278 {
13819 31bb8e1f7625 patch 8.0.1781: file names in quickfix window are not shortened Christian Brabandt <cb@256bit.org> parents: 13802 diff changeset	4279 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	4280
31bb8e1f7625 patch 8.0.1781: file names in quickfix window are not shortened Christian Brabandt <cb@256bit.org> parents: 13802 diff changeset	4281 *dirname = NUL;
31bb8e1f7625 patch 8.0.1781: file names in quickfix window are not shortened Christian Brabandt <cb@256bit.org> parents: 13802 diff changeset	4282
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4283 /* 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	4284 if (old_last == NULL)
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 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	4287 lnum = 0;
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4288 }
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4289 else
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4290 {
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4291 qfp = old_last->qf_next;
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4292 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	4293 }
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4294 while (lnum < qi->qf_lists[qi->qf_curlist].qf_count)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4295 {
13992 710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4296 if (qf_buf_add_line(buf, lnum, qfp, dirname) == FAIL)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4297 break;
13992 710b1bb82f2c patch 8.1.0014: qf_init_ext() is too long Christian Brabandt <cb@256bit.org> parents: 13984 diff changeset	4298
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4299 ++lnum;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4300 qfp = qfp->qf_next;
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	4301 if (qfp == NULL)
543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	4302 break;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4303 }
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4304
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4305 if (old_last == NULL)
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4306 /* 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	4307 (void)ml_delete(lnum + 1, FALSE);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4308 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4309
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4310 /* correct cursor position */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4311 check_lnums(TRUE);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4312
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4313 if (old_last == NULL)
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4314 {
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4315 /* 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	4316 * 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	4317 * using autocommands. */
11589 39787def24bb patch 8.0.0677: setting 'filetype' may switch buffers Christian Brabandt <cb@256bit.org> parents: 11549 diff changeset	4318 ++curbuf_lock;
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4319 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	4320 curbuf->b_p_ma = FALSE;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4321
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4322 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	4323 apply_autocmds(EVENT_BUFREADPOST, (char_u *)"quickfix", NULL,
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4324 FALSE, curbuf);
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4325 apply_autocmds(EVENT_BUFWINENTER, (char_u *)"quickfix", NULL,
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4326 FALSE, curbuf);
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4327 keep_filetype = FALSE;
11589 39787def24bb patch 8.0.0677: setting 'filetype' may switch buffers Christian Brabandt <cb@256bit.org> parents: 11549 diff changeset	4328 --curbuf_lock;
13380 69517d67421f patch 8.0.1564: too many #ifdefs Christian Brabandt <cb@256bit.org> parents: 13252 diff changeset	4329
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4330 /* make sure it will be redrawn */
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4331 redraw_curbuf_later(NOT_VALID);
d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	4332 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4333
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4334 /* Restore KeyTyped, setting 'filetype' may reset it. */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4335 KeyTyped = old_KeyTyped;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4336 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4337
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	4338 /*
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	4339 * 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	4340 */
13062 6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	4341 static void
6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	4342 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	4343 {
6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	4344 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	4345 }
6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	4346
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4347 /*
14250 ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4348 * 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	4349 * 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	4350 */
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4351 static int
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4352 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	4353 {
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4354 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	4355
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4356 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	4357 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	4358 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	4359 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	4360 }
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4361
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4362 /*
14495 178162aeebeb patch 8.1.0261: Coverity complains about a negative array index Christian Brabandt <cb@256bit.org> parents: 14491 diff changeset	4363 * 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	4364 * 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	4365 * 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	4366 * 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	4367 * 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	4368 */
5a10a0020c3e patch 8.1.0267: no good check if restoring quickfix list worked Christian Brabandt <cb@256bit.org> parents: 14495 diff changeset	4369 static int
14495 178162aeebeb patch 8.1.0261: Coverity complains about a negative array index Christian Brabandt <cb@256bit.org> parents: 14491 diff changeset	4370 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	4371 {
178162aeebeb patch 8.1.0261: Coverity complains about a negative array index Christian Brabandt <cb@256bit.org> parents: 14491 diff changeset	4372 int curlist;
178162aeebeb patch 8.1.0261: Coverity complains about a negative array index Christian Brabandt <cb@256bit.org> parents: 14491 diff changeset	4373
178162aeebeb patch 8.1.0261: Coverity complains about a negative array index Christian Brabandt <cb@256bit.org> parents: 14491 diff changeset	4374 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	4375 {
178162aeebeb patch 8.1.0261: Coverity complains about a negative array index Christian Brabandt <cb@256bit.org> parents: 14491 diff changeset	4376 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	4377 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	4378 // 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	4379 return FAIL;
5a10a0020c3e patch 8.1.0267: no good check if restoring quickfix list worked Christian Brabandt <cb@256bit.org> parents: 14495 diff changeset	4380 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	4381 }
5a10a0020c3e patch 8.1.0267: no good check if restoring quickfix list worked Christian Brabandt <cb@256bit.org> parents: 14495 diff changeset	4382 return OK;
14495 178162aeebeb patch 8.1.0261: Coverity complains about a negative array index Christian Brabandt <cb@256bit.org> parents: 14491 diff changeset	4383 }
178162aeebeb patch 8.1.0261: Coverity complains about a negative array index Christian Brabandt <cb@256bit.org> parents: 14491 diff changeset	4384
178162aeebeb patch 8.1.0261: Coverity complains about a negative array index Christian Brabandt <cb@256bit.org> parents: 14491 diff changeset	4385 /*
14469 0211e295835e patch 8.1.0248: duplicated quickfix code Christian Brabandt <cb@256bit.org> parents: 14433 diff changeset	4386 * 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	4387 */
0211e295835e patch 8.1.0248: duplicated quickfix code Christian Brabandt <cb@256bit.org> parents: 14433 diff changeset	4388 static void
0211e295835e patch 8.1.0248: duplicated quickfix code Christian Brabandt <cb@256bit.org> parents: 14433 diff changeset	4389 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	4390 {
14507 5a10a0020c3e patch 8.1.0267: no good check if restoring quickfix list worked Christian Brabandt <cb@256bit.org> parents: 14495 diff changeset	4391 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	4392 return;
5a10a0020c3e patch 8.1.0267: no good check if restoring quickfix list worked Christian Brabandt <cb@256bit.org> parents: 14495 diff changeset	4393
5a10a0020c3e patch 8.1.0267: no good check if restoring quickfix list worked Christian Brabandt <cb@256bit.org> parents: 14495 diff changeset	4394 // 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	4395 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	4396 qf_jump(qi, 0, 0, forceit);
0211e295835e patch 8.1.0248: duplicated quickfix code Christian Brabandt <cb@256bit.org> parents: 14433 diff changeset	4397 }
0211e295835e patch 8.1.0248: duplicated quickfix code Christian Brabandt <cb@256bit.org> parents: 14433 diff changeset	4398
0211e295835e patch 8.1.0248: duplicated quickfix code Christian Brabandt <cb@256bit.org> parents: 14433 diff changeset	4399 /*
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	4400 * Return TRUE when using ":vimgrep" for ":grep".
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	4401 */
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	4402 int
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4403 grep_internal(cmdidx_T cmdidx)
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	4404 {
661 e93a99ef31d0 updated for version 7.0195 vimboss parents: 659 diff changeset	4405 return ((cmdidx == CMD_grep
e93a99ef31d0 updated for version 7.0195 vimboss parents: 659 diff changeset	4406 \|\| cmdidx == CMD_lgrep
e93a99ef31d0 updated for version 7.0195 vimboss parents: 659 diff changeset	4407 \|\| cmdidx == CMD_grepadd
e93a99ef31d0 updated for version 7.0195 vimboss parents: 659 diff changeset	4408 \|\| cmdidx == CMD_lgrepadd)
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	4409 && STRCMP("internal",
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	4410 *curbuf->b_p_gp == NUL ? p_gp : curbuf->b_p_gp) == 0);
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	4411 }
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	4412
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	4413 /*
657 b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	4414 * Used for ":make", ":lmake", ":grep", ":lgrep", ":grepadd", and ":lgrepadd"
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4415 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4416 void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4417 ex_make(exarg_T *eap)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4418 {
161 6df0106fc595 updated for version 7.0049 vimboss parents: 153 diff changeset	4419 char_u *fname;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4420 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	4421 char_u *enc = NULL;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4422 unsigned len;
657 b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	4423 win_T *wp = NULL;
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	4424 qf_info_T *qi = &ql_info;
842 a209672376fd updated for version 7.0f vimboss parents: 835 diff changeset	4425 int res;
161 6df0106fc595 updated for version 7.0049 vimboss parents: 153 diff changeset	4426 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	4427 int_u save_qfid;
161 6df0106fc595 updated for version 7.0049 vimboss parents: 153 diff changeset	4428
2782 0a0d7961b4fe updated for version 7.3.167 Bram Moolenaar <bram@vim.org> parents: 2770 diff changeset	4429 /* Redirect ":grep" to ":vimgrep" if 'grepprg' is "internal". */
0a0d7961b4fe updated for version 7.3.167 Bram Moolenaar <bram@vim.org> parents: 2770 diff changeset	4430 if (grep_internal(eap->cmdidx))
0a0d7961b4fe updated for version 7.3.167 Bram Moolenaar <bram@vim.org> parents: 2770 diff changeset	4431 {
0a0d7961b4fe updated for version 7.3.167 Bram Moolenaar <bram@vim.org> parents: 2770 diff changeset	4432 ex_vimgrep(eap);
0a0d7961b4fe updated for version 7.3.167 Bram Moolenaar <bram@vim.org> parents: 2770 diff changeset	4433 return;
0a0d7961b4fe updated for version 7.3.167 Bram Moolenaar <bram@vim.org> parents: 2770 diff changeset	4434 }
0a0d7961b4fe updated for version 7.3.167 Bram Moolenaar <bram@vim.org> parents: 2770 diff changeset	4435
161 6df0106fc595 updated for version 7.0049 vimboss parents: 153 diff changeset	4436 switch (eap->cmdidx)
6df0106fc595 updated for version 7.0049 vimboss parents: 153 diff changeset	4437 {
661 e93a99ef31d0 updated for version 7.0195 vimboss parents: 659 diff changeset	4438 case CMD_make: au_name = (char_u *)"make"; break;
e93a99ef31d0 updated for version 7.0195 vimboss parents: 659 diff changeset	4439 case CMD_lmake: au_name = (char_u *)"lmake"; break;
e93a99ef31d0 updated for version 7.0195 vimboss parents: 659 diff changeset	4440 case CMD_grep: au_name = (char_u *)"grep"; break;
e93a99ef31d0 updated for version 7.0195 vimboss parents: 659 diff changeset	4441 case CMD_lgrep: au_name = (char_u *)"lgrep"; break;
e93a99ef31d0 updated for version 7.0195 vimboss parents: 659 diff changeset	4442 case CMD_grepadd: au_name = (char_u *)"grepadd"; break;
e93a99ef31d0 updated for version 7.0195 vimboss parents: 659 diff changeset	4443 case CMD_lgrepadd: au_name = (char_u *)"lgrepadd"; break;
161 6df0106fc595 updated for version 7.0049 vimboss parents: 153 diff changeset	4444 default: break;
6df0106fc595 updated for version 7.0049 vimboss parents: 153 diff changeset	4445 }
10346 d52d97bf675e commit https://github.com/vim/vim/commit/21662be2211675824df1771c7f169948ede40c41 Christian Brabandt <cb@256bit.org> parents: 10281 diff changeset	4446 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	4447 curbuf->b_fname, TRUE, curbuf))
161 6df0106fc595 updated for version 7.0049 vimboss parents: 153 diff changeset	4448 {
13380 69517d67421f patch 8.0.1564: too many #ifdefs Christian Brabandt <cb@256bit.org> parents: 13252 diff changeset	4449 #ifdef FEAT_EVAL
10346 d52d97bf675e commit https://github.com/vim/vim/commit/21662be2211675824df1771c7f169948ede40c41 Christian Brabandt <cb@256bit.org> parents: 10281 diff changeset	4450 if (aborting())
161 6df0106fc595 updated for version 7.0049 vimboss parents: 153 diff changeset	4451 return;
6df0106fc595 updated for version 7.0049 vimboss parents: 153 diff changeset	4452 #endif
13380 69517d67421f patch 8.0.1564: too many #ifdefs Christian Brabandt <cb@256bit.org> parents: 13252 diff changeset	4453 }
11063 e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	4454 #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	4455 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	4456 #endif
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4457
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4458 if (is_loclist_cmd(eap->cmdidx))
657 b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	4459 wp = curwin;
b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	4460
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4461 autowrite_all();
161 6df0106fc595 updated for version 7.0049 vimboss parents: 153 diff changeset	4462 fname = get_mef_name();
6df0106fc595 updated for version 7.0049 vimboss parents: 153 diff changeset	4463 if (fname == NULL)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4464 return;
161 6df0106fc595 updated for version 7.0049 vimboss parents: 153 diff changeset	4465 mch_remove(fname); /* in case it's not unique */
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4466
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4467 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4468 * If 'shellpipe' empty: don't redirect to 'errorfile'.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4469 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4470 len = (unsigned)STRLEN(p_shq) * 2 + (unsigned)STRLEN(eap->arg) + 1;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4471 if (*p_sp != NUL)
161 6df0106fc595 updated for version 7.0049 vimboss parents: 153 diff changeset	4472 len += (unsigned)STRLEN(p_sp) + (unsigned)STRLEN(fname) + 3;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4473 cmd = alloc(len);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4474 if (cmd == NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4475 return;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4476 sprintf((char )cmd, "%s%s%s", (char )p_shq, (char *)eap->arg,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4477 (char *)p_shq);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4478 if (*p_sp != NUL)
1872 f13849167330 updated for version 7.2-169 vimboss parents: 1864 diff changeset	4479 append_redir(cmd, len, p_sp, fname);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4480 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4481 * Output a newline if there's something else than the :make command that
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4482 * was typed (in which case the cursor is in column 0).
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4483 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4484 if (msg_col == 0)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4485 msg_didout = FALSE;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4486 msg_start();
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4487 MSG_PUTS(":!");
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4488 msg_outtrans(cmd); /* show what we are doing */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4489
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4490 /* let the shell know if we are redirecting output or not */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4491 do_shell(cmd, *p_sp != NUL ? SHELL_DOOUT : 0);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4492
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4493 #ifdef AMIGA
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4494 out_flush();
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4495 /* read window status report and redraw before message */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4496 (void)char_avail();
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4497 #endif
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4498
842 a209672376fd updated for version 7.0f vimboss parents: 835 diff changeset	4499 res = qf_init(wp, fname, (eap->cmdidx != CMD_make
657 b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	4500 && eap->cmdidx != CMD_lmake) ? p_gefm : p_efm,
b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	4501 (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	4502 && 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	4503 qf_cmdtitle(*eap->cmdlinep), enc);
2847 45c536fe48db updated for version 7.3.197 Bram Moolenaar <bram@vim.org> parents: 2823 diff changeset	4504 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	4505 {
2847 45c536fe48db updated for version 7.3.197 Bram Moolenaar <bram@vim.org> parents: 2823 diff changeset	4506 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	4507 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	4508 goto cleanup;
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4509 }
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4510 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	4511 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	4512
14250 ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4513 // 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	4514 // 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	4515 save_qfid = qi->qf_lists[qi->qf_curlist].qf_id;
842 a209672376fd updated for version 7.0f vimboss parents: 835 diff changeset	4516 if (au_name != NULL)
a209672376fd updated for version 7.0f vimboss parents: 835 diff changeset	4517 apply_autocmds(EVENT_QUICKFIXCMDPOST, au_name,
a209672376fd updated for version 7.0f vimboss parents: 835 diff changeset	4518 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	4519 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	4520 // display the first error
0211e295835e patch 8.1.0248: duplicated quickfix code Christian Brabandt <cb@256bit.org> parents: 14433 diff changeset	4521 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	4522
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4523 cleanup:
161 6df0106fc595 updated for version 7.0049 vimboss parents: 153 diff changeset	4524 mch_remove(fname);
6df0106fc595 updated for version 7.0049 vimboss parents: 153 diff changeset	4525 vim_free(fname);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4526 vim_free(cmd);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4527 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4528
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4529 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4530 * Return the name for the errorfile, in allocated memory.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4531 * Find a new unique name when 'makeef' contains "##".
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4532 * Returns NULL for error.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4533 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4534 static char_u *
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4535 get_mef_name(void)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4536 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4537 char_u *p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4538 char_u *name;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4539 static int start = -1;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4540 static int off = 0;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4541 #ifdef HAVE_LSTAT
9387 f094d4085014 commit https://github.com/vim/vim/commit/8767f52fbfd4f053ce00a978227c95f1d7d323fe Christian Brabandt <cb@256bit.org> parents: 9379 diff changeset	4542 stat_T sb;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4543 #endif
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4544
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4545 if (*p_mef == NUL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4546 {
6721 7347229a646a updated for version 7.4.684 Bram Moolenaar <bram@vim.org> parents: 6450 diff changeset	4547 name = vim_tempname('e', FALSE);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4548 if (name == NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4549 EMSG(_(e_notmp));
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4550 return name;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4551 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4552
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4553 for (p = p_mef; *p; ++p)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4554 if (p[0] == '#' && p[1] == '#')
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4555 break;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4556
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4557 if (*p == NUL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4558 return vim_strsave(p_mef);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4559
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4560 /* Keep trying until the name doesn't exist yet. */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4561 for (;;)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4562 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4563 if (start == -1)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4564 start = mch_get_pid();
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4565 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4566 off += 19;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4567
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4568 name = alloc((unsigned)STRLEN(p_mef) + 30);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4569 if (name == NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4570 break;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4571 STRCPY(name, p_mef);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4572 sprintf((char *)name + (p - p_mef), "%d%d", start, off);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4573 STRCAT(name, p + 2);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4574 if (mch_getperm(name) < 0
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4575 #ifdef HAVE_LSTAT
10226 7a4fb555c83a commit https://github.com/vim/vim/commit/9af418427652562384744648d7d173a4bfebba95 Christian Brabandt <cb@256bit.org> parents: 10056 diff changeset	4576 /* Don't accept a symbolic link, it's a security risk. */
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4577 && mch_lstat((char *)name, &sb) < 0
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4578 #endif
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4579 )
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4580 break;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4581 vim_free(name);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4582 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4583 return name;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4584 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4585
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4586 /*
7092 64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4587 * 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	4588 */
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4589 int
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4590 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	4591 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4592 qf_info_T *qi = &ql_info;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4593 qfline_T *qfp;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4594 int i, sz = 0;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4595 int prev_fnum = 0;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4596
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4597 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	4598 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4599 /* Location list */
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4600 qi = GET_LOC_LIST(curwin);
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4601 if (qi == NULL)
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4602 return 0;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4603 }
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 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	4606 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	4607 ++i, qfp = qfp->qf_next)
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4608 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4609 if (qfp->qf_valid)
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4610 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4611 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	4612 sz++; /* Count all valid entries */
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4613 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	4614 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4615 /* Count the number of files */
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4616 sz++;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4617 prev_fnum = qfp->qf_fnum;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4618 }
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4619 }
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4620 }
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 return sz;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4623 }
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 * 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	4627 * 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	4628 */
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4629 int
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4630 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	4631 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4632 qf_info_T *qi = &ql_info;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4633
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4634 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	4635 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4636 /* Location list */
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4637 qi = GET_LOC_LIST(curwin);
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4638 if (qi == NULL)
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4639 return 0;
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
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4642 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	4643 }
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4644
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 * 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	4647 * 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	4648 */
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4649 int
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4650 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	4651 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4652 qf_info_T *qi = &ql_info;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4653 qf_list_T *qfl;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4654 qfline_T *qfp;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4655 int i, eidx = 0;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4656 int prev_fnum = 0;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4657
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4658 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	4659 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4660 /* Location list */
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4661 qi = GET_LOC_LIST(curwin);
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4662 if (qi == NULL)
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4663 return 1;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4664 }
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 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	4667 qfp = qfl->qf_start;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4668
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4669 /* 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	4670 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	4671 return 1;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4672
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4673 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	4674 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4675 if (qfp->qf_valid)
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4676 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4677 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	4678 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4679 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	4680 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4681 /* Count the number of files */
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4682 eidx++;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4683 prev_fnum = qfp->qf_fnum;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4684 }
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4685 }
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4686 else
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4687 eidx++;
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 }
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4690
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4691 return eidx ? eidx : 1;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4692 }
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4693
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4694 /*
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4695 * 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	4696 * 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	4697 * 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	4698 * 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	4699 */
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4700 static int
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	4701 qf_get_nth_valid_entry(qf_list_T *qfl, int n, int fdo)
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	4702 {
7092 64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4703 qfline_T *qfp = qfl->qf_start;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4704 int i, eidx;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4705 int prev_fnum = 0;
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 /* 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	4708 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	4709 return 1;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4710
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	4711 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	4712 i++, qfp = qfp->qf_next)
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 if (qfp->qf_valid)
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4715 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4716 if (fdo)
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4717 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4718 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	4719 {
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4720 /* Count the number of files */
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4721 eidx++;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4722 prev_fnum = qfp->qf_fnum;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4723 }
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4724 }
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4725 else
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4726 eidx++;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4727 }
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4728
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4729 if (eidx == n)
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4730 break;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4731 }
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4732
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4733 if (i <= qfl->qf_count)
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4734 return i;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4735 else
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4736 return 1;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4737 }
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4738
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4739 /*
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4740 * ":cc", ":crewind", ":cfirst" and ":clast".
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4741 * ":ll", ":lrewind", ":lfirst" and ":llast".
7092 64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4742 * ":cdo", ":ldo", ":cfdo" and ":lfdo"
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4743 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4744 void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4745 ex_cc(exarg_T *eap)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4746 {
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	4747 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	4748 int errornr;
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	4749
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4750 if (is_loclist_cmd(eap->cmdidx))
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4751 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4752 qi = GET_LOC_LIST(curwin);
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4753 if (qi == NULL)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4754 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4755 EMSG(_(e_loclist));
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4756 return;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4757 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4758 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4759
7092 64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4760 if (eap->addr_count > 0)
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4761 errornr = (int)eap->line2;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4762 else
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4763 {
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4764 switch (eap->cmdidx)
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4765 {
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4766 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	4767 errornr = 0;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4768 break;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4769 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	4770 case CMD_lfirst:
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4771 errornr = 1;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4772 break;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4773 default:
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4774 errornr = 32767;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4775 }
7092 64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4776 }
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4777
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4778 /* 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	4779 * 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	4780 */
12084 69ce6b3f0834 patch 8.0.0922: quickfix list always added after current one Christian Brabandt <cb@256bit.org> parents: 12048 diff changeset	4781 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	4782 \|\| eap->cmdidx == CMD_cfdo \|\| eap->cmdidx == CMD_lfdo)
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	4783 errornr = qf_get_nth_valid_entry(&qi->qf_lists[qi->qf_curlist],
7092 64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4784 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	4785 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	4786
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4787 qf_jump(qi, 0, errornr, eap->forceit);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4788 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4789
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4790 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4791 * ":cnext", ":cnfile", ":cNext" and ":cprevious".
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4792 * ":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	4793 * Also, used by ":cdo", ":ldo", ":cfdo" and ":lfdo" commands.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4794 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4795 void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4796 ex_cnext(exarg_T *eap)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4797 {
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	4798 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	4799 int errornr;
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4800 int dir;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4801
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4802 if (is_loclist_cmd(eap->cmdidx))
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4803 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4804 qi = GET_LOC_LIST(curwin);
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4805 if (qi == NULL)
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4806 {
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4807 EMSG(_(e_loclist));
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4808 return;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4809 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4810 }
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4811
12084 69ce6b3f0834 patch 8.0.0922: quickfix list always added after current one Christian Brabandt <cb@256bit.org> parents: 12048 diff changeset	4812 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	4813 && (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	4814 && 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	4815 errornr = (int)eap->line2;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4816 else
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4817 errornr = 1;
64e30831fa42 commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09 Christian Brabandt <cb@256bit.org> parents: 6853 diff changeset	4818
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4819 // 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	4820 switch (eap->cmdidx)
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 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	4823 dir = FORWARD;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4824 break;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4825 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	4826 case CMD_lNext:
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4827 dir = BACKWARD;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4828 break;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4829 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	4830 dir = FORWARD_FILE;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4831 break;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4832 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	4833 dir = BACKWARD_FILE;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4834 break;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4835 default:
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4836 dir = FORWARD;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4837 break;
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4838 }
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4839
60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4840 qf_jump(qi, dir, errornr, eap->forceit);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4841 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4842
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4843 /*
446 7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	4844 * ":cfile"/":cgetfile"/":caddfile" commands.
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4845 * ":lfile"/":lgetfile"/":laddfile" commands.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4846 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4847 void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	4848 ex_cfile(exarg_T *eap)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4849 {
11063 e71d3bdf3bc3 patch 8.0.0420: text garbled when the system encoding differs from 'encoding' Christian Brabandt <cb@256bit.org> parents: 10379 diff changeset	4850 char_u *enc = NULL;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4851 win_T *wp = NULL;
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	4852 qf_info_T *qi = &ql_info;
3404 38a135730423 updated for version 7.3.468 Bram Moolenaar <bram@vim.org> parents: 3365 diff changeset	4853 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	4854 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	4855 int res;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	4856
3404 38a135730423 updated for version 7.3.468 Bram Moolenaar <bram@vim.org> parents: 3365 diff changeset	4857 switch (eap->cmdidx)
38a135730423 updated for version 7.3.468 Bram Moolenaar <bram@vim.org> parents: 3365 diff changeset	4858 {
38a135730423 updated for version 7.3.468 Bram Moolenaar <bram@vim.org> parents: 3365 diff changeset	4859 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	4860 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	4861 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	4862 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	4863 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	4864 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	4865 default: break;
38a135730423 updated for version 7.3.468 Bram Moolenaar <bram@vim.org> parents: 3365 diff changeset	4866 }
38a135730423 updated for version 7.3.468 Bram Moolenaar <bram@vim.org> parents: 3365 diff changeset	4867 if (au_name != NULL)
38a135730423 updated for version 7.3.468 Bram Moolenaar <bram@vim.org> parents: 3365 diff changeset	4868 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	4869 #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	4870 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	4871 #endif
2296 eb7be7b075a6 Support :browse for commands that use an error file argument. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2146 diff changeset	4872 #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	4873 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	4874 {
eb7be7b075a6 Support :browse for commands that use an error file argument. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2146 diff changeset	4875 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	4876 NULL, NULL,
378f9f8e6d8f patch 8.0.1773: dialog messages are not translated Christian Brabandt <cb@256bit.org> parents: 13800 diff changeset	4877 (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	4878 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	4879 return;
eb7be7b075a6 Support :browse for commands that use an error file argument. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2146 diff changeset	4880 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	4881 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	4882 }
eb7be7b075a6 Support :browse for commands that use an error file argument. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2146 diff changeset	4883 else
eb7be7b075a6 Support :browse for commands that use an error file argument. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2146 diff changeset	4884 #endif
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	4885 if (*eap->arg != NUL)
694 07d199fe02ed updated for version 7.0209 vimboss parents: 682 diff changeset	4886 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	4887
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	4888 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	4889 wp = curwin;
a1f8939a4644 patch 8.0.1414: accessing freed memory in :lfile. Christian Brabandt <cb@256bit.org> parents: 13076 diff changeset	4890
446 7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	4891 /*
7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	4892 * This function is used by the :cfile, :cgetfile and :caddfile
7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	4893 * commands.
7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	4894 * :cfile always creates a new quickfix list and jumps to the
7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	4895 * first error.
7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	4896 * :cgetfile creates a new quickfix list but doesn't jump to the
7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	4897 * first error.
7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	4898 * :caddfile adds to an existing quickfix list. If there is no
7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	4899 * quickfix list then a new list is created.
7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	4900 */
12954 49e136457c66 patch 8.0.1353: QuickFixCmdPost is not used consistently Christian Brabandt <cb@256bit.org> parents: 12912 diff changeset	4901 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	4902 && 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	4903 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	4904 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	4905 {
13062 6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	4906 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	4907 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	4908 return;
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4909 }
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4910 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	4911 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	4912 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	4913 if (au_name != NULL)
49e136457c66 patch 8.0.1353: QuickFixCmdPost is not used consistently Christian Brabandt <cb@256bit.org> parents: 12912 diff changeset	4914 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	4915
14250 ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	4916 // 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	4917 // 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	4918 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	4919 && qflist_valid(wp, save_qfid))
14469 0211e295835e patch 8.1.0248: duplicated quickfix code Christian Brabandt <cb@256bit.org> parents: 14433 diff changeset	4920 // display the first error
0211e295835e patch 8.1.0248: duplicated quickfix code Christian Brabandt <cb@256bit.org> parents: 14433 diff changeset	4921 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	4922 }
4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	4923
4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	4924 /*
13521 15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4925 * 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	4926 */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4927 static char_u *
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4928 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	4929 {
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4930 switch (cmdidx)
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 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	4933 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	4934 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	4935 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	4936 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	4937 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	4938 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	4939 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	4940 default: return NULL;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4941 }
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
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 * 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	4946 */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4947 static void
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4948 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	4949 {
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4950 /* 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	4951 regmatch->regprog = NULL;
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 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	4954 {
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4955 /* 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	4956 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	4957 {
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4958 EMSG(_(e_noprevre));
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4959 return;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4960 }
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4961 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	4962 }
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4963 else
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4964 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	4965
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4966 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	4967 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	4968 }
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4969
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4970 /*
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4971 * 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	4972 */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4973 static void
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4974 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	4975 {
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4976 char_u *p;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4977
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4978 msg_start();
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4979 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	4980 if (p == NULL)
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4981 msg_outtrans(fname);
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4982 else
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4983 {
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4984 msg_outtrans(p);
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4985 vim_free(p);
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4986 }
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4987 msg_clr_eos();
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4988 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	4989 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	4990 msg_col = 0;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4991 out_flush();
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4992 }
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4993
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4994 /*
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4995 * 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	4996 */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4997 static buf_T *
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	4998 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	4999 char_u *fname,
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5000 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	5001 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	5002 {
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5003 int save_mls;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5004 #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	5005 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	5006 #endif
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5007 buf_T *buf;
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 #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	5010 /* 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	5011 * 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	5012 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	5013 #endif
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5014 /* 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	5015 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	5016 p_mls = 0;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5017
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5018 /* 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	5019 * autocommands applied, etc. */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5020 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	5021
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5022 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	5023 #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	5024 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	5025 #endif
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5026
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5027 return buf;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5028 }
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5029
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5030 /*
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5031 * 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	5032 * 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	5033 * new list.
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5034 */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5035 static int
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5036 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	5037 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	5038 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	5039 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	5040 char_u *title)
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5041 {
13594 4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5042 /* 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	5043 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	5044 {
4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5045 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	5046 {
13594 4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5047 /* 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	5048 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	5049 return FALSE;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5050 }
13594 4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5051 else
4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5052 {
4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5053 /* 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	5054 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	5055 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	5056 }
4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5057 }
4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5058
14507 5a10a0020c3e patch 8.1.0267: no good check if restoring quickfix list worked Christian Brabandt <cb@256bit.org> parents: 14495 diff changeset	5059 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	5060 return FALSE;
13521 15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5061
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5062 return TRUE;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5063 }
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 /*
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5066 * 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	5067 * 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	5068 */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5069 static int
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5070 vgr_match_buflines(
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5071 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	5072 char_u *fname,
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5073 buf_T *buf,
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5074 regmmatch_T *regmatch,
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5075 long tomatch,
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5076 int duplicate_name,
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5077 int flags)
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5078 {
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5079 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	5080 long lnum;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5081 colnr_T col;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5082
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5083 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	5084 {
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5085 col = 0;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5086 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	5087 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	5088 {
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5089 /* 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	5090 * 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	5091 * 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	5092 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	5093 qi->qf_curlist,
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5094 NULL, /* dir */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5095 fname,
13821 98274127d675 patch 8.0.1782: no simple way to label quickfix entries Christian Brabandt <cb@256bit.org> parents: 13819 diff changeset	5096 NULL,
13521 15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5097 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	5098 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	5099 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	5100 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	5101 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	5102 FALSE, /* vis_col */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5103 NULL, /* search pattern */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5104 0, /* nr */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5105 0, /* type */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5106 TRUE /* valid */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5107 ) == FAIL)
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 got_int = TRUE;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5110 break;
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 found_match = TRUE;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5113 if (--tomatch == 0)
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5114 break;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5115 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	5116 \|\| 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	5117 break;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5118 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	5119 + (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	5120 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	5121 break;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5122 }
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5123 line_breakcheck();
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5124 if (got_int)
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5125 break;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5126 }
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5127
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5128 return found_match;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5129 }
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5130
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5131 /*
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5132 * 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	5133 */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5134 static void
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5135 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	5136 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	5137 int forceit,
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5138 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	5139 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	5140 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	5141 {
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5142 buf_T *buf;
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 buf = curbuf;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5145 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	5146 if (buf != curbuf)
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5147 /* 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	5148 * taken care of. */
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5149 *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	5150
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5151 /* 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	5152 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	5153 {
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5154 exarg_T ea;
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5155
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5156 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	5157 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	5158 ex_cd(&ea);
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5159 }
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5160 }
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5161
15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5162 /*
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5163 * ":vimgrep {pattern} file(s)"
657 b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	5164 * ":vimgrepadd {pattern} file(s)"
b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	5165 * ":lvimgrep {pattern} file(s)"
b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	5166 * ":lvimgrepadd {pattern} file(s)"
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5167 */
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5168 void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	5169 ex_vimgrep(exarg_T *eap)
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5170 {
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5171 regmmatch_T regmatch;
153 19670b05ee32 updated for version 7.0047 vimboss parents: 129 diff changeset	5172 int fcount;
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5173 char_u **fnames;
1411 0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5174 char_u *fname;
8603 bfa74b84c41c commit https://github.com/vim/vim/commit/5584df65a0ca2315d1eebc13c54a448bee4d0758 Christian Brabandt <cb@256bit.org> parents: 7833 diff changeset	5175 char_u *title;
153 19670b05ee32 updated for version 7.0047 vimboss parents: 129 diff changeset	5176 char_u *s;
19670b05ee32 updated for version 7.0047 vimboss parents: 129 diff changeset	5177 char_u *p;
19670b05ee32 updated for version 7.0047 vimboss parents: 129 diff changeset	5178 int fi;
657 b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	5179 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	5180 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	5181 win_T *wp = NULL;
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5182 buf_T *buf;
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5183 int duplicate_name = FALSE;
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5184 int using_dummy;
1396 3e0f9984e98e updated for version 7.1-111 vimboss parents: 1302 diff changeset	5185 int redraw_for_dummy = FALSE;
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5186 int found_match;
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5187 buf_T *first_match_buf = NULL;
f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5188 time_t seconds = 0;
f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5189 aco_save_T aco;
170 8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5190 int flags = 0;
716 8ae24f338cab updated for version 7.0217 vimboss parents: 712 diff changeset	5191 long tomatch;
2770 25672ad7f377 updated for version 7.3.161 Bram Moolenaar <bram@vim.org> parents: 2651 diff changeset	5192 char_u *dirname_start = NULL;
25672ad7f377 updated for version 7.3.161 Bram Moolenaar <bram@vim.org> parents: 2651 diff changeset	5193 char_u *dirname_now = NULL;
1411 0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5194 char_u *target_dir = NULL;
1683 75dbeedddaa9 updated for version 7.2b-016 vimboss parents: 1672 diff changeset	5195 char_u *au_name = NULL;
161 6df0106fc595 updated for version 7.0049 vimboss parents: 153 diff changeset	5196
13521 15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5197 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	5198 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	5199 curbuf->b_fname, TRUE, curbuf))
161 6df0106fc595 updated for version 7.0049 vimboss parents: 153 diff changeset	5200 {
13380 69517d67421f patch 8.0.1564: too many #ifdefs Christian Brabandt <cb@256bit.org> parents: 13252 diff changeset	5201 #ifdef FEAT_EVAL
10346 d52d97bf675e commit https://github.com/vim/vim/commit/21662be2211675824df1771c7f169948ede40c41 Christian Brabandt <cb@256bit.org> parents: 10281 diff changeset	5202 if (aborting())
161 6df0106fc595 updated for version 7.0049 vimboss parents: 153 diff changeset	5203 return;
6df0106fc595 updated for version 7.0049 vimboss parents: 153 diff changeset	5204 #endif
13380 69517d67421f patch 8.0.1564: too many #ifdefs Christian Brabandt <cb@256bit.org> parents: 13252 diff changeset	5205 }
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5206
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	5207 if (is_loclist_cmd(eap->cmdidx))
657 b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	5208 {
b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	5209 qi = ll_get_or_alloc_list(curwin);
b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	5210 if (qi == NULL)
b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	5211 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	5212 wp = curwin;
657 b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	5213 }
b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	5214
716 8ae24f338cab updated for version 7.0217 vimboss parents: 712 diff changeset	5215 if (eap->addr_count > 0)
8ae24f338cab updated for version 7.0217 vimboss parents: 712 diff changeset	5216 tomatch = eap->line2;
8ae24f338cab updated for version 7.0217 vimboss parents: 712 diff changeset	5217 else
8ae24f338cab updated for version 7.0217 vimboss parents: 712 diff changeset	5218 tomatch = MAXLNUM;
8ae24f338cab updated for version 7.0217 vimboss parents: 712 diff changeset	5219
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5220 /* Get the search pattern: either white-separated or enclosed in // */
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5221 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	5222 title = vim_strsave(qf_cmdtitle(*eap->cmdlinep));
170 8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5223 p = skip_vimgrep_pat(eap->arg, &s, &flags);
153 19670b05ee32 updated for version 7.0047 vimboss parents: 129 diff changeset	5224 if (p == NULL)
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5225 {
282 33d9c918b8ab updated for version 7.0075 vimboss parents: 277 diff changeset	5226 EMSG(_(e_invalpat));
153 19670b05ee32 updated for version 7.0047 vimboss parents: 129 diff changeset	5227 goto theend;
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5228 }
4197 07fef68eb018 updated for version 7.3.850 Bram Moolenaar <bram@vim.org> parents: 4003 diff changeset	5229
13521 15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5230 vgr_init_regmatch(&regmatch, s);
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5231 if (regmatch.regprog == NULL)
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
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5234 p = skipwhite(p);
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5235 if (*p == NUL)
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5236 {
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5237 EMSG(_("E683: File name missing or invalid pattern"));
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5238 goto theend;
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5239 }
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5240
12084 69ce6b3f0834 patch 8.0.0922: quickfix list always added after current one Christian Brabandt <cb@256bit.org> parents: 12048 diff changeset	5241 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	5242 && 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	5243 && eap->cmdidx != CMD_lvimgrepadd)
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	5244 \|\| qi->qf_curlist == qi->qf_listcount)
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5245 /* 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	5246 qf_new_list(qi, title != NULL ? title : qf_cmdtitle(*eap->cmdlinep));
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5247
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5248 /* parse the list of arguments */
3620 4f1c511e71f8 updated for version 7.3.570 Bram Moolenaar <bram@vim.org> parents: 3555 diff changeset	5249 if (get_arglist_exp(p, &fcount, &fnames, TRUE) == FAIL)
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5250 goto theend;
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5251 if (fcount == 0)
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5252 {
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5253 EMSG(_(e_nomatch));
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5254 goto theend;
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5255 }
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5256
7558 9a4c9dccd603 commit https://github.com/vim/vim/commit/b86a343280b08d6701da68ee0651e960a0a7a61c Christian Brabandt <cb@256bit.org> parents: 7515 diff changeset	5257 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	5258 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	5259 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	5260 {
4d34891e98f4 commit https://github.com/vim/vim/commit/61ff4dd6a4d47bd32383fe28087be2b37dec53f4 Christian Brabandt <cb@256bit.org> parents: 7558 diff changeset	5261 FreeWild(fcount, fnames);
2770 25672ad7f377 updated for version 7.3.161 Bram Moolenaar <bram@vim.org> parents: 2651 diff changeset	5262 goto theend;
7662 4d34891e98f4 commit https://github.com/vim/vim/commit/61ff4dd6a4d47bd32383fe28087be2b37dec53f4 Christian Brabandt <cb@256bit.org> parents: 7558 diff changeset	5263 }
2770 25672ad7f377 updated for version 7.3.161 Bram Moolenaar <bram@vim.org> parents: 2651 diff changeset	5264
1411 0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5265 /* Remember the current directory, because a BufRead autocommand that does
0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5266 * ":lcd %:p:h" changes the meaning of short path names. */
0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5267 mch_dirname(dirname_start, MAXPATHL);
0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5268
13594 4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5269 /* 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	5270 * 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	5271 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	5272
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5273 seconds = (time_t)0;
716 8ae24f338cab updated for version 7.0217 vimboss parents: 712 diff changeset	5274 for (fi = 0; fi < fcount && !got_int && tomatch > 0; ++fi)
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5275 {
1411 0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5276 fname = shorten_fname1(fnames[fi]);
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5277 if (time(NULL) > seconds)
f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5278 {
1411 0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5279 /* 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	5280 * working on it. */
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5281 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	5282 vgr_display_fname(fname);
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5283 }
f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5284
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5285 buf = buflist_findname_exp(fnames[fi]);
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5286 if (buf == NULL \|\| buf->b_ml.ml_mfp == NULL)
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5287 {
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5288 /* Remember that a buffer with this name already exists. */
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5289 duplicate_name = (buf != NULL);
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5290 using_dummy = TRUE;
1396 3e0f9984e98e updated for version 7.1-111 vimboss parents: 1302 diff changeset	5291 redraw_for_dummy = TRUE;
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5292
13521 15c856a1617b patch 8.0.1634: the ex_vimgrep() function is too long Christian Brabandt <cb@256bit.org> parents: 13497 diff changeset	5293 buf = vgr_load_dummy_buf(fname, dirname_start, dirname_now);
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5294 }
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5295 else
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5296 /* Use existing, loaded buffer. */
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5297 using_dummy = FALSE;
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5298
13594 4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5299 /* 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	5300 * 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	5301 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	5302 {
2d94fcb0277d patch 8.0.1702: leaking memory when autocommands make quickfix list invalid Christian Brabandt <cb@256bit.org> parents: 13612 diff changeset	5303 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	5304 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	5305 }
13594 4d55eb79178b patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list Christian Brabandt <cb@256bit.org> parents: 13521 diff changeset	5306 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	5307
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5308 if (buf == NULL)
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5309 {
f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5310 if (!got_int)
1411 0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5311 smsg((char_u *)_("Cannot open file \"%s\""), fname);
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5312 }
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5313 else
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5314 {
717 2fa8cb05b861 updated for version 7.0218 vimboss parents: 716 diff changeset	5315 /* Try for a match in all lines of the buffer.
2fa8cb05b861 updated for version 7.0218 vimboss parents: 716 diff changeset	5316 * 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	5317 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	5318 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	5319
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5320 if (using_dummy)
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5321 {
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5322 if (found_match && first_match_buf == NULL)
f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5323 first_match_buf = buf;
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5324 if (duplicate_name)
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5325 {
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5326 /* Never keep a dummy buffer if there is another buffer
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5327 * with the same name. */
3490 8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5328 wipe_dummy_buffer(buf, dirname_start);
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5329 buf = NULL;
f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5330 }
717 2fa8cb05b861 updated for version 7.0218 vimboss parents: 716 diff changeset	5331 else if (!cmdmod.hide
2fa8cb05b861 updated for version 7.0218 vimboss parents: 716 diff changeset	5332 \|\| buf->b_p_bh[0] == 'u' /* "unload" */
2fa8cb05b861 updated for version 7.0218 vimboss parents: 716 diff changeset	5333 \|\| buf->b_p_bh[0] == 'w' /* "wipe" */
2fa8cb05b861 updated for version 7.0218 vimboss parents: 716 diff changeset	5334 \|\| buf->b_p_bh[0] == 'd') /* "delete" */
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5335 {
717 2fa8cb05b861 updated for version 7.0218 vimboss parents: 716 diff changeset	5336 /* When no match was found we don't need to remember the
2fa8cb05b861 updated for version 7.0218 vimboss parents: 716 diff changeset	5337 * buffer, wipe it out. If there was a match and it
2fa8cb05b861 updated for version 7.0218 vimboss parents: 716 diff changeset	5338 * wasn't the first one or we won't jump there: only
2fa8cb05b861 updated for version 7.0218 vimboss parents: 716 diff changeset	5339 * unload the buffer.
2fa8cb05b861 updated for version 7.0218 vimboss parents: 716 diff changeset	5340 * Ignore 'hidden' here, because it may lead to having too
2fa8cb05b861 updated for version 7.0218 vimboss parents: 716 diff changeset	5341 * many swap files. */
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5342 if (!found_match)
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5343 {
3490 8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5344 wipe_dummy_buffer(buf, dirname_start);
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5345 buf = NULL;
f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5346 }
170 8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5347 else if (buf != first_match_buf \|\| (flags & VGR_NOJUMP))
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5348 {
3490 8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5349 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	5350 /* 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	5351 buf->b_flags &= ~BF_DUMMY;
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5352 buf = NULL;
f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5353 }
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5354 }
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5355
f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5356 if (buf != NULL)
f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5357 {
9540 64a791c53418 commit https://github.com/vim/vim/commit/015102e91e978a0bb42a14461c132a85e8f7e1ea Christian Brabandt <cb@256bit.org> parents: 9538 diff changeset	5358 /* 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	5359 buf->b_flags &= ~BF_DUMMY;
64a791c53418 commit https://github.com/vim/vim/commit/015102e91e978a0bb42a14461c132a85e8f7e1ea Christian Brabandt <cb@256bit.org> parents: 9538 diff changeset	5360
1411 0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5361 /* If the buffer is still loaded we need to use the
0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5362 * directory we jumped to below. */
0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5363 if (buf == first_match_buf
0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5364 && target_dir == NULL
0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5365 && STRCMP(dirname_start, dirname_now) != 0)
0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5366 target_dir = vim_strsave(dirname_now);
0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5367
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5368 /* The buffer is still loaded, the Filetype autocommands
677 e649c78407e6 updated for version 7.0202 vimboss parents: 665 diff changeset	5369 * need to be done now, in that buffer. And the modelines
717 2fa8cb05b861 updated for version 7.0218 vimboss parents: 716 diff changeset	5370 * need to be done (again). But not the window-local
2fa8cb05b861 updated for version 7.0218 vimboss parents: 716 diff changeset	5371 * options! */
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5372 aucmd_prepbuf(&aco, buf);
13380 69517d67421f patch 8.0.1564: too many #ifdefs Christian Brabandt <cb@256bit.org> parents: 13252 diff changeset	5373 #if defined(FEAT_SYN_HL)
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5374 apply_autocmds(EVENT_FILETYPE, buf->b_p_ft,
f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5375 buf->b_fname, TRUE, buf);
677 e649c78407e6 updated for version 7.0202 vimboss parents: 665 diff changeset	5376 #endif
717 2fa8cb05b861 updated for version 7.0218 vimboss parents: 716 diff changeset	5377 do_modelines(OPT_NOWIN);
123 f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5378 aucmd_restbuf(&aco);
f67f8a8d81ba updated for version 7.0043 vimboss parents: 119 diff changeset	5379 }
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5380 }
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5381 }
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5382 }
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5383
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5384 FreeWild(fcount, fnames);
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5385
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	5386 qi->qf_lists[qi->qf_curlist].qf_nonevalid = FALSE;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	5387 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	5388 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	5389 qf_list_changed(qi, qi->qf_curlist);
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5390
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	5391 qf_update_buffer(qi, NULL);
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5392
842 a209672376fd updated for version 7.0f vimboss parents: 835 diff changeset	5393 if (au_name != NULL)
a209672376fd updated for version 7.0f vimboss parents: 835 diff changeset	5394 apply_autocmds(EVENT_QUICKFIXCMDPOST, au_name,
a209672376fd updated for version 7.0f vimboss parents: 835 diff changeset	5395 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	5396 /*
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	5397 * 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	5398 * is still valid.
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	5399 */
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	5400 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	5401 goto theend;
842 a209672376fd updated for version 7.0f vimboss parents: 835 diff changeset	5402
14507 5a10a0020c3e patch 8.1.0267: no good check if restoring quickfix list worked Christian Brabandt <cb@256bit.org> parents: 14495 diff changeset	5403 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	5404 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	5405
14603 d1b69129db99 patch 8.1.0315: helpgrep with language doesn't work properly Christian Brabandt <cb@256bit.org> parents: 14560 diff changeset	5406 // Jump to first match.
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	5407 if (!qf_list_empty(qi, qi->qf_curlist))
170 8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5408 {
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5409 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	5410 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	5411 first_match_buf, target_dir);
170 8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5412 }
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5413 else
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5414 EMSG2(_(e_nomatch2), s);
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5415
1396 3e0f9984e98e updated for version 7.1-111 vimboss parents: 1302 diff changeset	5416 /* If we loaded a dummy buffer into the current window, the autocommands
3e0f9984e98e updated for version 7.1-111 vimboss parents: 1302 diff changeset	5417 * may have messed up things, need to redraw and recompute folds. */
3e0f9984e98e updated for version 7.1-111 vimboss parents: 1302 diff changeset	5418 if (redraw_for_dummy)
3e0f9984e98e updated for version 7.1-111 vimboss parents: 1302 diff changeset	5419 {
3e0f9984e98e updated for version 7.1-111 vimboss parents: 1302 diff changeset	5420 #ifdef FEAT_FOLDING
3e0f9984e98e updated for version 7.1-111 vimboss parents: 1302 diff changeset	5421 foldUpdateAll(curwin);
3e0f9984e98e updated for version 7.1-111 vimboss parents: 1302 diff changeset	5422 #else
3e0f9984e98e updated for version 7.1-111 vimboss parents: 1302 diff changeset	5423 redraw_later(NOT_VALID);
3e0f9984e98e updated for version 7.1-111 vimboss parents: 1302 diff changeset	5424 #endif
3e0f9984e98e updated for version 7.1-111 vimboss parents: 1302 diff changeset	5425 }
3e0f9984e98e updated for version 7.1-111 vimboss parents: 1302 diff changeset	5426
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5427 theend:
8603 bfa74b84c41c commit https://github.com/vim/vim/commit/5584df65a0ca2315d1eebc13c54a448bee4d0758 Christian Brabandt <cb@256bit.org> parents: 7833 diff changeset	5428 vim_free(title);
2770 25672ad7f377 updated for version 7.3.161 Bram Moolenaar <bram@vim.org> parents: 2651 diff changeset	5429 vim_free(dirname_now);
25672ad7f377 updated for version 7.3.161 Bram Moolenaar <bram@vim.org> parents: 2651 diff changeset	5430 vim_free(dirname_start);
1411 0e6b369b9760 updated for version 7.1-126 vimboss parents: 1396 diff changeset	5431 vim_free(target_dir);
4805 66803af09906 updated for version 7.3.1149 Bram Moolenaar <bram@vim.org> parents: 4371 diff changeset	5432 vim_regfree(regmatch.regprog);
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5433 }
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5434
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	5435 /*
3490 8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5436 * 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	5437 * 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	5438 */
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5439 static void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	5440 restore_start_dir(char_u *dirname_start)
3490 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 char_u *dirname_now = alloc(MAXPATHL);
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 if (NULL != dirname_now)
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5445 {
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5446 mch_dirname(dirname_now, MAXPATHL);
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5447 if (STRCMP(dirname_start, dirname_now) != 0)
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5448 {
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5449 /* 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	5450 * appropriate ex command and executing it. */
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5451 exarg_T ea;
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5452
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5453 ea.arg = dirname_start;
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5454 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	5455 ex_cd(&ea);
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5456 }
3974 4d1753f3e85c updated for version 7.3.742 Bram Moolenaar <bram@vim.org> parents: 3965 diff changeset	5457 vim_free(dirname_now);
3490 8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5458 }
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5459 }
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5460
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5461 /*
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5462 * 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	5463 * 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	5464 * "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	5465 * 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	5466 * 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	5467 *
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5468 * 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	5469 * or wipe_dummy_buffer() later!
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5470 *
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5471 * Returns NULL if it fails.
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5472 */
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5473 static buf_T *
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	5474 load_dummy_buffer(
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	5475 char_u *fname,
c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	5476 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	5477 char_u resulting_dir) / out: new directory */
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5478 {
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5479 buf_T *newbuf;
9487 69ed2c9d34a6 commit https://github.com/vim/vim/commit/7c0a2f367f2507669560b1a66423155c70d2e75b Christian Brabandt <cb@256bit.org> parents: 9485 diff changeset	5480 bufref_T newbufref;
69ed2c9d34a6 commit https://github.com/vim/vim/commit/7c0a2f367f2507669560b1a66423155c70d2e75b Christian Brabandt <cb@256bit.org> parents: 9485 diff changeset	5481 bufref_T newbuf_to_wipe;
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5482 int failed = TRUE;
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5483 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	5484 int readfile_result;
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5485
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5486 /* Allocate a buffer without putting it in the buffer list. */
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5487 newbuf = buflist_new(NULL, NULL, (linenr_T)1, BLN_DUMMY);
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5488 if (newbuf == NULL)
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5489 return NULL;
9487 69ed2c9d34a6 commit https://github.com/vim/vim/commit/7c0a2f367f2507669560b1a66423155c70d2e75b Christian Brabandt <cb@256bit.org> parents: 9485 diff changeset	5490 set_bufref(&newbufref, newbuf);
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5491
177 84c21eb4fc40 updated for version 7.0054 vimboss parents: 170 diff changeset	5492 /* Init the options. */
84c21eb4fc40 updated for version 7.0054 vimboss parents: 170 diff changeset	5493 buf_copy_options(newbuf, BCO_ENTER \| BCO_NOHELP);
84c21eb4fc40 updated for version 7.0054 vimboss parents: 170 diff changeset	5494
1918 eac2556d4620 updated for version 7.2-215 vimboss parents: 1883 diff changeset	5495 /* need to open the memfile before putting the buffer in a window */
eac2556d4620 updated for version 7.2-215 vimboss parents: 1883 diff changeset	5496 if (ml_open(newbuf) == OK)
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5497 {
14250 ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	5498 /* 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	5499 ++newbuf->b_locked;
b931b2751650 patch 8.0.1403: using freed buffer in grep command Christian Brabandt <cb@256bit.org> parents: 13026 diff changeset	5500
1918 eac2556d4620 updated for version 7.2-215 vimboss parents: 1883 diff changeset	5501 /* set curwin/curbuf to buf and save a few things */
eac2556d4620 updated for version 7.2-215 vimboss parents: 1883 diff changeset	5502 aucmd_prepbuf(&aco, newbuf);
eac2556d4620 updated for version 7.2-215 vimboss parents: 1883 diff changeset	5503
eac2556d4620 updated for version 7.2-215 vimboss parents: 1883 diff changeset	5504 /* Need to set the filename for autocommands. */
eac2556d4620 updated for version 7.2-215 vimboss parents: 1883 diff changeset	5505 (void)setfname(curbuf, fname, NULL, FALSE);
eac2556d4620 updated for version 7.2-215 vimboss parents: 1883 diff changeset	5506
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5507 /* Create swap file now to avoid the ATTENTION message. */
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5508 check_need_swap(TRUE);
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5509
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5510 /* Remove the "dummy" flag, otherwise autocommands may not
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5511 * work. */
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5512 curbuf->b_flags &= ~BF_DUMMY;
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5513
9487 69ed2c9d34a6 commit https://github.com/vim/vim/commit/7c0a2f367f2507669560b1a66423155c70d2e75b Christian Brabandt <cb@256bit.org> parents: 9485 diff changeset	5514 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	5515 readfile_result = readfile(fname, NULL,
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5516 (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	5517 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	5518 --newbuf->b_locked;
b931b2751650 patch 8.0.1403: using freed buffer in grep command Christian Brabandt <cb@256bit.org> parents: 13026 diff changeset	5519 if (readfile_result == OK
857 b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5520 && !got_int
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5521 && !(curbuf->b_flags & BF_NEW))
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5522 {
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5523 failed = FALSE;
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5524 if (curbuf != newbuf)
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5525 {
2646 ff3a304b4ac2 updated for version 7.3.066 Bram Moolenaar <bram@vim.org> parents: 2583 diff changeset	5526 /* Bloody autocommands changed the buffer! Can happen when
ff3a304b4ac2 updated for version 7.3.066 Bram Moolenaar <bram@vim.org> parents: 2583 diff changeset	5527 * 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	5528 * 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	5529 * window stuff. */
9487 69ed2c9d34a6 commit https://github.com/vim/vim/commit/7c0a2f367f2507669560b1a66423155c70d2e75b Christian Brabandt <cb@256bit.org> parents: 9485 diff changeset	5530 set_bufref(&newbuf_to_wipe, newbuf);
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5531 newbuf = curbuf;
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5532 }
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5533 }
1918 eac2556d4620 updated for version 7.2-215 vimboss parents: 1883 diff changeset	5534
eac2556d4620 updated for version 7.2-215 vimboss parents: 1883 diff changeset	5535 /* restore curwin/curbuf and a few other things */
eac2556d4620 updated for version 7.2-215 vimboss parents: 1883 diff changeset	5536 aucmd_restbuf(&aco);
9487 69ed2c9d34a6 commit https://github.com/vim/vim/commit/7c0a2f367f2507669560b1a66423155c70d2e75b Christian Brabandt <cb@256bit.org> parents: 9485 diff changeset	5537 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	5538 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	5539
c16e207dc465 commit https://github.com/vim/vim/commit/ea3f2e7be447a8f0c4436869620f908de5e8ef1e Christian Brabandt <cb@256bit.org> parents: 9475 diff changeset	5540 /* 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	5541 * skip it. */
c16e207dc465 commit https://github.com/vim/vim/commit/ea3f2e7be447a8f0c4436869620f908de5e8ef1e Christian Brabandt <cb@256bit.org> parents: 9475 diff changeset	5542 newbuf->b_flags \|= BF_DUMMY;
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5543 }
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5544
3490 8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5545 /*
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5546 * When autocommands/'autochdir' option changed directory: go back.
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5547 * 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	5548 * important.
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5549 */
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5550 mch_dirname(resulting_dir, MAXPATHL);
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5551 restore_start_dir(dirname_start);
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5552
9487 69ed2c9d34a6 commit https://github.com/vim/vim/commit/7c0a2f367f2507669560b1a66423155c70d2e75b Christian Brabandt <cb@256bit.org> parents: 9485 diff changeset	5553 if (!bufref_valid(&newbufref))
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5554 return NULL;
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5555 if (failed)
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5556 {
3490 8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5557 wipe_dummy_buffer(newbuf, dirname_start);
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5558 return NULL;
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5559 }
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5560 return newbuf;
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5561 }
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5562
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5563 /*
3490 8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5564 * 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	5565 * 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	5566 * 'autochdir' option have changed it.
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5567 */
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5568 static void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	5569 wipe_dummy_buffer(buf_T buf, char_u dirname_start)
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5570 {
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5571 if (curbuf != buf) /* safety check */
857 b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5572 {
13380 69517d67421f patch 8.0.1564: too many #ifdefs Christian Brabandt <cb@256bit.org> parents: 13252 diff changeset	5573 #if defined(FEAT_EVAL)
857 b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5574 cleanup_T cs;
b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5575
b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5576 /* Reset the error/interrupt/exception state here so that aborting()
b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5577 * returns FALSE when wiping out the buffer. Otherwise it doesn't
b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5578 * work when got_int is set. */
b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5579 enter_cleanup(&cs);
b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5580 #endif
b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5581
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5582 wipe_buffer(buf, FALSE);
857 b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5583
13380 69517d67421f patch 8.0.1564: too many #ifdefs Christian Brabandt <cb@256bit.org> parents: 13252 diff changeset	5584 #if defined(FEAT_EVAL)
857 b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5585 /* Restore the error/interrupt/exception state if not discarded by a
b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5586 * new aborting error, interrupt, or uncaught exception. */
b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5587 leave_cleanup(&cs);
b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5588 #endif
3490 8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5589 /* When autocommands/'autochdir' option changed directory: go back. */
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5590 restore_start_dir(dirname_start);
857 b933657f7c9d updated for version 7.0g01 vimboss parents: 856 diff changeset	5591 }
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5592 }
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5593
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5594 /*
3490 8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5595 * 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	5596 * 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	5597 * 'autochdir' option have changed it.
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5598 */
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5599 static void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	5600 unload_dummy_buffer(buf_T buf, char_u dirname_start)
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5601 {
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5602 if (curbuf != buf) /* safety check */
3490 8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5603 {
3365 9ccdc4a69d8f updated for version 7.3.449 Bram Moolenaar <bram@vim.org> parents: 3269 diff changeset	5604 close_buffer(NULL, buf, DOBUF_UNLOAD, FALSE);
3490 8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5605
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5606 /* When autocommands/'autochdir' option changed directory: go back. */
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5607 restore_start_dir(dirname_start);
8101253704f6 updated for version 7.3.509 Bram Moolenaar <bram@vim.org> parents: 3404 diff changeset	5608 }
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5609 }
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	5610
170 8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5611 #if defined(FEAT_EVAL) \|\| defined(PROTO)
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5612 /*
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5613 * 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	5614 * 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	5615 */
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5616 int
12252 3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5617 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	5618 {
12252 3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5619 qf_info_T *qi = qi_arg;
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	5620 dict_T *dict;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	5621 char_u buf[2];
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	5622 qfline_T *qfp;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	5623 int i;
1065 caa550fe4457 updated for version 7.0-191 vimboss parents: 1020 diff changeset	5624 int bufnum;
170 8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5625
12252 3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5626 if (qi == NULL)
647 19106f131c87 updated for version 7.0188 vimboss parents: 644 diff changeset	5627 {
12252 3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5628 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	5629 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	5630 {
3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5631 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	5632 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	5633 return FAIL;
3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5634 }
647 19106f131c87 updated for version 7.0188 vimboss parents: 644 diff changeset	5635 }
19106f131c87 updated for version 7.0188 vimboss parents: 644 diff changeset	5636
13800 e4dc4ede9ef8 patch 8.0.1772: quickfix: mixup of FALSE and FAIL, returning -1 Christian Brabandt <cb@256bit.org> parents: 13764 diff changeset	5637 if (qf_idx == INVALID_QFIDX)
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5638 qf_idx = qi->qf_curlist;
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5639
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	5640 if (qf_idx >= qi->qf_listcount \|\| qf_list_empty(qi, qf_idx))
170 8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5641 return FAIL;
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5642
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5643 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	5644 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	5645 {
1065 caa550fe4457 updated for version 7.0-191 vimboss parents: 1020 diff changeset	5646 /* Handle entries with a non-existing buffer number. */
caa550fe4457 updated for version 7.0-191 vimboss parents: 1020 diff changeset	5647 bufnum = qfp->qf_fnum;
caa550fe4457 updated for version 7.0-191 vimboss parents: 1020 diff changeset	5648 if (bufnum != 0 && (buflist_findnr(bufnum) == NULL))
caa550fe4457 updated for version 7.0-191 vimboss parents: 1020 diff changeset	5649 bufnum = 0;
caa550fe4457 updated for version 7.0-191 vimboss parents: 1020 diff changeset	5650
170 8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5651 if ((dict = dict_alloc()) == NULL)
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5652 return FAIL;
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5653 if (list_append_dict(list, dict) == FAIL)
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5654 return FAIL;
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5655
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5656 buf[0] = qfp->qf_type;
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5657 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	5658 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	5659 \|\| 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	5660 \|\| 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	5661 \|\| 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	5662 \|\| 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	5663 \|\| 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	5664 \|\| 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	5665 \|\| 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	5666 \|\| 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	5667 \|\| dict_add_number(dict, "valid", (long)qfp->qf_valid) == FAIL)
170 8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5668 return FAIL;
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5669
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5670 qfp = qfp->qf_next;
9195 543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	5671 if (qfp == NULL)
543f068f3706 commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa Christian Brabandt <cb@256bit.org> parents: 9175 diff changeset	5672 break;
170 8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5673 }
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5674 return OK;
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	5675 }
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	5676
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	5677 /*
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5678 * 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	5679 */
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5680 enum {
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5681 QF_GETLIST_NONE = 0x0,
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5682 QF_GETLIST_TITLE = 0x1,
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5683 QF_GETLIST_ITEMS = 0x2,
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5684 QF_GETLIST_NR = 0x4,
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5685 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	5686 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	5687 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	5688 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	5689 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	5690 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	5691 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	5692 QF_GETLIST_ALL = 0x3FF,
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5693 };
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5694
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5695 /*
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5696 * 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	5697 * 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	5698 */
3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5699 static int
12321 2779d593a706 patch 8.0.1040: cannot use another error format in getqflist() Christian Brabandt <cb@256bit.org> parents: 12303 diff changeset	5700 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	5701 {
3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5702 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	5703 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	5704 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	5705 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	5706 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	5707
12303 ec7a4fd21dd5 patch 8.0.1031: "text" argument for getqflist() is confusing Christian Brabandt <cb@256bit.org> parents: 12299 diff changeset	5708 /* 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	5709 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	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 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	5712 * option setting
2779d593a706 patch 8.0.1040: cannot use another error format in getqflist() Christian Brabandt <cb@256bit.org> parents: 12303 diff changeset	5713 */
2779d593a706 patch 8.0.1040: cannot use another error format in getqflist() Christian Brabandt <cb@256bit.org> parents: 12303 diff changeset	5714 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	5715 {
2779d593a706 patch 8.0.1040: cannot use another error format in getqflist() Christian Brabandt <cb@256bit.org> parents: 12303 diff changeset	5716 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	5717 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	5718 return FAIL;
2779d593a706 patch 8.0.1040: cannot use another error format in getqflist() Christian Brabandt <cb@256bit.org> parents: 12303 diff changeset	5719 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	5720 }
2779d593a706 patch 8.0.1040: cannot use another error format in getqflist() Christian Brabandt <cb@256bit.org> parents: 12303 diff changeset	5721
2779d593a706 patch 8.0.1040: cannot use another error format in getqflist() Christian Brabandt <cb@256bit.org> parents: 12303 diff changeset	5722 l = list_alloc();
12299 f4d00472e617 patch 8.0.1029: return value of getqflist() is inconsistent Christian Brabandt <cb@256bit.org> parents: 12287 diff changeset	5723 if (l == NULL)
f4d00472e617 patch 8.0.1029: return value of getqflist() is inconsistent Christian Brabandt <cb@256bit.org> parents: 12287 diff changeset	5724 return FAIL;
f4d00472e617 patch 8.0.1029: return value of getqflist() is inconsistent Christian Brabandt <cb@256bit.org> parents: 12287 diff changeset	5725
14495 178162aeebeb patch 8.1.0261: Coverity complains about a negative array index Christian Brabandt <cb@256bit.org> parents: 14491 diff changeset	5726 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	5727 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	5728 {
12321 2779d593a706 patch 8.0.1040: cannot use another error format in getqflist() Christian Brabandt <cb@256bit.org> parents: 12303 diff changeset	5729 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	5730 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	5731 {
12299 f4d00472e617 patch 8.0.1029: return value of getqflist() is inconsistent Christian Brabandt <cb@256bit.org> parents: 12287 diff changeset	5732 (void)get_errorlist(qi, NULL, 0, l);
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	5733 qf_free(&qi->qf_lists[0]);
12252 3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5734 }
3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5735 free(qi);
3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5736 }
12299 f4d00472e617 patch 8.0.1029: return value of getqflist() is inconsistent Christian Brabandt <cb@256bit.org> parents: 12287 diff changeset	5737 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	5738 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	5739 }
3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5740
3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5741 return status;
3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5742 }
3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5743
3d0e042ec13c patch 8.0.1006: quickfix list changes when parsing text with 'erroformat' Christian Brabandt <cb@256bit.org> parents: 12146 diff changeset	5744 /*
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	5745 * 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	5746 */
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	5747 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	5748 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	5749 {
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	5750 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	5751
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	5752 /* 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	5753 * 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	5754 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	5755 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	5756 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	5757 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	5758 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	5759 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	5760 }
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	5761
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	5762 /*
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5763 * Convert the keys in 'what' to quickfix list property flags.
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	5764 */
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5765 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	5766 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	5767 {
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5768 int flags = QF_GETLIST_NONE;
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	5769
12287 20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	5770 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	5771 {
12287 20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	5772 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	5773 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	5774 // 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	5775 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	5776 }
12287 20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	5777
20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	5778 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	5779 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	5780
13026 7c0e0e923537 patch 8.0.1389: getqflist() items are missing if not set Christian Brabandt <cb@256bit.org> parents: 13016 diff changeset	5781 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	5782 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	5783
12287 20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	5784 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	5785 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	5786
20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	5787 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	5788 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	5789
13026 7c0e0e923537 patch 8.0.1389: getqflist() items are missing if not set Christian Brabandt <cb@256bit.org> parents: 13016 diff changeset	5790 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	5791 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	5792
12287 20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	5793 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	5794 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	5795
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	5796 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	5797 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	5798
805f7fd40e0d patch 8.0.1112: can't get size or current index from quickfix list Christian Brabandt <cb@256bit.org> parents: 12449 diff changeset	5799 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	5800 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	5801
13062 6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	5802 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	5803 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	5804
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	5805 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	5806 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	5807
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5808 return flags;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5809 }
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5810
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 * 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	5813 * 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	5814 * quickfix list index.
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5815 * 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	5816 * 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	5817 * 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	5818 * 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	5819 * 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	5820 */
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5821 static int
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5822 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	5823 {
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5824 int qf_idx;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5825 dictitem_T *di;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5826
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_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	5828 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	5829 {
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5830 /* 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	5831 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	5832 {
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5833 /* 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	5834 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	5835 {
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5836 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	5837 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	5838 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	5839 }
7c0e0e923537 patch 8.0.1389: getqflist() items are missing if not set Christian Brabandt <cb@256bit.org> parents: 13016 diff changeset	5840 }
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5841 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	5842 && 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	5843 && 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	5844 /* 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	5845 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	5846 else
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	5847 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	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 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	5851 {
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5852 /* 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	5853 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	5854 {
13710 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 * 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	5857 */
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5858 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	5859 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	5860 }
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5861 else
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	5862 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	5863 }
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5864
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5865 return qf_idx;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5866 }
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 /*
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5869 * 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	5870 */
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5871 static int
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5872 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	5873 {
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5874 int status = OK;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5875
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5876 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	5877 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	5878 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	5879 {
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5880 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	5881 if (l != NULL)
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5882 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	5883 else
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5884 status = FAIL;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5885 }
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5886 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	5887 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	5888 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	5889 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	5890 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	5891 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	5892 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	5893 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	5894 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	5895 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	5896 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	5897 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	5898 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	5899 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	5900 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	5901 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	5902
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5903 return status;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5904 }
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5905
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5906 /*
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5907 * 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	5908 */
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5909 static int
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5910 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	5911 {
14301 3c80092eb211 patch 8.1.0166: using dict_add_nr_str() is clumsy Christian Brabandt <cb@256bit.org> parents: 14299 diff changeset	5912 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	5913 }
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5914
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5915 /*
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	5916 * 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	5917 * 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	5918 * 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	5919 */
8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	5920 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	5921 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	5922 {
8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	5923 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	5924
8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	5925 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	5926 {
8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	5927 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	5928 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	5929 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	5930 }
8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	5931
8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	5932 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	5933 }
8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	5934
8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	5935 /*
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5936 * 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	5937 */
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5938 static int
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5939 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	5940 {
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5941 int status = OK;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5942 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	5943 if (l != NULL)
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 (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	5946 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	5947 }
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5948 else
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5949 status = FAIL;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5950
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5951 return status;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5952 }
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5953
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 * 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	5956 */
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5957 static int
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5958 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	5959 {
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5960 int status;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5961 dictitem_T *di;
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 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	5964 {
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5965 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	5966 if (di != NULL)
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5967 {
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5968 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	5969 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	5970 if (status == FAIL)
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5971 dictitem_free(di);
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5972 }
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5973 else
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5974 status = FAIL;
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 else
14301 3c80092eb211 patch 8.1.0166: using dict_add_nr_str() is clumsy Christian Brabandt <cb@256bit.org> parents: 14299 diff changeset	5977 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	5978
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5979 return status;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5980 }
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 /*
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5983 * 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	5984 */
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5985 static int
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5986 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	5987 {
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5988 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	5989 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	5990 /* 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	5991 idx = 0;
14301 3c80092eb211 patch 8.1.0166: using dict_add_nr_str() is clumsy Christian Brabandt <cb@256bit.org> parents: 14299 diff changeset	5992 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	5993 }
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5994
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5995 /*
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	5996 * 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	5997 * 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	5998 * 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	5999 */
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6000 int
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6001 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	6002 {
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6003 qf_info_T *qi = &ql_info;
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6004 qf_list_T *qfl;
13710 b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6005 int status = OK;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6006 int qf_idx;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6007 dictitem_T *di;
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6008 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	6009
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6010 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	6011 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	6012
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6013 if (wp != NULL)
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6014 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	6015
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	6016 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	6017
b33f04873475 patch 8.0.1727: qf_get_properties() function is too long Christian Brabandt <cb@256bit.org> parents: 13660 diff changeset	6018 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	6019 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	6020
7c0e0e923537 patch 8.0.1389: getqflist() items are missing if not set Christian Brabandt <cb@256bit.org> parents: 13016 diff changeset	6021 /* 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	6022 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	6023 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	6024
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6025 qfl = &qi->qf_lists[qf_idx];
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6026
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6027 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	6028 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	6029 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	6030 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	6031 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	6032 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	6033 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	6034 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	6035 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	6036 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	6037 if ((status == OK) && (flags & QF_GETLIST_ID))
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6038 status = dict_add_number(retdict, "id", qfl->qf_id);
12465 805f7fd40e0d patch 8.0.1112: can't get size or current index from quickfix list Christian Brabandt <cb@256bit.org> parents: 12449 diff changeset	6039 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	6040 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	6041 if ((status == OK) && (flags & QF_GETLIST_SIZE))
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6042 status = dict_add_number(retdict, "size", qfl->qf_count);
13062 6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	6043 if ((status == OK) && (flags & QF_GETLIST_TICK))
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6044 status = dict_add_number(retdict, "changedtick", qfl->qf_changedtick);
14664 8770189c3e22 patch 8.1.0345: cannot get the window id associated with the location list Christian Brabandt <cb@256bit.org> parents: 14633 diff changeset	6045 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	6046 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	6047
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6048 return status;
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6049 }
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6050
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6051 /*
14633 462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6052 * 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	6053 * 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	6054 */
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6055 static int
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6056 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	6057 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	6058 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	6059 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	6060 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	6061 {
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6062 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	6063 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	6064 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	6065 long lnum;
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6066
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6067 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	6068 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	6069
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6070 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	6071 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	6072 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	6073 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	6074 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	6075 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	6076 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	6077 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	6078 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	6079 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	6080 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	6081 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	6082
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6083 valid = TRUE;
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6084 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	6085 valid = FALSE;
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6086
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6087 // 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	6088 // 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	6089 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	6090 {
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6091 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	6092 {
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6093 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	6094 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	6095 }
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6096 valid = FALSE;
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6097 bufnum = 0;
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6098 }
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 // 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	6101 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	6102 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	6103
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6104 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	6105 qf_idx,
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6106 NULL, // dir
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6107 filename,
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6108 module,
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6109 bufnum,
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6110 text,
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6111 lnum,
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6112 col,
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6113 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	6114 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	6115 nr,
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6116 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	6117 valid);
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6118
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6119 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	6120 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	6121 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	6122 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	6123 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	6124
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6125 return status;
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6126 }
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6127
462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6128 /*
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6129 * 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	6130 * a dictionary with item information.
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6131 */
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6132 static int
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6133 qf_add_entries(
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6134 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	6135 int qf_idx,
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6136 list_T *list,
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6137 char_u *title,
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6138 int action)
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6139 {
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6140 qf_list_T *qfl = &qi->qf_lists[qf_idx];
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6141 listitem_T *li;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6142 dict_T *d;
9175 d415c079f84e commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3 Christian Brabandt <cb@256bit.org> parents: 9114 diff changeset	6143 qfline_T *old_last = NULL;
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6144 int retval = OK;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	6145
11449 d2f00eb352b9 patch 8.0.0608: cannot manipulate other than the current quickfix list Christian Brabandt <cb@256bit.org> parents: 11447 diff changeset	6146 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	6147 {
277 fe16c18c24a7 updated for version 7.0074 vimboss parents: 273 diff changeset	6148 /* make place for a new list */
3965 eccae034465b updated for version 7.3.738 Bram Moolenaar <bram@vim.org> parents: 3949 diff changeset	6149 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	6150 qf_idx = qi->qf_curlist;
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6151 qfl = &qi->qf_lists[qf_idx];
11449 d2f00eb352b9 patch 8.0.0608: cannot manipulate other than the current quickfix list Christian Brabandt <cb@256bit.org> parents: 11447 diff changeset	6152 }
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	6153 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	6154 /* Adding to existing list, use last entry. */
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6155 old_last = qfl->qf_last;
277 fe16c18c24a7 updated for version 7.0074 vimboss parents: 273 diff changeset	6156 else if (action == 'r')
6079 75ae211df37d updated for version 7.4.378 Bram Moolenaar <bram@vim.org> parents: 5753 diff changeset	6157 {
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6158 qf_free_items(qfl);
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6159 qf_store_title(qfl, title);
6079 75ae211df37d updated for version 7.4.378 Bram Moolenaar <bram@vim.org> parents: 5753 diff changeset	6160 }
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6161
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6162 for (li = list->lv_first; li != NULL; li = li->li_next)
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6163 {
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6164 if (li->li_tv.v_type != VAR_DICT)
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6165 continue; /* Skip non-dict items */
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6166
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6167 d = li->li_tv.vval.v_dict;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6168 if (d == NULL)
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6169 continue;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6170
14633 462087b5c415 patch 8.1.0330: the qf_add_entries() function is too long Christian Brabandt <cb@256bit.org> parents: 14603 diff changeset	6171 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	6172 if (retval == FAIL)
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6173 break;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6174 }
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6175
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6176 if (qfl->qf_index == 0)
2795 133d089f247e updated for version 7.3.173 Bram Moolenaar <bram@vim.org> parents: 2782 diff changeset	6177 /* no valid entry */
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6178 qfl->qf_nonevalid = TRUE;
2146 c17a42da3920 updated for version 7.2.428 Bram Moolenaar <bram@zimbu.org> parents: 2047 diff changeset	6179 else
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6180 qfl->qf_nonevalid = FALSE;
11263 ae5f9f26f81c patch 8.0.0517: there is no way to remove quickfix lists Christian Brabandt <cb@256bit.org> parents: 11195 diff changeset	6181 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	6182 {
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6183 qfl->qf_ptr = qfl->qf_start;
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	6184 if (!qf_list_empty(qi, qf_idx))
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6185 qfl->qf_index = 1;
8932 25c2031e9f9f commit https://github.com/vim/vim/commit/c1808d5822ed9534ef7f0fe509b15bee92a5cc28 Christian Brabandt <cb@256bit.org> parents: 8751 diff changeset	6186 }
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6187
8932 25c2031e9f9f commit https://github.com/vim/vim/commit/c1808d5822ed9534ef7f0fe509b15bee92a5cc28 Christian Brabandt <cb@256bit.org> parents: 8751 diff changeset	6188 /* 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	6189 qf_update_buffer(qi, old_last);
230 9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6190
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6191 return retval;
9281a51ca7a2 updated for version 7.0064 vimboss parents: 189 diff changeset	6192 }
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6193
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6194 /*
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6195 * 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	6196 */
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6197 static int
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6198 qf_setprop_get_qfidx(
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6199 qf_info_T *qi,
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6200 dict_T *what,
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6201 int action,
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6202 int *newlist)
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6203 {
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6204 dictitem_T *di;
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6205 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	6206
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6207 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	6208 {
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6209 /* Use the specified quickfix/location list */
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6210 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	6211 {
11445 461ac47c3793 patch 8.0.0606: cannot set the context for a specified quickfix list Christian Brabandt <cb@256bit.org> parents: 11443 diff changeset	6212 /* 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	6213 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	6214 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	6215
12084 69ce6b3f0834 patch 8.0.0922: quickfix list always added after current one Christian Brabandt <cb@256bit.org> parents: 12048 diff changeset	6216 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	6217 {
11549 f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	6218 /*
f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	6219 * 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	6220 * 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	6221 * stack.
11549 f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	6222 */
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6223 *newlist = TRUE;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6224 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	6225 }
11549 f5add45f9848 patch 8.0.0657: cannot get and set quickfix list items Christian Brabandt <cb@256bit.org> parents: 11521 diff changeset	6226 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	6227 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	6228 else if (action != ' ')
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6229 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	6230 }
69ce6b3f0834 patch 8.0.0922: quickfix list always added after current one Christian Brabandt <cb@256bit.org> parents: 12048 diff changeset	6231 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	6232 && 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	6233 && 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	6234 {
12084 69ce6b3f0834 patch 8.0.0922: quickfix list always added after current one Christian Brabandt <cb@256bit.org> parents: 12048 diff changeset	6235 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	6236 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	6237 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	6238 qf_idx = 0;
69ce6b3f0834 patch 8.0.0922: quickfix list always added after current one Christian Brabandt <cb@256bit.org> parents: 12048 diff changeset	6239 else
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6240 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	6241 }
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6242 else
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6243 return INVALID_QFIDX;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6244 }
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6245
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6246 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	6247 {
20641a7e1fc9 patch 8.0.1023: it is not easy to identify a quickfix list Christian Brabandt <cb@256bit.org> parents: 12252 diff changeset	6248 /* 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	6249 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	6250 return INVALID_QFIDX;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6251
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6252 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	6253 }
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 return qf_idx;
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
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 * 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	6260 */
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6261 static int
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6262 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	6263 {
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6264 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	6265 return FAIL;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6266
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6267 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	6268 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 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	6270 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	6271 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	6272
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6273 return OK;
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.
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(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	6281 {
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6282 int retval = FAIL;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6283 char_u *title_save;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6284
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6285 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	6286 return FAIL;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6287
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6288 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	6289 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	6290 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	6291 vim_free(title_save);
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6292
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6293 return retval;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6294 }
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6295
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6296 /*
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6297 * 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	6298 */
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6299 static int
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6300 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	6301 qf_info_T *qi,
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6302 int qf_idx,
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6303 dict_T *what,
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6304 dictitem_T *di,
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6305 int action)
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6306 {
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6307 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	6308 dictitem_T *efm_di;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6309 int retval = FAIL;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6310
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6311 /* 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	6312 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	6313 {
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6314 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	6315 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	6316 return FAIL;
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6317 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	6318 }
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6319
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6320 /* 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	6321 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	6322 return FAIL;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6323
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6324 if (action == 'r')
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6325 qf_free_items(&qi->qf_lists[qf_idx]);
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6326 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	6327 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	6328 retval = OK;
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 return retval;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6331 }
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6332
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6333 /*
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6334 * Set quickfix list context.
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6335 */
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6336 static int
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6337 qf_setprop_context(qf_list_T qfl, dictitem_T di)
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6338 {
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6339 typval_T *ctx;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6340
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6341 free_tv(qfl->qf_ctx);
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6342 ctx = alloc_tv();
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6343 if (ctx != NULL)
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6344 copy_tv(&di->di_tv, ctx);
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6345 qfl->qf_ctx = ctx;
13760 aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6346
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6347 return OK;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6348 }
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6349
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6350 /*
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6351 * Set 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	6352 * 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	6353 * 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	6354 */
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6355 static int
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6356 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	6357 {
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6358 dictitem_T *di;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6359 int retval = FAIL;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6360 int qf_idx;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6361 int newlist = FALSE;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6362
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6363 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	6364 newlist = TRUE;
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6365
aef8ba129a4f patch 8.0.1752: qf_set_properties() is to long Christian Brabandt <cb@256bit.org> parents: 13756 diff changeset	6366 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	6367 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	6368 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	6369
9982 e24aa20d815c commit https://github.com/vim/vim/commit/2b529bb6260b52246e92429375d995b9b5ce76b6 Christian Brabandt <cb@256bit.org> parents: 9931 diff changeset	6370 if (newlist)
e24aa20d815c commit https://github.com/vim/vim/commit/2b529bb6260b52246e92429375d995b9b5ce76b6 Christian Brabandt <cb@256bit.org> parents: 9931 diff changeset	6371 {
12084 69ce6b3f0834 patch 8.0.0922: quickfix list always added after current one Christian Brabandt <cb@256bit.org> parents: 12048 diff changeset	6372 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	6373 qf_new_list(qi, title);
9982 e24aa20d815c commit https://github.com/vim/vim/commit/2b529bb6260b52246e92429375d995b9b5ce76b6 Christian Brabandt <cb@256bit.org> parents: 9931 diff changeset	6374 qf_idx = qi->qf_curlist;
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6375 }
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6376
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6377 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	6378 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	6379 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	6380 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	6381 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	6382 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	6383 if ((di = dict_find(what, (char_u *)"context", -1)) != NULL)
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6384 retval = qf_setprop_context(&qi->qf_lists[qf_idx], di);
11412 84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6385
13062 6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	6386 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	6387 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	6388
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6389 return retval;
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6390 }
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6391
11301 cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6392 /*
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6393 * Find the non-location list window with the specified location list in the
3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6394 * current tabpage.
11301 cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6395 */
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6396 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	6397 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	6398 {
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6399 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	6400
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6401 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	6402 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	6403 return wp;
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 return NULL;
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6406 }
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 /*
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6409 * 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	6410 * 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	6411 */
11263 ae5f9f26f81c patch 8.0.0517: there is no way to remove quickfix lists Christian Brabandt <cb@256bit.org> parents: 11195 diff changeset	6412 static void
ae5f9f26f81c patch 8.0.0517: there is no way to remove quickfix lists Christian Brabandt <cb@256bit.org> parents: 11195 diff changeset	6413 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	6414 {
11301 cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6415 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	6416 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	6417 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	6418
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6419 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	6420 {
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6421 /* 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	6422 if (qi->qf_curlist < qi->qf_listcount)
14790 3ca7aba1116e patch 8.1.0407: quickfix code mixes using the stack and a list pointer Christian Brabandt <cb@256bit.org> parents: 14664 diff changeset	6423 qf_free(&qi->qf_lists[qi->qf_curlist]);
11301 cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6424 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	6425 }
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6426
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6427 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	6428 {
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6429 /* 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	6430 * 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	6431 */
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6432 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	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 wp = llwin;
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6435 }
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6436
11263 ae5f9f26f81c patch 8.0.0517: there is no way to remove quickfix lists Christian Brabandt <cb@256bit.org> parents: 11195 diff changeset	6437 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	6438 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	6439 {
ae5f9f26f81c patch 8.0.0517: there is no way to remove quickfix lists Christian Brabandt <cb@256bit.org> parents: 11195 diff changeset	6440 /* quickfix list */
ae5f9f26f81c patch 8.0.0517: there is no way to remove quickfix lists Christian Brabandt <cb@256bit.org> parents: 11195 diff changeset	6441 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	6442 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	6443 }
11301 cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6444 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	6445 {
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6446 /* 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	6447 * location list */
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6448 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	6449
11398 30af33f4d353 patch 8.0.0584: memory leak when executing quickfix tests Christian Brabandt <cb@256bit.org> parents: 11390 diff changeset	6450 /* 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	6451 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	6452
11301 cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6453 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	6454 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	6455 {
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6456 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	6457 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	6458 }
cc8ece2aa389 patch 8.0.0536: quickfix window not updated when freeing quickfix stack Christian Brabandt <cb@256bit.org> parents: 11263 diff changeset	6459 }
11263 ae5f9f26f81c patch 8.0.0517: there is no way to remove quickfix lists Christian Brabandt <cb@256bit.org> parents: 11195 diff changeset	6460 }
ae5f9f26f81c patch 8.0.0517: there is no way to remove quickfix lists Christian Brabandt <cb@256bit.org> parents: 11195 diff changeset	6461
9850 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 * 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	6464 * 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	6465 * "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	6466 */
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6467 int
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6468 set_errorlist(
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6469 win_T *wp,
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6470 list_T *list,
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6471 int action,
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6472 char_u *title,
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6473 dict_T *what)
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6474 {
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6475 qf_info_T *qi = &ql_info;
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6476 int retval = OK;
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 if (wp != NULL)
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6479 {
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6480 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	6481 if (qi == NULL)
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6482 return FAIL;
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6483 }
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6484
11263 ae5f9f26f81c patch 8.0.0517: there is no way to remove quickfix lists Christian Brabandt <cb@256bit.org> parents: 11195 diff changeset	6485 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	6486 {
ae5f9f26f81c patch 8.0.0517: there is no way to remove quickfix lists Christian Brabandt <cb@256bit.org> parents: 11195 diff changeset	6487 /* 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	6488 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	6489 }
ae5f9f26f81c patch 8.0.0517: there is no way to remove quickfix lists Christian Brabandt <cb@256bit.org> parents: 11195 diff changeset	6490 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	6491 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	6492 else
13062 6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	6493 {
11449 d2f00eb352b9 patch 8.0.0608: cannot manipulate other than the current quickfix list Christian Brabandt <cb@256bit.org> parents: 11447 diff changeset	6494 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	6495 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	6496 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	6497 }
9850 67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6498
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6499 return retval;
67781bb0a61a commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640 Christian Brabandt <cb@256bit.org> parents: 9738 diff changeset	6500 }
11412 84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6501
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	6502 /*
1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	6503 * 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	6504 */
11412 84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6505 static int
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6506 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	6507 {
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6508 int i;
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 typval_T *ctx;
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6511
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6512 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	6513 {
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6514 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	6515 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	6516 && 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	6517 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	6518 }
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6519
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6520 return abort;
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6521 }
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6522
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6523 /*
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6524 * 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	6525 * "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	6526 */
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6527 int
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6528 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	6529 {
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6530 int abort = FALSE;
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6531 tabpage_T *tp;
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6532 win_T *win;
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6533
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6534 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	6535 if (abort)
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6536 return abort;
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6537
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6538 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	6539 {
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6540 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	6541 {
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6542 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	6543 if (abort)
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6544 return abort;
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6545 }
13074 66c014c71dad patch 8.0.1412: using free memory using setloclist() Christian Brabandt <cb@256bit.org> parents: 13066 diff changeset	6546 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	6547 {
66c014c71dad patch 8.0.1412: using free memory using setloclist() Christian Brabandt <cb@256bit.org> parents: 13066 diff changeset	6548 /* 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	6549 * 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	6550 * context as still in use.
66c014c71dad patch 8.0.1412: using free memory using setloclist() Christian Brabandt <cb@256bit.org> parents: 13066 diff changeset	6551 */
66c014c71dad patch 8.0.1412: using free memory using setloclist() Christian Brabandt <cb@256bit.org> parents: 13066 diff changeset	6552 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	6553 if (abort)
66c014c71dad patch 8.0.1412: using free memory using setloclist() Christian Brabandt <cb@256bit.org> parents: 13066 diff changeset	6554 return abort;
66c014c71dad patch 8.0.1412: using free memory using setloclist() Christian Brabandt <cb@256bit.org> parents: 13066 diff changeset	6555 }
11412 84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6556 }
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6557
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6558 return abort;
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11398 diff changeset	6559 }
170 8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	6560 #endif
8c60f65311fa updated for version 7.0052 vimboss parents: 167 diff changeset	6561
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	6562 /*
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6563 * ":[range]cbuffer [bufnr]" command.
657 b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	6564 * ":[range]caddbuffer [bufnr]" command.
798 95dac6af3b3a updated for version 7.0232 vimboss parents: 789 diff changeset	6565 * ":[range]cgetbuffer [bufnr]" command.
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	6566 * ":[range]lbuffer [bufnr]" command.
657 b112ec5c73f0 updated for version 7.0193 vimboss parents: 648 diff changeset	6567 * ":[range]laddbuffer [bufnr]" command.
798 95dac6af3b3a updated for version 7.0232 vimboss parents: 789 diff changeset	6568 * ":[range]lgetbuffer [bufnr]" command.
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6569 */
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6570 void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	6571 ex_cbuffer(exarg_T *eap)
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6572 {
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6573 buf_T *buf = NULL;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	6574 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	6575 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	6576 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	6577 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	6578 win_T *wp = NULL;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	6579
10056 21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6580 switch (eap->cmdidx)
21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6581 {
21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6582 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	6583 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	6584 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	6585 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	6586 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	6587 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	6588 default: break;
21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6589 }
10346 d52d97bf675e commit https://github.com/vim/vim/commit/21662be2211675824df1771c7f169948ede40c41 Christian Brabandt <cb@256bit.org> parents: 10281 diff changeset	6590 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	6591 curbuf->b_fname, TRUE, curbuf))
10056 21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6592 {
13380 69517d67421f patch 8.0.1564: too many #ifdefs Christian Brabandt <cb@256bit.org> parents: 13252 diff changeset	6593 #ifdef FEAT_EVAL
10346 d52d97bf675e commit https://github.com/vim/vim/commit/21662be2211675824df1771c7f169948ede40c41 Christian Brabandt <cb@256bit.org> parents: 10281 diff changeset	6594 if (aborting())
10056 21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6595 return;
21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6596 #endif
13380 69517d67421f patch 8.0.1564: too many #ifdefs Christian Brabandt <cb@256bit.org> parents: 13252 diff changeset	6597 }
10056 21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6598
13076 7c071a3f7f8e patch 8.0.1413: accessing freed memory in :cbuffer Christian Brabandt <cb@256bit.org> parents: 13074 diff changeset	6599 /* 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	6600 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	6601 {
7c071a3f7f8e patch 8.0.1413: accessing freed memory in :cbuffer Christian Brabandt <cb@256bit.org> parents: 13074 diff changeset	6602 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	6603 if (qi == NULL)
7c071a3f7f8e patch 8.0.1413: accessing freed memory in :cbuffer Christian Brabandt <cb@256bit.org> parents: 13074 diff changeset	6604 return;
14250 ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	6605 wp = curwin;
13076 7c071a3f7f8e patch 8.0.1413: accessing freed memory in :cbuffer Christian Brabandt <cb@256bit.org> parents: 13074 diff changeset	6606 }
7c071a3f7f8e patch 8.0.1413: accessing freed memory in :cbuffer Christian Brabandt <cb@256bit.org> parents: 13074 diff changeset	6607
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6608 if (*eap->arg == NUL)
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6609 buf = curbuf;
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6610 else if (*skipwhite(skipdigits(eap->arg)) == NUL)
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6611 buf = buflist_findnr(atoi((char *)eap->arg));
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6612 if (buf == NULL)
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6613 EMSG(_(e_invarg));
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6614 else if (buf->b_ml.ml_mfp == NULL)
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6615 EMSG(_("E681: Buffer is not loaded"));
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6616 else
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6617 {
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6618 if (eap->addr_count == 0)
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6619 {
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6620 eap->line1 = 1;
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6621 eap->line2 = buf->b_ml.ml_line_count;
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6622 }
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6623 if (eap->line1 < 1 \|\| eap->line1 > buf->b_ml.ml_line_count
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6624 \|\| eap->line2 < 1 \|\| eap->line2 > buf->b_ml.ml_line_count)
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6625 EMSG(_(e_invrange));
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6626 else
661 e93a99ef31d0 updated for version 7.0195 vimboss parents: 659 diff changeset	6627 {
13921 3b6c29f8c1a2 patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':' Christian Brabandt <cb@256bit.org> parents: 13882 diff changeset	6628 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	6629
68e394361ca3 Add "q" item for 'statusline'. Add w:quickfix_title. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2296 diff changeset	6630 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	6631 {
68e394361ca3 Add "q" item for 'statusline'. Add w:quickfix_title. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2296 diff changeset	6632 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	6633 (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	6634 qf_title = IObuff;
68e394361ca3 Add "q" item for 'statusline'. Add w:quickfix_title. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2296 diff changeset	6635 }
68e394361ca3 Add "q" item for 'statusline'. Add w:quickfix_title. (Lech Lorens) Bram Moolenaar <bram@vim.org> parents: 2296 diff changeset	6636
12954 49e136457c66 patch 8.0.1353: QuickFixCmdPost is not used consistently Christian Brabandt <cb@256bit.org> parents: 12912 diff changeset	6637 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	6638 (eap->cmdidx != CMD_caddbuffer
95dac6af3b3a updated for version 7.0232 vimboss parents: 789 diff changeset	6639 && 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	6640 eap->line1, eap->line2,
12954 49e136457c66 patch 8.0.1353: QuickFixCmdPost is not used consistently Christian Brabandt <cb@256bit.org> parents: 12912 diff changeset	6641 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	6642 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	6643 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	6644
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	6645 // 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	6646 // 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	6647 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	6648 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	6649 {
59e76d550c10 patch 8.1.0060: crash when autocommands delete the current buffer Christian Brabandt <cb@256bit.org> parents: 13992 diff changeset	6650 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	6651
12954 49e136457c66 patch 8.0.1353: QuickFixCmdPost is not used consistently Christian Brabandt <cb@256bit.org> parents: 12912 diff changeset	6652 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	6653 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	6654 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	6655 // 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	6656 // be invalid.
59e76d550c10 patch 8.1.0060: crash when autocommands delete the current buffer Christian Brabandt <cb@256bit.org> parents: 13992 diff changeset	6657 res = 0;
59e76d550c10 patch 8.1.0060: crash when autocommands delete the current buffer Christian Brabandt <cb@256bit.org> parents: 13992 diff changeset	6658 }
14250 ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	6659 // 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	6660 // free the list.
12954 49e136457c66 patch 8.0.1353: QuickFixCmdPost is not used consistently Christian Brabandt <cb@256bit.org> parents: 12912 diff changeset	6661 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	6662 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	6663 && qflist_valid(wp, save_qfid))
14469 0211e295835e patch 8.1.0248: duplicated quickfix code Christian Brabandt <cb@256bit.org> parents: 14433 diff changeset	6664 // display the first error
0211e295835e patch 8.1.0248: duplicated quickfix code Christian Brabandt <cb@256bit.org> parents: 14433 diff changeset	6665 qf_jump_first(qi, save_qfid, eap->forceit);
661 e93a99ef31d0 updated for version 7.0195 vimboss parents: 659 diff changeset	6666 }
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6667 }
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6668 }
f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6669
532 7052f11a3dc9 updated for version 7.0150 vimboss parents: 531 diff changeset	6670 #if defined(FEAT_EVAL) \|\| defined(PROTO)
41 f529edb9bab3 updated for version 7.0025 vimboss parents: 26 diff changeset	6671 /*
798 95dac6af3b3a updated for version 7.0232 vimboss parents: 789 diff changeset	6672 * ":cexpr {expr}", ":cgetexpr {expr}", ":caddexpr {expr}" command.
95dac6af3b3a updated for version 7.0232 vimboss parents: 789 diff changeset	6673 * ":lexpr {expr}", ":lgetexpr {expr}", ":laddexpr {expr}" command.
446 7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	6674 */
7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	6675 void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	6676 ex_cexpr(exarg_T *eap)
446 7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	6677 {
7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	6678 typval_T *tv;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	6679 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	6680 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	6681 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	6682 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	6683 win_T *wp = NULL;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	6684
10056 21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6685 switch (eap->cmdidx)
21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6686 {
21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6687 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	6688 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	6689 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	6690 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	6691 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	6692 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	6693 default: break;
21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6694 }
10346 d52d97bf675e commit https://github.com/vim/vim/commit/21662be2211675824df1771c7f169948ede40c41 Christian Brabandt <cb@256bit.org> parents: 10281 diff changeset	6695 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	6696 curbuf->b_fname, TRUE, curbuf))
10056 21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6697 {
13380 69517d67421f patch 8.0.1564: too many #ifdefs Christian Brabandt <cb@256bit.org> parents: 13252 diff changeset	6698 #ifdef FEAT_EVAL
10346 d52d97bf675e commit https://github.com/vim/vim/commit/21662be2211675824df1771c7f169948ede40c41 Christian Brabandt <cb@256bit.org> parents: 10281 diff changeset	6699 if (aborting())
10056 21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6700 return;
21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6701 #endif
13380 69517d67421f patch 8.0.1564: too many #ifdefs Christian Brabandt <cb@256bit.org> parents: 13252 diff changeset	6702 }
10056 21f685af3fc1 commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	6703
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	6704 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	6705 {
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	6706 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	6707 if (qi == NULL)
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	6708 return;
14250 ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	6709 wp = curwin;
13090 a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	6710 }
a0c6910e7fa4 patch 8.0.1420: accessing freed memory in vimgrep Christian Brabandt <cb@256bit.org> parents: 13078 diff changeset	6711
625 81fe2ccc1207 updated for version 7.0179 vimboss parents: 581 diff changeset	6712 /* 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	6713 * use it to fill the errorlist. */
446 7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	6714 tv = eval_expr(eap->arg, NULL);
625 81fe2ccc1207 updated for version 7.0179 vimboss parents: 581 diff changeset	6715 if (tv != NULL)
81fe2ccc1207 updated for version 7.0179 vimboss parents: 581 diff changeset	6716 {
81fe2ccc1207 updated for version 7.0179 vimboss parents: 581 diff changeset	6717 if ((tv->v_type == VAR_STRING && tv->vval.v_string != NULL)
81fe2ccc1207 updated for version 7.0179 vimboss parents: 581 diff changeset	6718 \|\| (tv->v_type == VAR_LIST && tv->vval.v_list != NULL))
81fe2ccc1207 updated for version 7.0179 vimboss parents: 581 diff changeset	6719 {
12954 49e136457c66 patch 8.0.1353: QuickFixCmdPost is not used consistently Christian Brabandt <cb@256bit.org> parents: 12912 diff changeset	6720 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	6721 (eap->cmdidx != CMD_caddexpr
95dac6af3b3a updated for version 7.0232 vimboss parents: 789 diff changeset	6722 && 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	6723 (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	6724 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	6725 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	6726 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	6727
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	6728 // 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	6729 // 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	6730 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	6731 if (au_name != NULL)
49e136457c66 patch 8.0.1353: QuickFixCmdPost is not used consistently Christian Brabandt <cb@256bit.org> parents: 12912 diff changeset	6732 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	6733 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	6734
ca6ccee4823f patch 8.1.0141: :cexpr no longer jumps to the first error Christian Brabandt <cb@256bit.org> parents: 14113 diff changeset	6735 // 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	6736 // free the list.
14111 678e326bf7eb patch 8.1.0073: crash when autocommands call setloclist() Christian Brabandt <cb@256bit.org> parents: 14085 diff changeset	6737 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	6738 \|\| 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	6739 && qflist_valid(wp, save_qfid))
14469 0211e295835e patch 8.1.0248: duplicated quickfix code Christian Brabandt <cb@256bit.org> parents: 14433 diff changeset	6740 // display the first error
0211e295835e patch 8.1.0248: duplicated quickfix code Christian Brabandt <cb@256bit.org> parents: 14433 diff changeset	6741 qf_jump_first(qi, save_qfid, eap->forceit);
625 81fe2ccc1207 updated for version 7.0179 vimboss parents: 581 diff changeset	6742 }
81fe2ccc1207 updated for version 7.0179 vimboss parents: 581 diff changeset	6743 else
626 732c7ae5743e updated for version 7.0180 vimboss parents: 625 diff changeset	6744 EMSG(_("E777: String or List expected"));
625 81fe2ccc1207 updated for version 7.0179 vimboss parents: 581 diff changeset	6745 free_tv(tv);
81fe2ccc1207 updated for version 7.0179 vimboss parents: 581 diff changeset	6746 }
446 7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	6747 }
532 7052f11a3dc9 updated for version 7.0150 vimboss parents: 531 diff changeset	6748 #endif
446 7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	6749
7472c565592a updated for version 7.0117 vimboss parents: 418 diff changeset	6750 /*
13764 7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6751 * 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	6752 */
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6753 static qf_info_T *
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6754 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	6755 {
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6756 win_T *wp;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6757 qf_info_T *qi;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6758
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6759 /* 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	6760 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	6761 wp = curwin;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6762 else
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6763 /* 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	6764 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	6765
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6766 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	6767 qi = NULL;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6768 else
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6769 qi = wp->w_llist;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6770
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6771 if (qi == NULL)
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 /* 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	6774 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	6775 return NULL;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6776 *new_ll = TRUE;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6777 }
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6778
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6779 return qi;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6780 }
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6781
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 * 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	6784 */
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6785 static void
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6786 hgr_search_file(
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6787 qf_info_T *qi,
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6788 char_u *fname,
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6789 #ifdef FEAT_MBYTE
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6790 vimconv_T *p_vc,
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6791 #endif
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6792 regmatch_T *p_regmatch)
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 FILE *fd;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6795 long lnum;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6796
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6797 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	6798 if (fd == NULL)
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6799 return;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6800
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6801 lnum = 1;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6802 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	6803 {
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6804 char_u *line = IObuff;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6805 #ifdef FEAT_MBYTE
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6806 /* 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	6807 * 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	6808 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	6809 && has_non_ascii(IObuff))
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6810 {
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6811 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	6812 if (line == NULL)
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6813 line = IObuff;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6814 }
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6815 #endif
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6816
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6817 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	6818 {
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6819 int l = (int)STRLEN(line);
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 /* 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	6822 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	6823 line[--l] = NUL;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6824
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6825 if (qf_add_entry(qi,
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6826 qi->qf_curlist,
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6827 NULL, /* dir */
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6828 fname,
13821 98274127d675 patch 8.0.1782: no simple way to label quickfix entries Christian Brabandt <cb@256bit.org> parents: 13819 diff changeset	6829 NULL,
13764 7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6830 0,
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6831 line,
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6832 lnum,
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6833 (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	6834 + 1, /* col */
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6835 FALSE, /* vis_col */
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6836 NULL, /* search pattern */
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6837 0, /* nr */
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6838 1, /* type */
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6839 TRUE /* valid */
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6840 ) == FAIL)
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6841 {
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6842 got_int = TRUE;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6843 #ifdef FEAT_MBYTE
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6844 if (line != IObuff)
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6845 vim_free(line);
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6846 #endif
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6847 break;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6848 }
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6849 }
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6850 #ifdef FEAT_MBYTE
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6851 if (line != IObuff)
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6852 vim_free(line);
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 ++lnum;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6855 line_breakcheck();
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6856 }
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6857 fclose(fd);
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6858 }
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 /*
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6861 * 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	6862 * the given directory.
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6863 */
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6864 static void
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6865 hgr_search_files_in_dir(
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6866 qf_info_T *qi,
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6867 char_u *dirname,
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6868 regmatch_T *p_regmatch
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6869 #ifdef FEAT_MBYTE
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6870 , vimconv_T *p_vc
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6871 #endif
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6872 #ifdef FEAT_MULTI_LANG
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6873 , char_u *lang
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6874 #endif
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6875 )
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6876 {
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6877 int fcount;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6878 char_u **fnames;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6879 int fi;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6880
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6881 /* 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	6882 add_pathsep(dirname);
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6883 STRCAT(dirname, "doc/*.\$txt\\\|??x\$");
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6884 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	6885 &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	6886 && fcount > 0)
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 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	6889 {
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6890 #ifdef FEAT_MULTI_LANG
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6891 /* 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	6892 if (lang != NULL
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6893 && 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	6894 + 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	6895 && !(STRNICMP(lang, "en", 2) == 0
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6896 && STRNICMP("txt", fnames[fi]
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6897 + 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	6898 continue;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6899 #endif
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 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	6902 #ifdef FEAT_MBYTE
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6903 p_vc,
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6904 #endif
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6905 p_regmatch);
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6906 }
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6907 FreeWild(fcount, fnames);
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6908 }
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6909 }
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 * 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	6913 * 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	6914 * '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	6915 * specified language are found.
13764 7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6916 */
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6917 static void
14603 d1b69129db99 patch 8.1.0315: helpgrep with language doesn't work properly Christian Brabandt <cb@256bit.org> parents: 14560 diff changeset	6918 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	6919 {
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6920 char_u *p;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6921
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6922 #ifdef FEAT_MBYTE
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6923 vimconv_T vc;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6924
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6925 /* 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	6926 * differs. */
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6927 vc.vc_type = CONV_NONE;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6928 if (!enc_utf8)
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6929 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	6930 #endif
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6931
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6932
13868 1282a54c1f5a patch 8.0.1805: qf_parse_line() is too long Christian Brabandt <cb@256bit.org> parents: 13821 diff changeset	6933 /* 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	6934 p = p_rtp;
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6935 while (*p != NUL && !got_int)
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6936 {
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6937 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	6938
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6939 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	6940 #ifdef FEAT_MBYTE
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6941 , &vc
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6942 #endif
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6943 #ifdef FEAT_MULTI_LANG
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6944 , lang
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6945 #endif
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6946 );
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6947 }
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6948
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6949 #ifdef FEAT_MBYTE
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6950 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	6951 convert_setup(&vc, NULL, NULL);
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6952 #endif
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6953 }
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6954
7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6955 /*
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6956 * ":helpgrep {pattern}"
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6957 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6958 void
7833 c079097365f3 commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f Christian Brabandt <cb@256bit.org> parents: 7805 diff changeset	6959 ex_helpgrep(exarg_T *eap)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6960 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6961 regmatch_T regmatch;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6962 char_u *save_cpo;
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	6963 qf_info_T *qi = &ql_info;
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	6964 int new_qi = FALSE;
3269 5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	6965 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	6966 char_u *lang = NULL;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6967
3269 5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	6968 switch (eap->cmdidx)
5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	6969 {
5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	6970 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	6971 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	6972 default: break;
5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	6973 }
10346 d52d97bf675e commit https://github.com/vim/vim/commit/21662be2211675824df1771c7f169948ede40c41 Christian Brabandt <cb@256bit.org> parents: 10281 diff changeset	6974 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	6975 curbuf->b_fname, TRUE, curbuf))
3269 5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	6976 {
13380 69517d67421f patch 8.0.1564: too many #ifdefs Christian Brabandt <cb@256bit.org> parents: 13252 diff changeset	6977 #ifdef FEAT_EVAL
10346 d52d97bf675e commit https://github.com/vim/vim/commit/21662be2211675824df1771c7f169948ede40c41 Christian Brabandt <cb@256bit.org> parents: 10281 diff changeset	6978 if (aborting())
3269 5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	6979 return;
5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	6980 #endif
13380 69517d67421f patch 8.0.1564: too many #ifdefs Christian Brabandt <cb@256bit.org> parents: 13252 diff changeset	6981 }
3269 5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	6982
14603 d1b69129db99 patch 8.1.0315: helpgrep with language doesn't work properly Christian Brabandt <cb@256bit.org> parents: 14560 diff changeset	6983 // 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	6984 save_cpo = p_cpo;
5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	6985 p_cpo = empty_option;
5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	6986
14550 60b9b6196644 patch 8.1.0288: quickfix code uses cmdidx too often Christian Brabandt <cb@256bit.org> parents: 14507 diff changeset	6987 if (is_loclist_cmd(eap->cmdidx))
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	6988 {
13764 7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6989 qi = hgr_get_ll(&new_qi);
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	6990 if (qi == NULL)
13764 7bba231fdddc patch 8.0.1754: ex_helpgrep() is too long Christian Brabandt <cb@256bit.org> parents: 13760 diff changeset	6991 return;
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	6992 }
d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	6993
14603 d1b69129db99 patch 8.1.0315: helpgrep with language doesn't work properly Christian Brabandt <cb@256bit.org> parents: 14560 diff changeset	6994 #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	6995 // 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	6996 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	6997 #endif
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6998 regmatch.regprog = vim_regcomp(eap->arg, RE_MAGIC + RE_STRING);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6999 regmatch.rm_ic = FALSE;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	7000 if (regmatch.regprog != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	7001 {
14603 d1b69129db99 patch 8.1.0315: helpgrep with language doesn't work properly Christian Brabandt <cb@256bit.org> parents: 14560 diff changeset	7002 // 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	7003 qf_new_list(qi, qf_cmdtitle(*eap->cmdlinep));
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	7004
14603 d1b69129db99 patch 8.1.0315: helpgrep with language doesn't work properly Christian Brabandt <cb@256bit.org> parents: 14560 diff changeset	7005 hgr_search_in_rtp(qi, &regmatch, lang);
3257 75217982ea46 updated for version 7.3.397 Bram Moolenaar <bram@vim.org> parents: 3242 diff changeset	7006
4805 66803af09906 updated for version 7.3.1149 Bram Moolenaar <bram@vim.org> parents: 4371 diff changeset	7007 vim_regfree(regmatch.regprog);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	7008
644 e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	7009 qi->qf_lists[qi->qf_curlist].qf_nonevalid = FALSE;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	7010 qi->qf_lists[qi->qf_curlist].qf_ptr =
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	7011 qi->qf_lists[qi->qf_curlist].qf_start;
e4fa26ce8769 updated for version 7.0187 vimboss parents: 639 diff changeset	7012 qi->qf_lists[qi->qf_curlist].qf_index = 1;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	7013 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	7014
1672 fddea6c03dee updated for version 7.2b-004 vimboss parents: 1668 diff changeset	7015 if (p_cpo == empty_option)
fddea6c03dee updated for version 7.2b-004 vimboss parents: 1668 diff changeset	7016 p_cpo = save_cpo;
fddea6c03dee updated for version 7.2b-004 vimboss parents: 1668 diff changeset	7017 else
14603 d1b69129db99 patch 8.1.0315: helpgrep with language doesn't work properly Christian Brabandt <cb@256bit.org> parents: 14560 diff changeset	7018 // Darn, some plugin changed the value.
1672 fddea6c03dee updated for version 7.2b-004 vimboss parents: 1668 diff changeset	7019 free_string_option(save_cpo);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	7020
13062 6479dadcf214 patch 8.0.1406: difficult to track changes to a quickfix list Christian Brabandt <cb@256bit.org> parents: 13056 diff changeset	7021 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	7022 qf_update_buffer(qi, NULL);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	7023
3269 5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	7024 if (au_name != NULL)
5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	7025 {
5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	7026 apply_autocmds(EVENT_QUICKFIXCMDPOST, au_name,
5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	7027 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	7028 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	7029 /* autocommands made "qi" invalid */
5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	7030 return;
5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	7031 }
5850b5827691 updated for version 7.3.403 Bram Moolenaar <bram@vim.org> parents: 3267 diff changeset	7032
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	7033 /* Jump to first match. */
14477 1ccf5dcd88ca patch 8.1.0252: quickfix functions are too long Christian Brabandt <cb@256bit.org> parents: 14469 diff changeset	7034 if (!qf_list_empty(qi, qi->qf_curlist))
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	7035 qf_jump(qi, 0, 0, FALSE);
9 4102fb4ea781 updated for version 7.0002 vimboss parents: 7 diff changeset	7036 else
4102fb4ea781 updated for version 7.0002 vimboss parents: 7 diff changeset	7037 EMSG2(_(e_nomatch2), eap->arg);
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	7038
d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	7039 if (eap->cmdidx == CMD_lhelpgrep)
d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	7040 {
14603 d1b69129db99 patch 8.1.0315: helpgrep with language doesn't work properly Christian Brabandt <cb@256bit.org> parents: 14560 diff changeset	7041 // 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	7042 // 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	7043 if (!bt_help(curwin->w_buffer) \|\| curwin->w_llist == qi)
659 d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	7044 {
d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	7045 if (new_qi)
d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	7046 ll_free_all(&qi);
d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	7047 }
d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	7048 else if (curwin->w_llist == NULL)
d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	7049 curwin->w_llist = qi;
d6a69271cb9a updated for version 7.0194 vimboss parents: 657 diff changeset	7050 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	7051 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	7052
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	7053 #endif /* FEAT_QUICKFIX */

Mercurial > vim

annotate src/quickfix.c @ 14796:74fd69162d50 v8.1.0410